readspecies Subroutine

public subroutine readspecies(id_spec, pos_spec)


                                                                        *
 This routine reads names and physical constants of chemical species/   *
 radionuclides given in the parameter pos_spec                          *
                                                                        *

Author: A. Stohl * * 11 July 1996 * * Changes: * N. Kristiansen, 31.01.2013: Including parameters for in-cloud scavenging * * HSO, 13 August 2013 added optional namelist input * R. Thompson, 18.01.2024 * variables for LCM * *


                                                                        *

Variables: * decaytime(maxtable) half time for radiological decay * specname(maxtable) names of chemical species, radionuclides * weta_gas, wetb_gas Parameters for below-cloud scavenging of gasses * crain_aero,csnow_aero Parameters for below-cloud scavenging of aerosols * ccn_aero,in_aero Parameters for in-cloud scavenging of aerosols * reaccconst Chemical reaction rate constant C * reacdconst Chemical reaction rate constant D * reacnconst Chemical reaction rate constant n * id_spec SPECIES number as referenced in RELEASE file * id_pos position where SPECIES data shall be stored *
Constants: * *






Arguments

Type IntentOptional Attributes Name
integer :: id_spec
integer :: pos_spec

Namelists

Namelist species_params


Variables

Name Type Default Description
pspecies character(len=16) None
pdecay real None
pweta_gas real None
pwetb_gas real None
pcrain_aero real None
pcsnow_aero real None
pccn_aero real None
pin_aero real None
preldiff real None
phenry real None
pf0 real None
pdensity real None
pdquer real None
pdia real None
pdsigma real None
pdryvel real None
pweightmolar real None
pohnconst real None
preactions character(len=10) None
pcconst real None
pdconst real None
pnconst real None
pohcconst real None
pohdconst real None
pemis_path character(len=256) None
pemis_file character(len=256) None
pemis_name character(len=16) None
pemis_unit integer None
pemis_coeff real None
parea_dow real None
parea_hour real None
ppoint_dow real None
ppoint_hour real None
pshape integer None
paspectratio real None
pla real None
pia real None
psa real None
porient integer None