| ... | @@ -1457,19 +1457,19 @@ user-defined ambipolar diffusion coefficient. Ambipolar diffusion enters | 
... | @@ -1457,19 +1457,19 @@ user-defined ambipolar diffusion coefficient. Ambipolar diffusion enters | 
| 
 | 
the induction equation and energy equation as a field contribution given
 | 
 | 
the induction equation and energy equation as a field contribution given
 | 
| 
 | 
by
 | 
 | 
by
 | 
| 
 | 
 | 
 | 
 | 
| 
 | 
**E**<sub>*A**D*</sub> = *η*<sub>*A**D*</sub>/*μ*\[(∇×**B**)×**B**\] × **B**
 | 
 | 
**E**<sub>*AD*</sub> = *η*<sub>*AD*</sub>/*μ*\[(∇×**B**)×**B**\] × **B**
 | 
| 
 | 
 | 
 | 
 | 
| 
 | 
where *η*<sub>*A**D*</sub>
 | 
 | 
where *η*<sub>*AD*</sub>
 | 
| 
 | 
\[`V` ⋅ `m` ⋅ `A`<sup> − 1</sup> ⋅ `T`<sup> − 2</sup>\] denotes the
 | 
 | 
\[`V` ⋅ `m` ⋅ `A`<sup> − 1</sup> ⋅ `T`<sup> − 2</sup>\] denotes the
 | 
| 
 | 
ambipolar diffusion coefficient.
 | 
 | 
ambipolar diffusion coefficient.
 | 
| 
 | 
 | 
 | 
 | 
| 
 | 
*Note: The prefactor* *η*<sub>*A**D*</sub>/*μ* *has units*
 | 
 | 
*Note: The prefactor* *η*<sub>*AD*</sub>/*μ* *has units*
 | 
| 
 | 
`m`<sup>2</sup> ⋅ `s`<sup> − 1</sup> ⋅ `T`<sup> − 2</sup>.
 | 
 | 
`m`<sup>2</sup> ⋅ `s`<sup> − 1</sup> ⋅ `T`<sup> − 2</sup>.
 | 
| 
 | 
 | 
 | 
 | 
| 
 | 
In the call of `APdiffusionCoeffUser()` function arguments are the
 | 
 | 
In the call of `APdiffusionCoeffUser()` function arguments are the
 | 
| 
 | 
superblock pointer `g` and the array pointer `APdiff` of type
 | 
 | 
superblock pointer `g` and the array pointer `APdiff` of type
 | 
| 
 | 
`double***` representing the ambipolar diffusion coefficient
 | 
 | 
`double***` representing the ambipolar diffusion coefficient
 | 
| 
 | 
*η*<sub>*A**D*</sub>:
 | 
 | 
*η*<sub>*AD*</sub>:
 | 
| 
 | 
 | 
 | 
 | 
| 
 | 
      APdiffusionCoeffUser(g,APdiff);
 | 
 | 
      APdiffusionCoeffUser(g,APdiff);
 | 
| 
 | 
 | 
 | 
 | 
| ... |  | ... |  |