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

get_o3_offline

Module:
File: TRACERS_AEROSOLS_Koch_e4.f
Summary: read in ozone fields for aqueous oxidation
Author :
Version:

Declaration:
Variables:
lm : used from resolution

modeleclock : used from model_com

openunit : used from filemanager

closeunit : used from filemanager

o3_offline : used from aerosol_sources

grid : used from domain_decomp_atm

getdomainbounds : used from domain_decomp_atm

write_parallel : used from domain_decomp_atm

nmons : integer, parameter
: number of monthly input files
Initial Value = 1
levo3 : integer, parameter
Initial Value = 23
mon_units : integer, dimension(nmons)

imon : integer, dimension(nmons)

i : integer

j : integer

k : integer

l : integer

jdlast : integer
Initial Value = 0
ifirst : logical
Initial Value = .true.
title : character*80

out_line : character(len=300)

mon_files : character*10, dimension(nmons)
Initial Value = (/'O3_FIELD'/)
mon_bins : logical, dimension(nmons)
Initial Value = (/.true./)
frac : real*8

src : real*8, dimension(grid%i_strt_halo:grid%i_stop_halo, grid%j_strt_halo:grid%j_stop_halo, levo3, 1)

tlca : real*8, allocatable, dimension(:, :, :, :)

tlcb : real*8, allocatable, dimension(:, :, :, :)

j_1 : integer

j_0 : integer

j_0h : integer

j_1h : integer

i_0h : integer

i_1h : integer

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

Contact GISS NASA Privacy PolicyAccessibility