Index | Rundeck: E6TomaF40 | Created: Fri May 17 03:30:39 EDT 2024 |
TRDIAG_COM | File: TRDIAG_COM.f |
Author : Jean Lerner
Version:
Subroutines:
Global Variables:
- im : used from resolution
- jm : used from resolution
- lm : used from resolution
- npts : used from diag_com
- jm_budg : used from diag_com
- sname_strlen : used from mdiag_com
- units_strlen : used from mdiag_com
- lname_strlen : used from mdiag_com
- ntm : used from tracer_com
- nsoa : used from tracer_com
- ntsurfsrcmax : used from tracer_mod
- nt3dsrcmax : used from tracer_mod
- to_conc : used from oldtracer_mod
Used by: | :tracea | TRDUST_DRV |
- set_to_conc : used from oldtracer_mod
Used by: | TRDUST_DRV |
- to_volume_mixrat : used from oldtracer_mod
Used by: | :accumcachedtracersubdds | :tijh_defs | :tijlh_defs | :tijph_defs |
- set_to_volume_mixrat : used from oldtracer_mod
- to_per_mil :
integer, allocatable, dimension(:)
- For printout of tracer concentration in permil
Used by: | :daily_li | :diag_river | :diagijlt | :diagijlt_prep | :diagijt | :diagijt_prep | :diagjlt | :diagjlt_prep | :laterinittracermetadata |
- mmr_to_vmr :
real*8, allocatable, dimension(:)
- : converts tracer mass mixing ratio to volume mr
- taijln :
real*8, allocatable, dimension(:, :, :, :)
- 3D tracer diagnostics (all tracers)
Used by: | :diagijlt | :gather_trdiag | :scatter_trdiag |
- tscf3d :
real*8, allocatable, dimension(:, :, :, :)
- 3D tracer advection flxes (all tracers)
- taijln_loc :
real*8, allocatable, dimension(:, :, :, :)
Used by: | :diagijlt_prep | :gather_trdiag | :reset_trdiag | :scatter_trdiag | :tracea | :write_src_dist_data |
- units_ijt :
character(len=units_strlen), allocatable, dimension(:)
- : Names and units of lat-sigma tracer IJ diags
Used by: | :diagijlt | :diagijlt_prep |
- sname_ijt :
character(len=sname_strlen), allocatable, dimension(:)
- : Names and units of lat-sigma tracer IJ diags
Used by: | :diagijlt | :diagijlt_prep |
- tscf3d_loc :
real*8, allocatable, dimension(:, :, :, :)
Used by: | :set_strattroptracer_diag |
- lname_ijt :
character(len=lname_strlen), allocatable, dimension(:)
- : descriptions of tracer IJ diagnostics
Used by: | :diagijlt | :diagijlt_prep |
- scale_ijt :
real*8, allocatable, dimension(:)
- : printout scaling factor for tracer IJ diagnostics
Used by: | :diagijlt | :diagijlt_prep |
- ijtc_power :
integer, allocatable, dimension(:)
- : power of 10 used for tracer IJ concentration diags
- ijtm_power :
integer, allocatable, dimension(:)
- : power of 10 used for tracer IJ mass unit diags
- ktaij :
integer, parameter
- number of 2D diags describing surface and column load along
Initial Value= 23
Used by: | :diagijt | :diagijt_prep |
- ijt_xx :
- names for water-based taijn diagnostics
- ijt_xx :
- names for water-based taijn diagnostics
- tij_conc :
integer
Used by: | :tracea |
- tij_surf :
integer
Used by: | :diagijt | :diagijt_prep | :surface_diag1 |
- tij_surfbv :
integer
Used by: | :surface_diag1 |
- tij_mass :
integer
Used by: | :diagijt | :tracea |
- tij_strop :
integer
Used by: | :set_strattroptracer_diag |
- tij_rvr :
integer
Used by: | :diag_river | :riverf |
- tij_prec :
integer
Used by: | :condse | :diagijt | :diagijt_prep | :write_src_dist_data |
- tij_evap :
integer
Used by: | :surface_diag1 | :surface_diag1a |
- tij_grnd :
integer
Used by: | :diagijt | :diagijt_prep | :surface_diag1 |
- tij_lk1 :
integer
Used by: | :ground_lk |
- tij_lk2 :
integer
Used by: | :ground_lk |
- tij_soil :
integer
Used by: | GHY_TRACERS |
- tij_snow :
integer
Used by: | GHY_TRACERS |
- tij_uflx :
integer
Used by: | :diagijt | :trdynam |
- tij_vflx :
integer
Used by: | :diagijt | :trdynam |
- tij_rvro :
integer
Used by: | :riverf |
- tij_icb :
integer
- taijn :
real*8, allocatable, dimension(:, :, :, :)
- lat/lon tracer diagnostics (all tracers)
Used by: | :diagijt | :gather_trdiag | :scatter_trdiag |
- tij_drydep :
integer
Used by: | :diagijt | :diagijt_prep | :surface | GHY_TRACERS |
- tij_gsdep :
integer
Used by: | :diagijt | :diagijt_prep | :surface | GHY_TRACERS |
- scale_tij :
real*8, allocatable, dimension(:, :)
- : printout scaling factor for tracer IJK diagnostics
Used by: | :diag_river | :diagijt | :diagijt_prep |
- taijn_loc :
real*8, allocatable, dimension(:, :, :, :)
Used by: | :condse | :diag_river | :diagijt_prep | :gather_trdiag | :ground_lk | :reset_trdiag | :riverf | :scatter_trdiag | :set_strattroptracer_diag | :surface | :surface_diag1 | :surface_diag1a | :tracea | :write_src_dist_data | GHY_TRACERS |
- units_tij :
character(len=units_strlen), allocatable, dimension(:, :)
- : Names and units of lat-sigma tracer diags
Used by: | :diag_river | :diagijt | :diagijt_prep |
- sname_tij :
character(len=sname_strlen), allocatable, dimension(:, :)
- : Names and units of lat-sigma tracer diags
Used by: | :diagijt | :diagijt_prep |
- denom_tij :
integer, allocatable, dimension(:, :)
- : Short names, indices of tij denominators.
Used by: | :diagijt |
- dname_tij :
character(len=sname_strlen), allocatable, dimension(:, :)
- : Short names, indices of tij denominators.
Used by: | :diagijt | :diagijt_prep |
- lname_tij :
character(len=lname_strlen), allocatable, dimension(:, :)
- : descriptions of tracer IJK diags
Used by: | :diagijt | :diagijt_prep |
- ijs_xxx :
- index for diags not specific to a certain tracer
- ktaijs :
integer, parameter
- number of special lat/lon tracer diagnostics
Initial Value= 6500
Used by: | :diagijt | :diagijt_prep |
- ijs_isoprene :
integer
Used by: | GHY_TRACERS:ghy_tracers_save_cell |
- ijs_no2_1030 :
integer
Used by: | :masterchem |
- ijs_no2_1030c :
integer
Used by: | :masterchem |
- ijs_no2_1330 :
integer
Used by: | :masterchem |
- ijs_no2_1330c :
integer
Used by: | :masterchem |
- ijts_sdrydep :
integer
Used by: | :surface |
- ijs_o3mass :
integer
Used by: | :masterchem |
- ijts_clrsky :
integer
- Initial Value
= 0
Used by: | :diagijt | :diagijt_prep |
- ijts_pocean :
integer
- Initial Value
= 0
Used by: | :diagijt | :diagijt_prep |
- ijts_sunlit_snow :
integer
- Initial Value
= 0
Used by: | :radia |
- maxsubcl :
integer, parameter
- Maximum number of sub classes of tracers for rad. diagnostics
Initial Value= 4
- maxdmc :
integer, parameter
- Maximum number of special wet depo diags for MC clouds
Initial Value= 6
- maxdls :
integer, parameter
- Maximum number of special wet depo diags for LS clouds
Initial Value= 6
- maxspec :
integer, parameter
- Maximum number special diagnostics not associated with specific
Initial Value= 3
- diag_rad :
integer
- switches on/off comprehensive radiative diags for tracers
Initial Value= 0
Used by: | :laterinittracermetadata | :radia | :set_diag_aod |
- diag_aod_3d :
integer
- outputs 3d aod and aaod (band6) for all-sky (=1),
Initial Value= 0
Used by: | :laterinittracermetadata | :radia |
- save_dry_aod :
integer
- outputs 2d dry aod for all bands.
Initial Value= 0
Used by: | :def_rsf_rad | :init_rad | :laterinittracermetadata | :new_io_rad | :radia | :set_diag_aod | :tijh_defs | :tijlh_defs |
- taijs :
real*8, allocatable, dimension(:, :, :)
- lat/lon special tracer diagnostics; sources, sinks, etc.
Used by: | :diagijt | :gather_trdiag | :scatter_trdiag |
- ijts_source :
integer, allocatable, dimension(:, :)
- tracer independent array for TAIJS surface src. diags
Used by: | :sum_prescribed_tracer_2dsources |
- taijs_loc :
real*8, allocatable, dimension(:, :, :)
Used by: | :collect_ocean_emissions | :diagijt_prep | :gather_trdiag | :masterchem | :radia | :reset_trdiag | :scatter_trdiag | :sum_prescribed_tracer_2dsources | :surface | :surface_diag1 | APPLY3D | GHY_TRACERS |
- ijts_isrc :
integer, allocatable, dimension(:, :)
- tracer independent array for TAIJS interactive srf. src.
Used by: | :collect_ocean_emissions | GHY_TRACERS |
- ijts_aq :
integer, allocatable, dimension(:, :)
- tracer independent array for TAIJS aqueous change
Used by: | :condse |
- ijts_alb :
integer, dimension(2)
- BC impact on snow/ice albedo, grain size,sw and lw radiation
Used by: | :radia |
- ijts_tau :
integer, allocatable, dimension(:, :)
- tracer independent array for TAIJS hydrated opt. thick.
Used by: | :radia | :set_diag_aod |
- ijts_tausub :
integer, allocatable, dimension(:, :, :)
- index for TAIJS opt. thick. for tracer sub classes
Used by: | :radia | :set_diag_aod |
- ijts_sqex :
integer, allocatable, dimension(:, :, :)
- index for TAIJS total extinction for 6 radiation bands
Used by: | :radia | :set_diag_aod |
- ijts_sqexsub :
integer, allocatable, dimension(:, :, :, :)
- index for TAIJS total extinction for 6 radiation bands for
Used by: | :radia | :set_diag_aod |
- ijts_sqsc :
integer, allocatable, dimension(:, :, :)
- index for TAIJS scattering extinction for 6 radiation bands
Used by: | :radia | :set_diag_aod |
- ijts_sqscsub :
integer, allocatable, dimension(:, :, :, :)
- index for TAIJS scattering extinction for 6 radiation
Used by: | :radia | :set_diag_aod |
- ijts_sqcb :
integer, allocatable, dimension(:, :, :)
- index for TAIJS sct asymmetry factor for 6 radiation bands
Used by: | :radia | :set_diag_aod |
- ijts_sqcbsub :
integer, allocatable, dimension(:, :, :, :)
- index for TAIJS sct asymmetry factor for 6 radiation bands
Used by: | :radia | :set_diag_aod |
- ijts_fc :
integer, allocatable, dimension(:, :)
- tracer independent array for TAIJS SW/LW rad. forcings
Used by: | :radia | :set_diag_rf |
- ijts_fcsub :
integer, allocatable, dimension(:, :, :)
- index for TAIJS SW/LW rad. forc. for tracer sub classes
Used by: | :radia | :set_diag_rf |
- ijts_spec :
integer, dimension(MaxSpec)
- index for TAIJS diags. not associated with single tracer
Used by: | GHY_TRACERS |
- ijts_gasex :
integer, allocatable, dimension(:, :)
- index for TAIJS associated with atm/oc gas exchange
- ijts_ampe :
integer, allocatable, dimension(:)
- tracer independent array for extra diadnostics
- ijts_ampp :
integer, allocatable, dimension(:, :)
- tracer independent array for AMP processes
- ijts_trdpmc :
integer, allocatable, dimension(:, :)
- indices of taijs special wet depo diags for MC clouds
Used by: | :condse |
- ijts_trdpls :
integer, allocatable, dimension(:, :)
- indices of taijs special wet depo diags for LS clouds
Used by: | :condse |
- ijts_wet :
integer, allocatable, dimension(:)
- tracer independent array for TAIJS wet depo diagnostics
- ijts_3dsource :
integer, allocatable, dimension(:, :)
- tracer independent array for TAIJS 3D src. diags
Used by: | APPLY3D |
- units_ijts :
character(len=units_strlen), dimension(ktaijs)
- : Names & units of lat-sigma tracer diags
Used by: | :diagijt | :diagijt_prep | :set_diag_aod | :set_diag_rf |
- sname_ijts :
character(len=sname_strlen), dimension(ktaijs)
- : Names & units of lat-sigma tracer diags
Used by: | :diagijt | :diagijt_prep | :set_diag_aod | :set_diag_rf |
- lname_ijts :
character(len=lname_strlen), dimension(ktaijs)
- : descriptions of tracer IJTS diags
Initial Value= 'unused'
Used by: | :diagijt | :diagijt_prep | :set_diag_aod | :set_diag_rf |
- denom_ijts :
integer, dimension(ktaijs)
- : Short names, indices of ijts denominators.
Initial Value= 0
Used by: | :diagijt | :diagijt_prep |
- dname_ijts :
character(len=sname_strlen), dimension(ktaijs)
- : Short names, indices of ijts denominators.
Initial Value= ''
Used by: | :diagijt_prep | :set_diag_aod | :set_diag_rf |
- scale_ijts :
real*8, dimension(ktaijs)
- : printout scaling factor for tracer IJTS diagnostics
Used by: | :diagijt | :diagijt_prep | :set_diag_aod | :set_diag_rf |
- ia_ijts :
integer, dimension(ktaijs)
- : idacc-number for tracer source/sink IJ diags
Used by: | :diagijt | :diagijt_prep | :set_diag_aod | :set_diag_rf |
- ijts_power :
integer, dimension(ktaijs)
- : power of 10 used for tracer IJ source/sink diags
Used by: | :set_diag_aod | :set_diag_rf |
- ijts_hasarea :
logical, dimension(ktaijs)
- : does accumulation need to be divided by grid area?
Used by: | :diagijt | :diagijt_prep | :set_diag_aod | :set_diag_rf |
- ktaijl :
integer, parameter
- number of TAIJLS tracer diagnostics;
Initial Value= 116 + 17
Used by: | :diagijlt | :diagijlt_prep |
- taijls :
real*8, allocatable, dimension(:, :, :, :)
- 3D tracer diagnostics (tracer dependent)
Used by: | :diagijlt | :gather_trdiag | :scatter_trdiag |
- sname_ijlt :
character(len=sname_strlen), dimension(ktaijl)
- : Names of 3D tracer IJL diagnostics
Used by: | :diagijlt | :diagijlt_prep |
- taijls_loc :
real*8, allocatable, dimension(:, :, :, :)
Used by: | :chemstep | :diagijlt_prep | :gather_trdiag | :get_lightning_nox | :masterchem | :nitrate_thermo_drv | :radia | :reset_trdiag | :scatter_trdiag | :tracea | :tracer_3dsource |
- denom_ijlt :
integer, dimension(ktaijl)
- : Short names, indices of taijls denominators.
Initial Value= 0
- dname_ijlt :
character(len=sname_strlen), dimension(ktaijl)
- : Short names, indices of taijls denominators.
Initial Value= ''
Used by: | :diagijlt_prep |
- units_ijlt :
character(len=units_strlen), dimension(ktaijl)
- : descriptions/units of 3D tracer diagnostics
Used by: | :diagijlt | :diagijlt_prep |
- lname_ijlt :
character(len=lname_strlen), dimension(ktaijl)
- : descriptions/units of 3D tracer diagnostics
Initial Value= 'unused'
Used by: | :diagijlt | :diagijlt_prep |
- scale_ijlt :
real*8, dimension(ktaijl)
- : printout scaling factor for 3D tracer diagnostics
Used by: | :diagijlt | :diagijlt_prep |
- ir_ijlt :
integer, dimension(ktaijl)
- : range index of IJL diagnostics
Used by: | :diagijlt | :diagijlt_prep |
- ia_ijlt :
integer, dimension(ktaijl)
- : accumulation index for IJL diagnostics
Used by: | :diagijlt | :diagijlt_prep |
- ijlt_power :
integer, dimension(ktaijs)
- : power of 10 used for tracer IJL 3D diags
- ijlt_xxx :
- diag names associated with 3D tracer special diags
- ijlt_ah2o :
integer
- aerosol H2O from thermodynamics (ug/m3)
Used by: | :nitrate_thermo_drv |
- ijlt_aph :
integer
- aerosol pH from thermodynamics (dimensionless)
Used by: | :nitrate_thermo_drv |
- ijlt_ohvmr :
integer
Used by: | :chemstep |
- ijlt_ohconc :
integer
Used by: | :chemstep |
- ijlt_no3 :
integer
Used by: | :masterchem |
- ijlt_ho2 :
integer
Used by: | :chemstep |
- ijlt_cop :
integer
Used by: | :chemstep | :masterchem |
- ijlt_cod :
integer
Used by: | :chemstep | :masterchem |
- ijlt_oxp :
integer
Used by: | :chemstep | :masterchem |
- ijlt_oxd :
integer
Used by: | :chemstep | :masterchem |
- ijlt_ch4d :
integer
Used by: | :chemstep |
- ijlt_oxpho2 :
integer
Used by: | :masterchem |
- ijlt_oxpch3o2 :
integer
Used by: | :masterchem |
- ijlt_oxpro2 :
integer
Used by: | :chemstep |
- ijlt_oxloh :
integer
Used by: | :masterchem |
- ijlt_oxlho2 :
integer
Used by: | :masterchem |
- ijlt_oxlalk :
integer
Used by: | :masterchem |
- ijlt_pho1d :
integer
- ijlt_po1d :
integer
Used by: | :masterchem |
- ijlt_poh :
integer
Used by: | :masterchem |
- ijlt_noxlgt :
integer
Used by: | :get_lightning_nox |
- ijlt_novmr :
integer
Used by: | :masterchem |
- ijlt_no2vmr :
integer
Used by: | :masterchem |
- ijlt_jo1d :
integer
Used by: | :masterchem |
- ijlt_jno2 :
integer
Used by: | :masterchem |
- ijlt_jh2o2 :
integer
Used by: | :masterchem |
- ijlt_prodso4aq :
integer
Used by: | :condse |
- ijlt_prodso4gs :
integer
Used by: | :tracer_3dsource |
- ijlt_o3ppbv :
integer
Used by: | :masterchem |
- ijlt_o3cmatm :
integer
Used by: | :masterchem |
- ijlt_clrsky2d :
integer
- Initial Value
= 0
Used by: | :diagijlt_prep |
- ijlt_airmass :
integer
- Initial Value
= 0
Used by: | :tracea |
- ijlt_3dtau :
integer, allocatable, dimension(:)
- 3D tracer independent array for all-sky hydrated opt. thick.
Used by: | :radia |
- ijlt_3dtaucs :
integer, allocatable, dimension(:)
- 3D tracer independent array for clear-sky hydrated opt. thick.
Used by: | :radia |
- ijlt_3dtaudry :
integer, allocatable, dimension(:)
- 3D tracer independent array for dry opt. thick.
Used by: | :radia |
- ijlt_3daaod :
integer, allocatable, dimension(:)
- 3D tracer independent array for all-sky hydrated absorption
Used by: | :radia |
- ijlt_3daaodcs :
integer, allocatable, dimension(:)
- 3D tracer independent array for clear-sky hydrated absorption
Used by: | :radia |
- ijlt_3daaoddry :
integer, allocatable, dimension(:)
- 3D tracer independent array for dry absorption
Used by: | :radia |
- ktajlx :
integer, parameter
- number of TAJL tracer diagnostics;
Initial Value= ktajl+2
- ktajl :
integer, parameter
- number of TAJL tracer diagnostics;
Initial Value= 10
- tajln :
real*8, allocatable, dimension(:, :, :, :)
- vertical tracer diagnostics (all tracers)
Used by: | :def_rsf_trdiag | :diagjlt | :diagjlt_prep | :gather_zonal_trdiag | :new_io_trdiag | :reset_trdiag | :scatter_zonal_trdiag |
- jlnt_xx :
- Names for TAJLN diagnostics
- tajln_loc :
real*8, allocatable, dimension(:, :, :, :)
Used by: | :gather_zonal_trdiag | :inc_tajln | :inc_tajln_column | :reset_trdiag | :scatter_zonal_trdiag | :tracea |
- sname_jln :
character(len=sname_strlen), allocatable, dimension(:, :)
- : Names of lat-sigma tracer JL diagnostics
Used by: | :diagjlt | :diagjlt_prep |
- jlnt_conc :
integer
Used by: | :diagjlt | :diagjlt_prep | :tracea |
- jlnt_mass :
integer
Used by: | :diagjlt | :diagjlt_prep | :tracea |
- jlnt_nt_tot :
integer
Used by: | :diagjlt | :diagjlt_prep | :trdynam |
- jlnt_nt_mm :
integer
Used by: | :diagjlt | :diagjlt_prep | :trdynam |
- jlnt_vt_tot :
integer
Used by: | :diagjlt | :diagjlt_prep | :trdynam |
- jlnt_vt_mm :
integer
Used by: | :diagjlt | :diagjlt_prep | :trdynam |
- jlnt_mc :
integer
Used by: | :condse | :diagjlt | :diagjlt_prep |
- jlnt_turb :
integer
Used by: | :atm_diffus | :diagjlt | :diagjlt_prep |
- jlnt_lscond :
integer
Used by: | :condse | :diagjlt | :diagjlt_prep |
- jlnt_bebe :
integer
- jlnt_bepb :
integer
- jlnt_cldh2o :
integer
Used by: | :diagjlt | :diagjlt_prep | :tracea |
- units_jln :
character(len=units_strlen), allocatable, dimension(:, :)
- : descriptions/units of tracer JL diagnostics
Used by: | :diagjlt | :diagjlt_prep |
- lname_jln :
character(len=lname_strlen), allocatable, dimension(:, :)
- : descriptions/units of tracer JL diagnostics
Used by: | :diagjlt | :diagjlt_prep |
- scale_jlq :
real*8, dimension(ktajlx)
- : printout scaling factor for tracer JL diagnostics
Used by: | :diagjlt | :diagjlt_prep |
- jgrid_jlq :
integer, dimension(ktajlx)
- : idacc-numbers,gridtypes for tracer JL diags
Used by: | :diagjlt | :diagjlt_prep |
- ia_jlq :
integer, dimension(ktajlx)
- : idacc-numbers,gridtypes for tracer JL diags
Used by: | :diagjlt | :diagjlt_prep |
- jlq_power :
integer, dimension(ktajlx)
- : power of 10 used for tracer JL diagnostics
Used by: | :diagjlt | :diagjlt_prep |
- scale_jln :
real*8, allocatable, dimension(:)
- : Scale for jl maps
Used by: | :diagjlt | :diagjlt_prep |
- ktajls :
integer, parameter
- number of source/sink TAJLS tracer diagnostics;
Initial Value= 1350
Used by: | :diagjlt | :diagjlt_prep |
- jls_xxx :
- index for non-tracer specific or special diags
- jls_ohconk :
integer
Used by: | :aerosol_gas_chem |
- jls_ho2con :
integer
Used by: | :aerosol_gas_chem |
- jls_no3 :
integer
Used by: | :aerosol_gas_chem |
- jls_o3vmr :
integer
Used by: | :masterchem |
- jls_phot :
integer
Used by: | :aerosol_gas_chem |
- jls_ohcon :
integer
Used by: | :aerosol_gas_chem | :chemstep |
- jls_h2omr :
integer
Used by: | :diagjlt |
- jls_n2o5sulf :
integer
Used by: | :crates | :masterchem |
- jls_day :
integer
Used by: | :chemstep | :diagjlt |
- jls_cod :
integer
Used by: | :chemstep | :masterchem |
- jls_cop :
integer
Used by: | :chemstep | :masterchem |
- jls_oxd :
integer
Used by: | :chemstep | :masterchem |
- jls_oxp :
integer
Used by: | :chemstep | :masterchem |
- jls_clocon :
integer
Used by: | :chemstep | :masterchem |
- jls_h2ocon :
integer
Used by: | :chemstep | :masterchem |
- jls_h2ochem :
integer
Used by: | :chemstep |
- jls_oxdt :
integer
Used by: | :chemstep | :masterchem |
- jls_oxpt :
integer
Used by: | :chemstep | :masterchem |
- tajls :
real*8, allocatable, dimension(:, :, :)
- JL special tracer diagnostics for sources, sinks, etc
Used by: | :def_rsf_trdiag | :diagjlt | :diagjlt_prep | :gather_zonal_trdiag | :new_io_trdiag | :reset_trdiag | :scatter_zonal_trdiag |
- jls_incloud :
integer, allocatable, dimension(:, :)
Used by: | :condse |
- jls_source :
integer, allocatable, dimension(:, :)
- tracer independent array for TAJLS surface src. diags
Used by: | :diagjlt | :diagjlt_prep | :sum_prescribed_tracer_2dsources |
- tajls_loc :
real*8, allocatable, dimension(:, :, :)
Used by: | :gather_zonal_trdiag | :inc_tajls | :inc_tajls2 | :inc_tajls2_column | :inc_tajls_column | :reset_trdiag | :scatter_zonal_trdiag |
- jls_isrc :
integer, allocatable, dimension(:, :)
- tracer indep. array for TAJLS interactive surface src. diags
Used by: | :collect_ocean_emissions | :surface_diag1 | GHY_TRACERS |
- jls_3dsource :
integer, allocatable, dimension(:, :)
- tracer independent array for TAJLS 3D source diags
Used by: | :diagjlt | :diagjlt_prep | APPLY3D |
- jls_decay :
integer, allocatable, dimension(:)
- tracer independent array for radioactive sinks
Used by: | :tdecay |
- jls_grav :
integer, allocatable, dimension(:)
- tracer independent array for grav. settling sink
Used by: | :trgrav |
- jls_prec :
integer, allocatable, dimension(:, :)
- tracer independent array for precipitation/wet dep
Used by: | :condse |
- jls_trdpmc14 :
- indices of tajls special wet depo diags for MC clouds
- jls_trdpls :
integer, allocatable, dimension(:, :)
- indices of tajls special wet depo diags for LS clouds
Used by: | :condse |
- jls_trdpmc :
integer, allocatable, dimension(:, :)
Used by: | :condse |
- jls_wet :
integer, allocatable, dimension(:)
- tracer independent array for wet deposition (for old dust)
- jls_spec :
integer, dimension(MaxSpec)
- single tracer
Used by: | GHY_TRACERS |
- jls_spec :
integer, dimension(MaxSpec)
- single tracer
Used by: | GHY_TRACERS |
- jwt_jls :
integer, dimension(ktajls)
- : Weighting index for jls diags 1=simple average, 2=by area
Used by: | :diagjlt | :diagjlt_prep |
- sname_jls :
character(len=sname_strlen), dimension(ktajls)
- : Names of lat-sigma tracer JL sources/sinks
Used by: | :diagjlt | :diagjlt_prep |
- units_jls :
character(len=units_strlen), dimension(ktajls)
- : descriptions/units of tracer JLS diags
Used by: | :diagjlt | :diagjlt_prep |
- lname_jls :
character(len=lname_strlen), dimension(ktajls)
- : descriptions/units of tracer JLS diags
Initial Value= 'unused'
Used by: | :diagjlt | :diagjlt_prep |
- scale_jls :
real*8, dimension(ktajls)
- : printout scaling factor for tracer JLS diagnostics
Used by: | :diagjlt | :diagjlt_prep |
- jgrid_jls :
integer, dimension(ktajls)
- : idacc-numbers,gridtypes for tracer JL diags
Used by: | :diagjlt | :diagjlt_prep |
- ia_jls :
integer, dimension(ktajls)
- : idacc-numbers,gridtypes for tracer JL diags
Used by: | :diagjlt | :diagjlt_prep |
- jls_power :
integer, dimension(ktajls)
- : power of 10 used for tracer JLS diagnostics
Used by: | :diagjlt | :diagjlt_prep |
- jls_ltop :
integer, dimension(ktajls)
- : Top layer for this diagnostic
Used by: | :diagjlt | :diagjlt_prep |
- ntcons :
integer, parameter
- Maximum Number of special tracer conservation points
Initial Value= 20
Used by: | :set_tcon | :tr_con_diag |
- npts_common :
integer, parameter
- total number of conservation diagnostics outside
Initial Value= npts+1
Used by: | :set_tcon | :tr_con_diag |
- ktcon :
integer, parameter
- total number of conservation diagnostics for tracers
Initial Value= npts_common+ntcons+1
Used by: | :diagtcp | :diagtcp_prep | :gather_zonal_tcons | :set_tcon |
- ntmxcon :
integer
- total number of conservation quantities
Used by: | :gather_zonal_tcons |
- tconsrv :
real*8, allocatable, dimension(:, :, :)
- conservation diagnostics for tracers
Used by: | :def_rsf_tcons | :diagtcp | :diagtcp_prep | :gather_zonal_tcons | :new_io_tcons | :reset_tcons | :scatter_zonal_tcons |
- qcon :
logical, dimension(KTCON-1)
Used by: | :tr_con_diag |
- qsum :
logical, dimension(KTCON-1)
Used by: | :tr_con_diag |
- scale_tcon :
real*8, allocatable, dimension(:, :)
- scales for tracer conservation diagnostics
Used by: | :diagtcp | :diagtcp_prep | :set_tcon |
- tconsrv_loc :
real*8, allocatable, dimension(:, :, :)
Used by: | :diagtca | :diagtcb | :gather_zonal_tcons | :inc_diagtcb | :reset_tcons | :scatter_zonal_tcons |
- title_tcon :
character*38, allocatable, dimension(:, :)
- titles for tracer conservation diagnostics
Used by: | :diagtca | :diagtcb | :diagtcp | :diagtcp_prep | :set_tcon |
- ia_tcon :
integer, allocatable, dimension(:, :)
- IDACC numbers for tracer conservation diagnostics
Used by: | :diagtcp | :diagtcp_prep | :gather_zonal_tcons | :set_tcon |
- nsum_tcon :
integer, allocatable, dimension(:, :)
- indices for summation of conservation diagnostics
Used by: | :diagtcp | :diagtcp_prep | :set_tcon |
- nofmt :
integer, allocatable, dimension(:, :)
- indices for TCONSRV array
Used by: | :diagtca | :diagtcb | :diagtcp | :inc_diagtcb | :set_tcon |
- conpts :
character*16, dimension(ntcons)
- names of special processes for tracer conservation diags
Initial Value= ''
Used by: | :tr_con_diag |
- kt_power_change :
integer, allocatable, dimension(:)
- : Exponents for tracer conservation
- kt_power_inst :
integer, allocatable, dimension(:)
- : Exponents for tracer conservation
- units_tconsrv :
character(len=units_strlen), allocatable, dimension(:, :)
- : for tracer conservation
Used by: | :diagtcp | :set_tcon |
- lname_tconsrv :
character(len=lname_strlen), allocatable, dimension(:, :)
- : for tracer conservation
Used by: | :diagtcp | :set_tcon |
- name_tconsrv :
character(len=sname_strlen), allocatable, dimension(:, :)
- : for tracer conservation
Used by: | :diagtcp | :diagtcp_prep | :set_tcon |
- scale_change :
real*8, allocatable, dimension(:)
- : Scale factors for tracer conservation
- scale_inst :
real*8, allocatable, dimension(:)
- : Scale factors for tracer conservation
- itcon_surf :
integer, allocatable, dimension(:, :)
- Index array for surface source/sink conservation diags
Used by: | :collect_ocean_emissions | :sum_prescribed_tracer_2dsources | GHY_TRACERS |
- itcon_3dsrc :
integer, allocatable, dimension(:, :)
- Index array for 3D source/sink conservation diags
Used by: | APPLY3D |
- itcon_decay :
integer, allocatable, dimension(:)
- Index array for decay conservation diags
Used by: | :tdecay |
- itcon_mc :
integer, allocatable, dimension(:)
- Index array for moist convection conserv. diags
Used by: | :condse |
- itcon_ss :
integer, allocatable, dimension(:)
- Index array for large-scale condensation conserv. diags
- itcon_amp :
integer, allocatable, dimension(:, :)
- Index array for microphysical processes diags
- itcon_amp :
integer, allocatable, dimension(:, :)
- Index array for microphysical processes diags
- itcon_amp :
integer, allocatable, dimension(:, :)
- Index array for microphysical processes diags
- itcon_ampe :
integer, allocatable, dimension(:)
- itcon_dd :
integer, allocatable, dimension(:, :)
- Index array for dry deposition conserv. diags
Used by: | :surface | GHY_TRACERS |
- itcon_ampm :
integer, allocatable, dimension(:, :)
- itcon_wt :
integer, allocatable, dimension(:)
- Index array for dust/mineral dust deposition conserv. diags
- nocntrcons :
integer
- number of atmospheric/ocean tcon diags
Initial Value= 0
Used by: | :diagtcp | :diagtcp_prep |
- natmtrcons :
integer
- number of atmospheric/ocean tcon diags
Initial Value= 0
Used by: | :diagtcp | :diagtcp_prep |
- maxntm_extra :
integer, parameter
- maximum number of extra tracers in tconsrv
Initial Value= 0 +3
- pdsigjl :
real*8, dimension(jm, lm)
- temporary storage for mean pressures for jl diags
Used by: | :diagjlt | :jlmap_t |
- tre_acc :
real*8, allocatable, dimension(:, :, :), public
- accumulation arrays for some SUBDD diags
Used by: | GHY_TRACERS |
- trp_acc :
real*8, allocatable, dimension(:, :, :), public
- accumulation arrays for some SUBDD diags
Used by: | :condse |
- trcsurf :
real*8, allocatable, dimension(:, :, :)
- global array of tracer mixing ratio at surface [kg/kg]
Used by: | :accumcachedtracersubdds | :surface | :surface_diag1 | GHY_TRACERS | TRDUST_DRV |
- trcsurfbyvol :
real(kind=8), allocatable, dimension(:, :, :)
- global array of tracer concentration at surface [kg/m^3]
Used by: | :accumcachedtracersubdds | :surface | :surface_diag1 | GHY_TRACERS | TRDUST_DRV |
- trcsurfmixr_acc :
real(kind=8), allocatable, dimension(:, :, :)
- global array of tracers to accumulate mxixing ratio at
Used by: | :tracerio |
- surface :
- for subdd diagnostics [kg/m^3]
- trcsurfbyvol_acc :
real(kind=8), allocatable, dimension(:, :, :)
- global array of tracers to accumulate concentration at
Used by: | :tracerio |
- surface :
- for subdd diagnostics [kg/m^3]
- taijl_out :
real*8, dimension(:, :, :, :), allocatable
- combines taijln and taijls. Distributed.
Used by: | :diagijlt_prep |
- taij_out :
real*8, dimension(:, :, :), allocatable
- combines taijn and taijs. Distributed.
Used by: | :diagijt_prep |
- tajl_out :
real*8, dimension(:, :, :), allocatable
- combines tajln and tajls.
Used by: | :diagjlt_prep |
- tconsrv_out :
real*8, dimension(:, :), allocatable
- combines the ktcon/ntmxcon dims of tconsrv
Used by: | :def_rsf_tcons | :diagtcp_prep | :new_io_tcons |
- maxntm :
integer, parameter
- Initial Value
= 1000
- ktaij_ :
integer, parameter
- Initial Value
= (ktaij*MAXNTM+ktaijs + MAXNTM )
Used by: | :diagijt_prep |
- ktaij_out :
integer
Used by: | :diagijt_prep |
- ir_taij :
integer, dimension(ktaij_)
Used by: | :diagijt_prep |
- ia_taij :
integer, dimension(ktaij_)
Used by: | :diagijt_prep |
- denom_taij :
integer, dimension(ktaij_)
Used by: | :diagijt_prep |
- lname_taij :
character(len=lname_strlen), dimension(ktaij_)
Used by: | :diagijt_prep |
- sname_taij :
character(len=sname_strlen), dimension(ktaij_)
Used by: | :diagijt_prep |
- units_taij :
character(len=units_strlen), dimension(ktaij_)
Used by: | :diagijt_prep |
- scale_taij :
real*8, dimension(ktaij_)
Used by: | :diagijt_prep |
- cdl_taij :
type(cdl_type)
Used by: | :diagijt_prep |
- cdl_taij_latlon :
type(cdl_type)
Used by: | :diagijt_prep |
- hemis_taij :
real*8, dimension(:, :, :), allocatable
Used by: | :diagijt_prep |
- ktaijl_ :
integer
Used by: | :diagijlt_prep |
- ktaijl_out :
integer
Used by: | :diagijlt_prep |
- ir_taijl :
integer, allocatable, dimension(:)
Used by: | :diagijlt_prep |
- ia_taijl :
integer, allocatable, dimension(:)
Used by: | :diagijlt_prep |
- denom_taijl :
integer, allocatable, dimension(:)
Used by: | :diagijlt_prep |
- lname_taijl :
character(len=lname_strlen), allocatable, dimension(:)
Used by: | :diagijlt_prep |
- sname_taijl :
character(len=sname_strlen), allocatable, dimension(:)
Used by: | :diagijlt_prep |
- units_taijl :
character(len=units_strlen), allocatable, dimension(:)
Used by: | :diagijlt_prep |
- scale_taijl :
real*8, allocatable, dimension(:)
Used by: | :diagijlt_prep |
- cdl_taijl :
type(cdl_type)
Used by: | :diagijlt_prep |
- cdl_taijl_latlon :
type(cdl_type)
Used by: | :diagijlt_prep |
- ktajl_ :
integer
Used by: | :diagjlt_prep |
- ktajl_out :
integer
Used by: | :diagjlt_prep |
- pow_tajl :
integer, allocatable, dimension(:)
Used by: | :diagjlt_prep |
- ia_tajl :
integer, allocatable, dimension(:)
Used by: | :diagjlt_prep |
- denom_tajl :
integer, allocatable, dimension(:)
Used by: | :diagjlt_prep |
- jgrid_tajl :
integer, allocatable, dimension(:)
Used by: | :diagjlt_prep |
- lgrid_tajl :
integer, allocatable, dimension(:)
Used by: | :diagjlt_prep |
- ltop_tajl :
integer, allocatable, dimension(:)
Used by: | :diagjlt_prep |
- lname_tajl :
character(len=lname_strlen), allocatable, dimension(:)
Used by: | :diagjlt_prep |
- sname_tajl :
character(len=sname_strlen), allocatable, dimension(:)
Used by: | :diagjlt_prep |
- units_tajl :
character(len=units_strlen), allocatable, dimension(:)
Used by: | :diagjlt_prep |
- scale_tajl :
real*8, allocatable, dimension(:)
Used by: | :diagjlt_prep |
- cdl_tajl :
type(cdl_type)
Used by: | :diagjlt_prep |
- hemis_tajl :
real*8, dimension(:, :, :), allocatable
Used by: | :diagjlt_prep |
- vmean_tajl :
real*8, dimension(:, :, :), allocatable
Used by: | :diagjlt_prep |
- ktcon_out :
integer
Used by: | :diagtcp_prep |
- hemis_tconsrv :
real*8, dimension(:, :), allocatable
Used by: | :diagtcp_prep |
- scale_tcon_out :
real*8, dimension(:), allocatable
Used by: | :diagtcp_prep |
- ia_tcon_out :
integer, dimension(:), allocatable
Used by: | :diagtcp_prep |
- sname_tconsrv_out :
character(len=sname_strlen), dimension(:), allocatable
Used by: | :diagtcp_prep |
- cdl_tconsrv :
type(cdl_type)
Used by: | :diagtcp_prep |