| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| real(kind=real64), | public, | parameter | :: | CSPEED | = | 25.8441774d0 |
speed of light in R_sun/min proton charge-to-mass ratio in coulomb/kg proton rest energy in GeV electron rest energy in GeV heat capacity ratio |
| real(kind=real64), | public, | parameter | :: | DEG_TO_RAD | = | pi/180d0 | |
| real(kind=real64), | public, | parameter | :: | EE | = | 0.510998918d-3 |
speed of light in R_sun/min proton charge-to-mass ratio in coulomb/kg proton rest energy in GeV electron rest energy in GeV heat capacity ratio |
| real(kind=real64), | public, | parameter | :: | EP | = | 0.938d0 |
speed of light in R_sun/min proton charge-to-mass ratio in coulomb/kg proton rest energy in GeV electron rest energy in GeV heat capacity ratio |
| real(kind=real64), | public, | parameter | :: | GAMMA_CS | = | 1.6666666666666666666d0 |
speed of light in R_sun/min proton charge-to-mass ratio in coulomb/kg proton rest energy in GeV electron rest energy in GeV heat capacity ratio |
| integer(kind=int64), | public, | parameter | :: | NBASE | = | 40 | |
| integer, | public, | parameter | :: | NFMAX | = | 200 | |
| integer, | public, | parameter | :: | NSEEDMAX | = | 2001 | |
| integer(kind=int64), | public, | parameter | :: | NSPMAX | = | 20 | |
| integer, | public, | parameter | :: | N_PHI | = | 360 |
grid size |
| integer, | public, | parameter | :: | N_R | = | 150 |
grid size |
| integer, | public, | parameter | :: | N_THETA | = | 180 |
grid size |
| real(kind=real64), | public, | parameter | :: | PI | = | 3.14159265358979323846d0 | |
| real(kind=real64), | public, | parameter | :: | QoMSI | = | 9.57883376d7 |
speed of light in R_sun/min proton charge-to-mass ratio in coulomb/kg proton rest energy in GeV electron rest energy in GeV heat capacity ratio |
| real(kind=real64), | public, | parameter | :: | RAD_TO_DEG | = | 180d0/pi | |
| real(kind=real64), | public, | parameter | :: | RSS | = | 2.5d0 |
source surface in units of Rsun |
| real(kind=real64), | public, | parameter | :: | RS_PER_MIN_TO_KM_PER_SEC | = | 6.96340d5/60.0 | |
| real(kind=real64), | public, | parameter | :: | TWOPI | = | 2.d0*PI | |
| real(kind=real64), | public | :: | b1rsgrid(0:N_R,0:N_THETA,0:N_PHI) |
mapping to solar surface |
|||
| real(kind=real64), | public | :: | bgrid(0:N_R,0:N_THETA,0:N_PHI,3) |
magnetic field at grid points |
|||
| real(kind=real64), | public, | parameter | :: | epsilon(4) | = | [0.04, 0.01, 0.04, 0.003] | |
| real(kind=real64), | public | :: | gbgrid(0:N_R,0:N_THETA,0:N_PHI,3) |
grad B |