| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| real(kind=rp), | public | :: | Te | ||||
| real(kind=rp), | public | :: | Ti | ||||
| real(kind=rp), | public | :: | ne | ||||
| real(kind=rp), | public | :: | Zeff | ||||
| real(kind=rp), | public | :: | rD | ||||
| real(kind=rp), | public | :: | re | ||||
| real(kind=rp), | public | :: | CoulombLogee | ||||
| real(kind=rp), | public | :: | CoulombLogei | ||||
| real(kind=rp), | public | :: | CLog1 | ||||
| real(kind=rp), | public | :: | CLog2 | ||||
| real(kind=rp), | public | :: | CLog0_1 | ||||
| real(kind=rp), | public | :: | CLog0_2 | ||||
| real(kind=rp), | public | :: | VTe | ||||
| real(kind=rp), | public | :: | VTeo | ||||
| real(kind=rp), | public | :: | delta | ||||
| real(kind=rp), | public | :: | deltao | ||||
| real(kind=rp), | public | :: | Gammac | ||||
| real(kind=rp), | public | :: | Gammaco | ||||
| real(kind=rp), | public | :: | Tau | ||||
| real(kind=rp), | public | :: | Tauc | ||||
| real(kind=rp), | public | :: | taur | ||||
| real(kind=rp), | public | :: | Ec | ||||
| real(kind=rp), | public | :: | ED | ||||
| real(kind=rp), | public | :: | dTau | ||||
| integer(kind=ip), | public | :: | subcycling_iterations | ||||
| integer(kind=ip), | public | :: | ngrid1 | ||||
| real(kind=rp), | public | :: | coll_per_dump_dt | ||||
| real(kind=rp), | public | :: | Clog_const | ||||
| real(kind=rp), | public | :: | p_min | ||||
| real(kind=rp), | public | :: | p_crit | ||||
| real(kind=rp), | public | :: | p_therm | ||||
| real(kind=rp), | public | :: | gam_min | ||||
| real(kind=rp), | public | :: | gam_crit | ||||
| real(kind=rp), | public | :: | gam_therm | ||||
| real(kind=rp), | public | :: | pmin_scale | ||||
| logical, | public | :: | ConserveLA | ||||
| logical, | public | :: | sample_test | ||||
| logical, | public | :: | avalanche | ||||
| logical, | public | :: | energy_diffusion | ||||
| logical, | public | :: | FP_bremsstrahlung | ||||
| logical, | public | :: | pitch_diffusion | ||||
| character(len=30), | public | :: | Clog_model | ||||
| character(len=30), | public | :: | min_secRE | ||||
| character(len=30), | public | :: | LAC_gam_resolution | ||||
| real(kind=rp), | public, | DIMENSION(3) | :: | x | = | (/1.0_rp, 0.0_rp, 0.0_rp/) | |
| real(kind=rp), | public, | DIMENSION(3) | :: | y | = | (/0.0_rp, 1.0_rp, 0.0_rp/) | |
| real(kind=rp), | public, | DIMENSION(3) | :: | z | = | (/0.0_rp, 0.0_rp, 1.0_rp/) | |
| type(PROFILES), | public | :: | P | ||||
| real(kind=rp), | public, | DIMENSION(:,:), ALLOCATABLE | :: | rnd_num | |||
| integer, | public | :: | rnd_num_count | ||||
| integer, | public | :: | rnd_dim | = | 40000000_idef |
TYPE, PRIVATE :: PARAMS_SS
REAL(rp) :: Te
! Electron temperature
REAL(rp) :: Ti
! Ion temperature
REAL(rp) :: ne
! Background electron density
REAL(rp) :: Zeff
! Effective atomic number of ions
REAL(rp) :: rD
! Debye radius
REAL(rp) :: re
! Classical electron radius
REAL(rp) :: CoulombLogee,CoulombLogei
! Coulomb logarithm
REAL(rp) :: CLog1, CLog2,CLog0_1, CLog0_2
REAL(rp) :: VTe
! Thermal velocity of background electrons
REAL(rp) :: VTeo
REAL(rp) :: delta
! delta parameter
REAL(rp) :: deltao
REAL(rp) :: Gammac
! Collisional Gamma factor
REAL(rp) :: Gammaco
! Collisional gamma factor normalized for SDE for dp
REAL(rp) :: Tau
! Collisional time of relativistic particles
REAL(rp) :: Tauc
! Collisional time of thermal particles
REAL(rp) :: taur
! radiation timescale
REAL(rp) :: Ec
! Critical electric field
REAL(rp) :: ED
! Dreicer electric field
REAL(rp) :: dTau
! Subcycling time step in collisional time units (Tau)
INTEGER(ip) :: subcycling_iterations,ngrid1
REAL(rp) :: coll_per_dump_dt,Clog_const
REAL(rp) :: p_min,p_crit,p_therm,gam_min,gam_crit,gam_therm,pmin_scale
LOGICAL :: ConserveLA,sample_test,avalanche,energy_diffusion,FP_bremsstrahlung,pitch_diffusion
CHARACTER(30) :: Clog_model,min_secRE,LAC_gam_resolution
REAL(rp), DIMENSION(3) :: x = (/1.0_rp,0.0_rp,0.0_rp/)
REAL(rp), DIMENSION(3) :: y = (/0.0_rp,1.0_rp,0.0_rp/)
REAL(rp), DIMENSION(3) :: z = (/0.0_rp,0.0_rp,1.0_rp/)
TYPE(PROFILES) :: P
REAL(rp), DIMENSION(:,:), ALLOCATABLE :: rnd_num
INTEGER :: rnd_num_count
INTEGER :: rnd_dim = 40000000_idef
END TYPE PARAMS_SS