Index

Rundeck: E6TomaF40

Created: Fri May 17 03:30:39 EDT 2024

phtlst

Module: PHOTOLYSIS

File: TRCHEM_fastj2.f

Summary: phtlst read Photolysis Reactions and parameters
Author : Drew Shindell (modelEifications by Greg Faluvegi)
Version: 1.0 (based on cheminit0C5_M23p & ds4p_chem_init_M23)

---

Declaration:

subroutine phtlst

Calls the following subroutines/functions:

lstnum

Module: Global File: TRCHEM_init.f
lstnum find molecule number in param list of molecules

Variables:

openunit : used from filemanager

closeunit : used from filemanager

ate : character*8, dimension(3)

species name

o3up : real*8

currently read from JPLPH, but not used

o2up : real*8

currently read from JPLPH, but not used

nhu : integer

currently read from JPLPH, but not used

nll : integer

currently read from JPLPH, but not used

al : real*8

currently read from JPLPH, but not used

nabs : integer

currently read from JPLPH, but not used

j : integer

dummy loop variables

i : integer

dummy loop variables

iu_data : integer

temporary unit number

out_line : character(len=300)