Index

Rundeck: E6TomaF40

Created: Fri May 17 03:30:39 EDT 2024

diagijt

Module:

File: TRACER_PRT.f

Summary: DIAGIJt produces lat-lon fields as maplets (6/page) or full-page digital maps, and binary (netcdf etc) files (if qdiag=true)
Author : Kelley postprocessing decisions use predeclared metadata
Version:

---

Declaration:

subroutine diagijt

Variables:

im : used from resolution

jm : used from resolution

lm : used from resolution

modeleclock : used from model_com

jhour0 : used from model_com

jdate0 : used from model_com

amon : used from model_com

amon0 : used from model_com

jyear0 : used from model_com

nday : used from model_com

itime : used from model_com

itime0 : used from model_com

xlabel : used from model_com

lrunid : used from model_com

idacc : used from model_com

dodrydep : used from oldtracer_mod

dowetdep : used from oldtracer_mod

trname : used from oldtracer_mod

trw0 : used from oldtracer_mod

src_dist_index : used from oldtracer_mod

ntm : used from tracer_com

n_water : used from tracer_com

ij_cldcv : used from diag_com_rad

taijn : used from trdiag_com

taijs : used from trdiag_com

sname_tij : used from trdiag_com

lname_tij : used from trdiag_com

units_tij : used from trdiag_com

scale_tij : used from trdiag_com

tij_mass : used from trdiag_com

lname_ijts : used from trdiag_com

sname_ijts : used from trdiag_com

units_ijts : used from trdiag_com

scale_ijts : used from trdiag_com

ia_ijts : used from trdiag_com

ktaij : used from trdiag_com

ktaijs : used from trdiag_com

tij_drydep : used from trdiag_com

tij_gsdep : used from trdiag_com

tij_surf : used from trdiag_com

tij_grnd : used from trdiag_com

tij_prec : used from trdiag_com

tij_uflx : used from trdiag_com

tij_vflx : used from trdiag_com

ijts_hasarea : used from trdiag_com

denom_ijts : used from trdiag_com

ijts_clrsky : used from trdiag_com

ijts_pocean : used from trdiag_com

denom_tij : used from trdiag_com

dname_tij : used from trdiag_com

to_per_mil : used from trdiag_com

maptxt : used from diag_serial

teeny : used from constant

acc_period : used from mdiag_com

sname_strlen : used from mdiag_com

units_strlen : used from mdiag_com

lname_strlen : used from mdiag_com

maxntm : integer, parameter

Initial Value = 1000

qk : logical, dimension(ktmax)

: if Qk(k)=.true. field k still has to be processed

ktmax : integer, parameter

Initial Value = ktaij*MAXNTM+ktaijs + MAXNTM

iord : integer, dimension(ktmax)

: Index array, fields are processed in order Iord(k), k=1,2,..

nmaplets : integer

ijtype : integer, dimension(ktmax)

irange : integer, dimension(ktmax)

iacc : integer, dimension(ktmax)

lname : character(len=lname_strlen), dimension(ktmax)

name : character(len=sname_strlen), dimension(ktmax)

units : character(len=units_strlen), dimension(ktmax)

scale : real*8, dimension(ktmax)

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

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

smap : real*8, dimension(im, jm)

smapj : real*8, dimension(jm)

line : character*133, dimension(53)

virtual half page (with room for overstrikes)

xlb : character

i : integer

j : integer

k : integer

kx : integer

kd : integer

l : integer

n : integer

nd : integer

kcolmn : integer

nlines : integer

jgrid : integer

n1 : integer

n2 : integer

days : real*8

gm : real*8

year : integer

hour : integer

date : integer