Scrambler  1
NEQCoolingSrc Module Reference
+ Collaboration diagram for NEQCoolingSrc:

List of all members.

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

Detailed Description

Definition at line 48 of file neqcooling.f90.


Member Function/Subroutine Documentation

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]

Definition at line 334 of file neqcooling.f90.

References Lrh(), Lrl(), Lvh(), and Lvl().

+ Here is the call graph for this function:

pure REAL(KIND=qprec) function H2_critical_cool ( REAL(KIND=qprec), intent(in)  nH2,
REAL(KIND=qprec), intent(in)  T 
) [private]

Definition at line 408 of file neqcooling.f90.

References fj(), and fv().

+ Here is the call graph for this function:

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().

+ Here is the call graph for this function:

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().

+ Here is the call graph for this function:

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.


Member Data Documentation

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.

REAL(KIND=qprec), parameter rn_TAB = n_TAB [private]

Definition at line 105 of file neqcooling.f90.

REAL(KIND=qprec), parameter delta_TAB = (max_TAB-min_TAB)/rn_TAB [private]

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.


The documentation for this module was generated from the following file:
 All Classes Files Functions Variables