Index | Rundeck: E6TomaF40 | Created: Wed Jun 26 03:30:36 EDT 2024 |
OLDTRACER_MOD | File: OldTracer_mod.F90 |
Author :
Version:
Subroutines:
- conc_from_fw
- conc_from_fw_all
- conc_from_fw_m
- conc_from_fw_s
- do_aircraft
- do_aircraft_all
- do_aircraft_m
- do_aircraft_s
- do_fire
- do_fire_all
- do_fire_m
- do_fire_s
- dodrydep
- dodrydep_all
- dodrydep_m
- dodrydep_s
- dowetdep
- dowetdep_all
- dowetdep_m
- dowetdep_s
- emisperfirebyvegtype
- emisperfirebyvegtype_s
- f0
- f0_all
- f0_m
- f0_s
- findtracer
- first_aircraft
- first_aircraft_all
- first_aircraft_m
- first_aircraft_s
- fq_aer
- fq_aer_all
- fq_aer_m
- fq_aer_s
- has_chemistry
- has_chemistry_all
- has_chemistry_m
- has_chemistry_s
- hstar
- hstar_all
- hstar_m
- hstar_s
- idefaultspec
- imptable
- imptable_all
- imptable_m
- imptable_s
- initializeoldtracers
- is_dco_tracer
- is_dco_tracer_all
- is_dco_tracer_m
- is_dco_tracer_s
- is_vbs_tracer
- is_vbs_tracer_all
- is_vbs_tracer_m
- is_vbs_tracer_s
- isdust
- isdust_all
- isdust_m
- isdust_s
- iso_index
- iso_index_all
- iso_index_m
- iso_index_s
- itime_tr0
- itime_tr0_all
- itime_tr0_m
- itime_tr0_s
- mass2vol
- mass2vol_all
- mass2vol_m
- mass2vol_s
- nbbsources
- nbbsources_all
- nbbsources_m
- nbbsources_s
- needtrs
- needtrs_all
- needtrs_m
- needtrs_s
- ntm_power
- ntm_power_all
- ntm_power_m
- ntm_power_s
- ntrocn
- ntrocn_all
- ntrocn_m
- ntrocn_s
- oldaddtracer
- om2oc
- om2oc_all
- om2oc_m
- om2oc_s
- pm10fact
- pm10fact_all
- pm10fact_m
- pm10fact_s
- pm2p5fact
- pm2p5fact_all
- pm2p5fact_m
- pm2p5fact_s
- rc_washt
- rc_washt_all
- rc_washt_m
- rc_washt_s
- set_conc_from_fw
- set_do_aircraft
- set_do_fire
- set_dodrydep
- set_dowetdep
- set_emisperfirebyvegtype
- set_f0
- set_first_aircraft
- set_fq_aer
- set_has_chemistry
- set_hstar
- set_imptable
- set_is_dco_tracer
- set_is_vbs_tracer
- set_isdust
- set_iso_index
- set_itime_tr0
- set_mass2vol
- set_nbbsources
- set_needtrs
- set_ntm_power
- set_ntrocn
- set_om2oc
- set_pm10fact
- set_pm2p5fact
- set_rc_washt
- set_src_dist_base
- set_src_dist_index
- set_t_qlimit
- set_tcscale
- set_to_conc
- set_to_volume_mixrat
- set_tr_dhd
- set_tr_h2obych4
- set_tr_mm
- set_tr_rkd
- set_tr_wd_type
- set_trdecay
- set_trglac
- set_trli0
- set_trpdens
- set_trradius
- set_trsi0
- set_trw0
- set_vol2mass
- src_dist_base
- src_dist_base_all
- src_dist_base_m
- src_dist_base_s
- src_dist_index
- src_dist_index_all
- src_dist_index_m
- src_dist_index_s
- t_qlimit
- t_qlimit_all
- t_qlimit_m
- t_qlimit_s
- tcscale
- tcscale_all
- tcscale_m
- tcscale_s
- to_conc
- to_conc_all
- to_conc_m
- to_conc_s
- to_volume_mixrat
- to_volume_mixrat_all
- to_volume_mixrat_m
- to_volume_mixrat_s
- tr_dhd
- tr_dhd_all
- tr_dhd_m
- tr_dhd_s
- tr_h2obych4
- tr_h2obych4_all
- tr_h2obych4_m
- tr_h2obych4_s
- tr_mm
- tr_mm_all
- tr_mm_m
- tr_mm_s
- tr_rkd
- tr_rkd_all
- tr_rkd_m
- tr_rkd_s
- tr_wd_type
- tr_wd_type_all
- tr_wd_type_m
- tr_wd_type_s
- trdecay
- trdecay_all
- trdecay_m
- trdecay_s
- trglac
- trglac_all
- trglac_m
- trglac_s
- trli0
- trli0_all
- trli0_m
- trli0_s
- trname
- trname_all
- trname_s
- trpdens
- trpdens_all
- trpdens_m
- trpdens_s
- trradius
- trradius_all
- trradius_m
- trradius_s
- trsi0
- trsi0_all
- trsi0_m
- trsi0_s
- trw0
- trw0_all
- trw0_m
- trw0_s
- vol2mass
- vol2mass_all
- vol2mass_m
- vol2mass_s
Global Variables:
- ngas :
integer, parameter
- index for wetdep tracer type = gas
Initial Value= 1
- npart :
integer, parameter
- index for wetdep tracer type = particle/aerosol
Initial Value= 2
- nwater :
integer, parameter
- index for wetdep tracer type = water
Initial Value= 3
- max_len_name :
integer, parameter
- Initial Value
= 20
- tr_mm :
- : !@var TR_MM: molecular mass of each tracer (g/mole)
- ntm_power :
- : Power of 10 associated with each tracer (for printing)
- t_qlimit :
- : if t_qlimit=.true. tracer is maintained as positive
- needtrs :
- : true if surface tracer value from PBL is required
- trdecay :
- : radioactive decay constant (1/s) (=0 for stable tracers)
- itime_tr0 :
- : start time for each tracer (hours)
- trsi0 :
- : conc. in sea ice (kg/m^2)
- trw0 :
- : concentration in water (kg/kg)
- mass2vol :
- : mass to volume ratio = mair/tr_mm
- vol2mass :
- : volume to mass ratio = tr_mm/mair
- dodrydep :
- : true if tracer should undergo dry deposition
- f0 :
- : reactivity factor for oxidation of biological substances
- hstar :
- : Henry's Law const for tracer dry deposition. mole/(L atm)
- do_fire :
- : true if tracer should have emissions via flammability
- do_aircraft :
- : true if tracer should have emissions via aircraft
- first_aircraft :
- : false once tracer timestream opened for aircraft
- is_dco_tracer :
- : !@var true if the tracer belongs to TRACERS_dCO
- is_vbs_tracer :
- : !@var true if the tracer belongs to TRACERS_VBS
- has_chemistry :
- : !@var true if the tracer is affected by chemistry
- nbbsources :
- : number of sources attributed to biomass burning
- emisperfirebyvegtype :
- : emisPerFireByVegType tracer emissions per fire count as a
- trpdens :
- : tracer particle density (kg/m^3)
- trradius :
- : tracer effective radius (m) (=0 for non particle tracers)
- tr_wd_type :
- : tracer wet dep type (gas, particle, water)
- tr_rkd :
- : Henry's Law coefficient (in mole/Joule please !)
- tr_dhd :
- : coefficient of temperature-dependence term of Henry's
- fq_aer :
- : fraction of aerosol that condenses
- rc_washt :
- : aerosol washout rate
- isdust :
- : index array for testing if tracer is a dust type
- tr_h2obych4 :
- : conc. of tracer in water from methane oxidation
- dowetdep :
- : true if tracer has some form of wet deposition
- ntrocn :
- : scaling power factor for ocean/ice tracer concentrations
- conc_from_fw :
- : true if ocean conc is defined using fresh water
- trglac :
- : tracer ratio in glacial runoff to ocean (kg/kg)
- iso_index :
- : indexing taking actual tracer number to isotope
- om2oc :
- : ratio of organic matter to organic carbon
- pm2p5fact :
- : amount of mass tracer that is PM2.5
- pm10fact :
- : amount of mass tracer that is PM10
- to_volume_mixrat :
- : =0: print tracer conc. by vol mix ratio; =1:mass mixing ratio
- to_conc :
- : =0: print 3D tracer conc. by to_volume_MixRat; =1: kg/m3
- trli0 :
- : default tracer conc. for land ice (kg/kg)
- imptable :
- : tracer index in scale tables
- tcscale :
- : Scale factor for frequency tables
- src_dist_base :
- : source distribution base
- src_dist_index :
- : source distribution index
- numtracers :
integer, save
- Initial Value
= 0
- internaltracers :
type(oldtracer_type), allocatable, dimension(:)
- tracerreference :
type(tracerbundle), pointer
- Initial Value
= > null()