Scrambler
1
|
Data Types | |
type | CELLINFO |
Public Member Functions | |
subroutine, public | InitNeqCool |
subroutine, public | Addneqtracers |
subroutine, public | GetNEQvars (qin, muout, nvecout) |
REAL(KIND=qPrec) function, public | DMCoolingRate (temp) |
subroutine, public | InitDMCool |
Allocate and fill DM cooling table, finalize initialization of DM cooling source. | |
subroutine, public | Cool_Derivatives (q, dqdt, Temp, nvec, iCooling) |
Public Attributes | |
REAL(KIND=qprec), public | nmine = 0.01 |
REAL(KIND=qprec), public | Tdust = 20 |
REAL(KIND=qprec), public | Tfloor = 200 |
REAL(KIND=qprec), public | OIFrac = 0.000851 |
REAL(KIND=qprec), public | metalFrac = 0.01 |
REAL(KIND=qprec), public | gammac = 1.666667 |
REAL(KIND=qprec), public | metal_loss |
LOGICAL, public | lNeqCooling = .True. |
LOGICAL, public | lBBC = .False. |
LOGICAL, public | lProtectNeq = .True. |
LOGICAL, public | lchemion = .True. |
INTEGER, public | NrSpecies |
INTEGER, public | nSpecieslo |
INTEGER, public | nSpecieshi |
INTEGER, public | iH2 |
INTEGER, public | iH |
INTEGER, public | iHII |
INTEGER, public | iHe |
INTEGER, public | iHeII |
INTEGER, public | iHeIII |
LOGICAL, public | lH = .True. |
LOGICAL, public | lH2 = .False. |
LOGICAL, public | lHII = .True. |
LOGICAL, public | lHe = .True. |
LOGICAL, public | lHeII = .False. |
LOGICAL, public | lHeIII = .False. |
REAL(KIND=qPrec), dimension(:), allocatable, public | DMCoolingTab |
REAL(KIND=qPrec), dimension(:), allocatable, public | HexCoolingTab |
REAL(KIND=qPrec), dimension(:), allocatable, public | EqIonTab |
REAL(KIND=qprec), parameter, public | small = 1.d-6 |
Private Member Functions | |
subroutine | EOS_vars (q, nvec, T) |
pure REAL(KIND=qprec) function | get_gamma (nvec) |
pure subroutine | nparticle (nvec, npart, nneuc, ne) |
pure REAL(KIND=qprec) function | H2_cool (nH2, nH, T) |
pure REAL(KIND=qprec) function | H2_critical_cool (nH2, T) |
pure REAL(KIND=qprec) function | H2_critical_cool_table (nH2, T) |
pure REAL(KIND=qprec) function | CriticalDenH2 (nH, T) |
pure REAL(KIND=qprec) function | dust_cool (n, T) |
pure REAL(KIND=qprec) function | dust_cool_table (n, T) |
pure REAL(KIND=qPrec) function | EqIonVal (Temp) |
REAL(Kind=qPrec) function | BBC_Cooling_rate (X, Tin) |
subroutine | InitBBCCool |
subroutine | EqIonInit |
subroutine | InitHexCool |
pure REAL(KIND=qPrec) function | HexCoolingRate (Temp) |
pure REAL(KIND=qprec) function | OI_cool (nH2, nH, T) |
pure REAL(KIND=qprec) function | H2_diss (nH2, nH, nHe, ne, T) |
pure REAL(KIND=qPrec) function | H2_dust_Recomb (nHneuclei, nH, T, Tdust) |
pure REAL(KIND=qprec) function | H2_dust_Recomb_table (nHneuclei, nH, T) |
pure REAL(KIND=qprec) function | H_recomb (nHII, ne, T) |
pure REAL(KIND=qprec) function | H_recomb_table (nHII, ne, T) |
REAL(KIND=qprec) function | H_ioniz (nH, ne, T) |
pure REAL(KIND=qprec) function | H_ioniz_table (nH, ne, T) |
REAL(KIND=qprec) function | He_ioniz (nHe, ne, T) |
pure REAL(KIND=qprec) function | He_ioniz_table (nHeII, ne, T) |
pure REAL(KIND=qprec) function | He_recomb (nHeII, ne, T) |
pure REAL(KIND=qprec) function | He_recomb_table (nHeII, ne, T) |
REAL(KIND=qprec) function | HeII_ioniz (nHeII, ne, T) |
pure REAL(KIND=qprec) function | HeII_ioniz_table (nHeII, ne, T) |
pure REAL(KIND=qprec) function | HeIII_recomb (nHeIII, ne, T) |
pure REAL(KIND=qprec) function | HeIII_recomb_table (nHeIII, ne, T) |
subroutine | zbar_calc (T, ion_fract, zbar) |
pure REAL(KIND=qprec) function | df2 (x) |
pure REAL(KIND=qprec) function | df1 (x) |
Private Attributes | |
INTEGER | Verbosity = 0 |
REAL(KIND=qPrec), dimension(:,:), allocatable | BBC_Table |
REAL(KIND=qPrec), dimension(:,:), allocatable | BBC_axis_vals |
REAL(KIND=qPrec), dimension(:), allocatable | metal_abun |
REAL(KIND=qPrec), dimension(:), allocatable | metal_states |
INTEGER, parameter | n_TAB = 131072 |
INTEGER, parameter | min_TAB = 0 |
INTEGER, parameter | max_TAB = 7 |
REAL(KIND=qprec), parameter | rn_TAB = n_TAB |
REAL(KIND=qprec), parameter | delta_TAB = (max_TAB-min_TAB)/rn_TAB |
REAL(KIND=qprec), dimension(n_tab) | H2_dust_Recomb_TAB |
REAL(KIND=qprec), dimension(n_tab) | H2_critical_cool_TAB |
REAL(KIND=qprec), dimension(n_tab) | dust_cool_TAB |
REAL(KIND=qprec), dimension(n_tab) | H_recomb_TAB |
REAL(KIND=qprec), dimension(n_tab) | H_ioniz_TAB |
REAL(KIND=qprec), dimension(n_tab) | He_ioniz_TAB |
REAL(KIND=qprec), dimension(n_tab) | He_recomb_TAB |
REAL(KIND=qprec), dimension(n_tab) | HeII_ioniz_TAB |
REAL(KIND=qprec), dimension(n_tab) | HeIII_recomb_TAB |
Definition at line 48 of file neqcooling.f90.
subroutine, public InitNeqCool | ( | ) |
Definition at line 125 of file neqcooling.f90.
subroutine, public Addneqtracers | ( | ) |
Definition at line 154 of file neqcooling.f90.
subroutine EOS_vars | ( | REAL(KIND=qprec), dimension(1:nrhydrovars), intent(in) | q, |
REAL(KIND=qprec), dimension(ih:nspecieshi), intent(out), optional | nvec, | ||
REAL(KIND=qprec), intent(out), optional | T | ||
) | [private] |
Definition at line 198 of file neqcooling.f90.
pure REAL(KIND=qprec) function get_gamma | ( | REAL(KIND=qprec), dimension(ih:nspecieshi), intent(in) | nvec | ) | [private] |
Definition at line 254 of file neqcooling.f90.
subroutine, public GetNEQvars | ( | REAL(KIND=qprec), dimension(:), intent(in) | qin, |
REAL(KIND=qprec), intent(out) | muout, | ||
REAL(KIND=qPREC), dimension(0:nspecieshi), intent(out) | nvecout | ||
) |
Definition at line 272 of file neqcooling.f90.
pure subroutine nparticle | ( | REAL(KIND=qprec), dimension(ih:nspecieshi), intent(in) | nvec, |
REAL(KIND=qprec), intent(out), optional | npart, | ||
REAL(KIND=qprec), intent(out), optional | nneuc, | ||
REAL(KIND=qprec), intent(out), optional | ne | ||
) | [private] |
Definition at line 307 of file neqcooling.f90.
pure REAL(KIND=qprec) function H2_cool | ( | REAL(KIND=qprec), intent(in) | nH2, |
REAL(KIND=qprec), intent(in) | nH, | ||
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
pure REAL(KIND=qprec) function H2_critical_cool | ( | REAL(KIND=qprec), intent(in) | nH2, |
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
pure REAL(KIND=qprec) function H2_critical_cool_table | ( | REAL(KIND=qprec), intent(in) | nH2, |
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
Definition at line 484 of file neqcooling.f90.
pure REAL (KIND=qprec) function CriticalDenH2 | ( | REAL (KIND=qPrec), intent(in) | nH, |
REAL (KIND=qPrec), intent(in) | T | ||
) | [private] |
Definition at line 501 of file neqcooling.f90.
pure REAL(KIND=qprec) function dust_cool | ( | REAL(KIND=qprec), intent(in) | n, |
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
Definition at line 517 of file neqcooling.f90.
pure REAL(KIND=qprec) function dust_cool_table | ( | REAL(KIND=qprec), intent(in) | n, |
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
Definition at line 530 of file neqcooling.f90.
REAL(KIND=qPrec) function, public DMCoolingRate | ( | REAL(KIND=qPrec) | temp | ) |
Definition at line 545 of file neqcooling.f90.
pure REAL (KIND=qPrec) function EqIonVal | ( | REAL (KIND=qPrec), intent(in) | Temp | ) | [private] |
Definition at line 561 of file neqcooling.f90.
REAL(Kind=qPrec) function BBC_Cooling_rate | ( | REAL(Kind=qPrec), intent(in) | X, |
REAL(Kind=qPrec), intent(in) | Tin | ||
) | [private] |
Definition at line 584 of file neqcooling.f90.
subroutine InitBBCCool | ( | ) | [private] |
Definition at line 642 of file neqcooling.f90.
subroutine, public InitDMCool | ( | ) |
Allocate and fill DM cooling table, finalize initialization of DM cooling source.
Definition at line 672 of file neqcooling.f90.
subroutine EqIonInit | ( | ) | [private] |
Definition at line 686 of file neqcooling.f90.
subroutine InitHexCool | ( | ) | [private] |
Definition at line 719 of file neqcooling.f90.
pure REAL (KIND=qPrec) function HexCoolingRate | ( | REAL (KIND=qPrec), intent(in) | Temp | ) | [private] |
Definition at line 733 of file neqcooling.f90.
pure REAL(KIND=qprec) function OI_cool | ( | REAL(KIND=qprec), intent(in) | nH2, |
REAL(KIND=qprec), intent(in) | nH, | ||
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
Definition at line 772 of file neqcooling.f90.
pure REAL(KIND=qprec) function H2_diss | ( | REAL(KIND=qprec), intent(in) | nH2, |
REAL(KIND=qprec), intent(in) | nH, | ||
REAL(KIND=qprec), intent(in) | nHe, | ||
REAL(KIND=qprec), intent(in) | ne, | ||
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
Definition at line 812 of file neqcooling.f90.
References kd().
pure REAL(KIND=qPrec) function H2_dust_Recomb | ( | REAL(KIND=qPrec), intent(in) | nHneuclei, |
REAL(KIND=qPrec), intent(in) | nH, | ||
REAL(KIND=qPrec), intent(in) | T, | ||
REAL(KIND=qPrec), intent(in) | Tdust | ||
) | [private] |
Definition at line 997 of file neqcooling.f90.
pure REAL(KIND=qprec) function H2_dust_Recomb_table | ( | REAL(KIND=qprec), intent(in) | nHneuclei, |
REAL(KIND=qprec), intent(in) | nH, | ||
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
Definition at line 1017 of file neqcooling.f90.
pure REAL(KIND=qprec) function H_recomb | ( | REAL(KIND=qprec), intent(in) | nHII, |
REAL(KIND=qprec), intent(in) | ne, | ||
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
Definition at line 1038 of file neqcooling.f90.
pure REAL(KIND=qprec) function H_recomb_table | ( | REAL(KIND=qprec), intent(in) | nHII, |
REAL(KIND=qprec), intent(in) | ne, | ||
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
Definition at line 1052 of file neqcooling.f90.
REAL(KIND=qprec) function H_ioniz | ( | REAL(KIND=qprec), intent(in) | nH, |
REAL(KIND=qprec), intent(in) | ne, | ||
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
Definition at line 1074 of file neqcooling.f90.
pure REAL(KIND=qprec) function H_ioniz_table | ( | REAL(KIND=qprec), intent(in) | nH, |
REAL(KIND=qprec), intent(in) | ne, | ||
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
Definition at line 1095 of file neqcooling.f90.
REAL(KIND=qprec) function He_ioniz | ( | REAL(KIND=qprec), intent(in) | nHe, |
REAL(KIND=qprec), intent(in) | ne, | ||
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
Definition at line 1117 of file neqcooling.f90.
pure REAL(KIND=qprec) function He_ioniz_table | ( | REAL(KIND=qprec), intent(in) | nHeII, |
REAL(KIND=qprec), intent(in) | ne, | ||
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
Definition at line 1139 of file neqcooling.f90.
pure REAL(KIND=qprec) function He_recomb | ( | REAL(KIND=qprec), intent(in) | nHeII, |
REAL(KIND=qprec), intent(in) | ne, | ||
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
Definition at line 1160 of file neqcooling.f90.
References He_dielec_recomb(), and He_rad_recomb().
pure REAL(KIND=qprec) function He_recomb_table | ( | REAL(KIND=qprec), intent(in) | nHeII, |
REAL(KIND=qprec), intent(in) | ne, | ||
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
Definition at line 1200 of file neqcooling.f90.
REAL(KIND=qprec) function HeII_ioniz | ( | REAL(KIND=qprec), intent(in) | nHeII, |
REAL(KIND=qprec), intent(in) | ne, | ||
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
Definition at line 1215 of file neqcooling.f90.
pure REAL(KIND=qprec) function HeII_ioniz_table | ( | REAL(KIND=qprec), intent(in) | nHeII, |
REAL(KIND=qprec), intent(in) | ne, | ||
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
Definition at line 1236 of file neqcooling.f90.
pure REAL(KIND=qprec) function HeIII_recomb | ( | REAL(KIND=qprec), intent(in) | nHeIII, |
REAL(KIND=qprec), intent(in) | ne, | ||
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
Definition at line 1251 of file neqcooling.f90.
pure REAL(KIND=qprec) function HeIII_recomb_table | ( | REAL(KIND=qprec), intent(in) | nHeIII, |
REAL(KIND=qprec), intent(in) | ne, | ||
REAL(KIND=qprec), intent(in) | T | ||
) | [private] |
Definition at line 1264 of file neqcooling.f90.
subroutine zbar_calc | ( | REAL(kind=qPrec), intent(in) | T, |
REAL(kind=qPrec), intent(in) | ion_fract, | ||
REAL(kind=qPrec) | zbar | ||
) | [private] |
Definition at line 1279 of file neqcooling.f90.
pure REAL(KIND=qprec) function df2 | ( | REAL(KIND=qprec), intent(in) | x | ) | [private] |
Definition at line 1321 of file neqcooling.f90.
pure REAL(KIND=qprec) function df1 | ( | REAL(KIND=qprec), intent(in) | x | ) | [private] |
Definition at line 1345 of file neqcooling.f90.
subroutine, public Cool_Derivatives | ( | REAL(KIND=qPrec), dimension(1:nrhydrovars), intent(in) | q, |
REAL(KIND=qPrec), dimension(1:nrhydrovars), intent(out) | dqdt, | ||
REAL(KIND=qPrec), intent(in), optional | Temp, | ||
REAL(KIND=qPREC), dimension(0:nspecieshi), intent(in), optional | nvec, | ||
INTEGER, optional | iCooling | ||
) |
Definition at line 1368 of file neqcooling.f90.
INTEGER Verbosity = 0 [private] |
Definition at line 75 of file neqcooling.f90.
REAL(KIND=qprec), public nmine = 0.01 |
Definition at line 76 of file neqcooling.f90.
REAL(KIND=qprec), public Tdust = 20 |
Definition at line 76 of file neqcooling.f90.
REAL(KIND=qprec), public Tfloor = 200 |
Definition at line 76 of file neqcooling.f90.
REAL(KIND=qprec), public OIFrac = 0.000851 |
Definition at line 76 of file neqcooling.f90.
REAL(KIND=qprec), public metalFrac = 0.01 |
Definition at line 76 of file neqcooling.f90.
REAL(KIND=qprec), public gammac = 1.666667 |
Definition at line 76 of file neqcooling.f90.
REAL(KIND=qprec), public metal_loss |
Definition at line 76 of file neqcooling.f90.
LOGICAL, public lNeqCooling = .True. |
Definition at line 84 of file neqcooling.f90.
LOGICAL, public lBBC = .False. |
Definition at line 84 of file neqcooling.f90.
LOGICAL, public lProtectNeq = .True. |
Definition at line 84 of file neqcooling.f90.
LOGICAL, public lchemion = .True. |
Definition at line 84 of file neqcooling.f90.
INTEGER, public NrSpecies |
Definition at line 89 of file neqcooling.f90.
INTEGER, public nSpecieslo |
Definition at line 89 of file neqcooling.f90.
INTEGER, public nSpecieshi |
Definition at line 89 of file neqcooling.f90.
INTEGER, public iH2 |
Definition at line 89 of file neqcooling.f90.
INTEGER, public iH |
Definition at line 89 of file neqcooling.f90.
INTEGER, public iHII |
Definition at line 89 of file neqcooling.f90.
INTEGER, public iHe |
Definition at line 89 of file neqcooling.f90.
INTEGER, public iHeII |
Definition at line 89 of file neqcooling.f90.
INTEGER, public iHeIII |
Definition at line 89 of file neqcooling.f90.
LOGICAL, public lH = .True. |
Definition at line 90 of file neqcooling.f90.
LOGICAL, public lH2 = .False. |
Definition at line 90 of file neqcooling.f90.
LOGICAL, public lHII = .True. |
Definition at line 90 of file neqcooling.f90.
LOGICAL, public lHe = .True. |
Definition at line 90 of file neqcooling.f90.
LOGICAL, public lHeII = .False. |
Definition at line 90 of file neqcooling.f90.
LOGICAL, public lHeIII = .False. |
Definition at line 90 of file neqcooling.f90.
REAL (KIND=qPrec), dimension(:), allocatable, public DMCoolingTab |
Definition at line 94 of file neqcooling.f90.
REAL (KIND=qPrec), dimension(:), allocatable, public HexCoolingTab |
Definition at line 94 of file neqcooling.f90.
REAL (KIND=qPrec), dimension(:), allocatable, public EqIonTab |
Definition at line 94 of file neqcooling.f90.
REAL (KIND=qPrec), dimension(:,:), allocatable BBC_Table [private] |
Definition at line 95 of file neqcooling.f90.
REAL (KIND=qPrec), dimension(:,:), allocatable BBC_axis_vals [private] |
Definition at line 95 of file neqcooling.f90.
REAL (KIND=qPrec), dimension(:), allocatable metal_abun [private] |
Definition at line 96 of file neqcooling.f90.
REAL (KIND=qPrec), dimension(:), allocatable metal_states [private] |
Definition at line 96 of file neqcooling.f90.
REAL(KIND=qprec), parameter, public small = 1.d-6 |
Definition at line 98 of file neqcooling.f90.
INTEGER, parameter n_TAB = 131072 [private] |
Definition at line 104 of file neqcooling.f90.
INTEGER, parameter min_TAB = 0 [private] |
Definition at line 104 of file neqcooling.f90.
INTEGER, parameter max_TAB = 7 [private] |
Definition at line 104 of file neqcooling.f90.
Definition at line 105 of file neqcooling.f90.
Definition at line 105 of file neqcooling.f90.
REAL(KIND=qprec), dimension(n_tab) H2_dust_Recomb_TAB [private] |
Definition at line 106 of file neqcooling.f90.
REAL(KIND=qprec), dimension(n_tab) H2_critical_cool_TAB [private] |
Definition at line 106 of file neqcooling.f90.
REAL(KIND=qprec), dimension(n_tab) dust_cool_TAB [private] |
Definition at line 106 of file neqcooling.f90.
REAL(KIND=qprec), dimension(n_tab) H_recomb_TAB [private] |
Definition at line 106 of file neqcooling.f90.
REAL(KIND=qprec), dimension(n_tab) H_ioniz_TAB [private] |
Definition at line 106 of file neqcooling.f90.
REAL(KIND=qprec), dimension(n_tab) He_ioniz_TAB [private] |
Definition at line 106 of file neqcooling.f90.
REAL(KIND=qprec), dimension(n_tab) He_recomb_TAB [private] |
Definition at line 106 of file neqcooling.f90.
REAL(KIND=qprec), dimension(n_tab) HeII_ioniz_TAB [private] |
Definition at line 106 of file neqcooling.f90.
REAL(KIND=qprec), dimension(n_tab) HeIII_recomb_TAB [private] |
Definition at line 106 of file neqcooling.f90.