IndexRundeck: E6TomaF40Created: Fri May 17 03:30:39 EDT 2024

tracer_ic

Module:
File: TRACERS_DRV.f
Summary: tracer_IC initializes tracers when they are first switched on
Author : Jean Lerner
Version:

Declaration:
Variables:
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

Simplex Website Curator: Igor Aleinov — NASA Official: Gavin A. Schmidt

Contact GISS NASA Privacy PolicyAccessibility