Index | Rundeck: E6TomaF40 | Created: Fri May 17 03:30:39 EDT 2024 |
tracer_ic | Module: | File: TRACERS_DRV.f |
Author : Jean Lerner
Version:
Declaration:
subroutine tracer_ic
- am_i_root : used from domain_decomp_atm
- readt_parallel : used from domain_decomp_atm
- readt8_column : used from domain_decomp_atm
- skip_parallel : used from domain_decomp_atm
- get_param : used from dictionary_mod
- is_set_param : used from dictionary_mod
- atmocn : used from fluxes
- atmice : used from fluxes
- atmglas : used from fluxes
- atmlnd : used from fluxes
- atmsrf : used from fluxes
- asflx : used from fluxes
- mair : used from constant
- rhow : used from constant
- grav : used from constant
- tf : used from constant
- avog : used from constant
- rgas : used from constant
- seconds_per_day : used from timeconstants_mod
- im : used from resolution
- jm : used from resolution
- lm : used from resolution
- ls1 : used from resolution
- Initial Value
= >ls1_nominal
- q : used from atm_com
- qcl : used from atm_com
- qci : used from atm_com
- modeleclock : used from model_com
- itime : used from model_com
- dtsrc : used from model_com
- itimei : used from model_com
- pmidl00 : used from atm_com
- grid : used from domain_decomp_atm
- getdomainbounds : used from domain_decomp_atm
- write_parallel : used from domain_decomp_atm
- qmom : used from somtq_com
- mz : used from somtq_com
- mzz : used from somtq_com
- trname : used from oldtracer_mod
- itime_tr0 : used from oldtracer_mod
- vol2mass : used from oldtracer_mod
- tr_mm : used from oldtracer_mod
- trsi0 : used from oldtracer_mod
- needtrs : used from oldtracer_mod
- set_itime_tr0 : used from oldtracer_mod
- ntm : used from tracer_com
- trm : used from tracer_com
- trmom : used from tracer_com
- tracers : used from tracer_com
- trw0 : used from oldtracer_mod
- tr_wd_type : used from oldtracer_mod
- nwater : used from oldtracer_mod
- trwm : used from tracer_com
- n_hdo : used from tracer_com
- n_h2o18 : used from tracer_com
- n_ocii : used from tracer_com
- ace1li : used from landice
- ace2li : used from landice
- trsnowli : used from landice_com
- trlndi : used from landice_com
- trlake : used from lakes_com
- tr_w_ij : used from ghy_com
- tr_wsn_ij : used from ghy_com
- snowli : used from landice_com
- si_atm : used from seaice_com
- si_ocn : used from seaice_com
- mwl : used from lakes_com
- mldlk : used from lakes_com
- flake : used from lakes_com
- w_ij : used from ghy_com
- wsn_ij : used from ghy_com
- nsn_ij : used from ghy_com
- fr_snow_ij : used from ghy_com
- fearth : used from ghy_com
- flice : used from fluxes
- focean : used from fluxes
- axyp : used from geom
- byaxyp : used from geom
- lat2d_dg : used from geom
- lonlat_to_ij : used from geom
- ma : used from atm_com
- byma : used from atm_com
- npbl : used from pblcom
- openunit : used from filemanager
- closeunit : used from filemanager
- nameunit : used from filemanager
- chem_tracer_save : used from rad_com
- rad_to_file : used from rad_com
- ghg_yr : used from rad_com
- strato3_tracer_save : used from rad_com
- o3mult : used from trchem_shindell_com
- ch4icx : used from trchem_shindell_com
- oxic : used from trchem_shindell_com
- coic : used from trchem_shindell_com
- byo3mult : used from trchem_shindell_com
- pi_run : used from trchem_shindell_com
- fix_ch4_chemistry : used from trchem_shindell_com
- piratio_n : used from trchem_shindell_com
- piratio_co_t : used from trchem_shindell_com
- piratio_co_s : used from trchem_shindell_com
- piratio_other : used from trchem_shindell_com
- use_rad_n2o : used from trchem_shindell_com
- use_rad_cfc : used from trchem_shindell_com
- use_rad_ch4 : used from trchem_shindell_com
- cloxalt : used from trchem_shindell_com
- broxalt : used from trchem_shindell_com
- clono2alt : used from trchem_shindell_com
- hclalt : used from trchem_shindell_com
- n2oicx : used from trchem_shindell_com
- cfcic : used from trchem_shindell_com
- piratio_n2o : used from trchem_shindell_com
- piratio_cfc : used from trchem_shindell_com
- gltic : used from tracer_sources
- om2oc : used from oldtracer_mod
- dmsinput : used from aerosol_sources
- so2_src_3d : used from aerosol_sources
- iso2volcano : used from aerosol_sources
- hbaij : used from trdust_mod
- ricntd : used from trdust_mod
- tracer_ic_soildust : used from trdust_drv
- trli0 : used from oldtracer_mod
- n_ocii : used from tracer_com
- src_dist_base : used from oldtracer_mod
- src_dist_index : used from oldtracer_mod
- xyztr : used from tracer_com
- d18ot_slope :
real*8, parameter
- Initial Value
= 0.45
- tracert0 :
real*8, parameter
- Initial Value
= 25
- i :
integer
- n :
integer
- l :
integer
- j :
integer
- iu_data :
integer
- ipbl :
integer
- it :
integer
- lr :
integer
- m :
integer
- ls :
integer
- lt :
integer
- ipatch :
integer
- title :
character*80
- out_line :
character*300
- cfc11ic :
real*8
- conv :
real*8
- trinit :
real*8
- Initial Value
= 1.
- tmominit :
real*8
- Initial Value
= 0.
- tracerts :
real*8
- co2ic :
real*8, dimension(grid%i_strt_halo:grid%i_stop_halo, grid%j_strt_halo:grid%j_stop_halo, lm)
- ic14co2 :
real*8, dimension(grid%i_strt:grid%i_stop, grid%j_strt:grid%j_stop, lm)
- n2oic :
real*4, dimension(jm, lm)
- ch4ic :
real*8, dimension(grid%j_strt_halo:grid%j_stop_halo, lm)
- bymair :
real*8, parameter
- 1/molecular wt. of air = 1/mair
Initial Value= 1.d0/mair
- byjm :
real*8, parameter
- 1./JM
Initial Value= 1.d0/JM
- get_atmco2 :
real*8
- ghg_name :
character*4
- ghg_file :
character*80
- imonth :
integer
- dummy index for choosing the right month
- icfactor :
real*8
- varying factor for altering initial conditions
- dicfactor :
real*8
- varying factor for altering initial conditions of dCO tracers
- ghg_in :
real*8, dimension(lm, grid%i_strt_halo:grid%i_stop_halo, grid%j_strt_halo:grid%j_stop_halo)
- j2 :
integer
- pres :
real*8, dimension(lm)
- local nominal pressure for vertical interpolations
- start :
integer, dimension(3)
- count :
integer, dimension(3)
- status :
integer
- ncidu :
integer
- id1 :
integer
- ii :
integer
- jj :
integer
- ir :
integer
- mm :
integer
- iuc :
integer
- mmm :
integer
- ll :
integer
- iudms :
integer
- iuc2 :
integer
- lmax :
integer
- volc_lons :
real*8, dimension(Im)
- volc_lats :
real*8, allocatable, dimension(:)
- volc_pup :
real*8, allocatable, dimension(:, :)
- volc_emiss :
real*8, allocatable, dimension(:, :)
- x1d :
real*8, dimension(lm)
- amref :
real*8, dimension(lm)
- pednref :
real*8, dimension(lm+1)
- amsum :
real*8
- psref :
real*8, allocatable, dimension(:, :)
- iu_ps :
integer
- file_id :
integer
- vid :
integer
- ilon :
integer
- jlat :
integer
- volc_ij :
integer, dimension(2)
- j_0 :
integer
- j_1 :
integer
- i_0 :
integer
- i_1 :
integer
- j_0h :
integer
- j_1h :
integer
- have_south_pole :
logical
- have_north_pole :
logical
- initial_ghg_setup :
integer
- lat_val :
integer
- name :
character(len=:), allocatable