IndexRundeck: P1SoM40Created: Thu May 9 03:30:17 EDT 2024

diagij

Module: DIAG_SERIAL
File: DIAG_PRT.f
Summary: DIAGIJ produces lat-lon fields as maplets (6/page) or full-page digital maps, and binary (netcdf etc) files (if qdiag=true)
Author : Gary Russell,Reto Ruedy
Version:

Declaration:
Variables:
sha : used from constant

teeny : used from constant

grid : used from domain_decomp_atm

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

ido_gwdrag : used from dynamics

cloud_rad_forc : used from rad_com

aer_rad_forc : used from rad_com

flake : used from lakes_com

dxv : used from geom

agc : used from gc_com

acc_period : used from mdiag_com

sname_strlen : used from mdiag_com

units_strlen : used from mdiag_com

lname_strlen : used from mdiag_com

qk : logical, dimension(kaij)
: if Qk(k)=.true. field k still has to be processed
iord : integer, dimension(kaij+10)
: Index array, fields are processed in order Iord(k), k=1,2,..
nmaplets : integer

nmaps : integer

kmaplets : integer

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

smapj : real*8, dimension(jm)

name : character(len=sname_strlen)

units : character(len=units_strlen)

lname : character(len=lname_strlen)

line : character*133, dimension(53)
virtual half page (with room for overstrikes)
xlb : character

qiij : logical

i : integer

j : integer

k : integer

l : integer

m : integer

n : integer

kcolmn : integer

nlines : integer

igrid : integer

jgrid : integer

irange : integer

iu_iij : integer

koff : integer

days : real*8

znde16 : real*8

dpti : real*8

pvti : real*8

gm : real*8

de4ti : real*8

bydpk : real*8

szndeg : real*8

year : integer

hour : integer

date : integer

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

Contact GISS NASA Privacy PolicyAccessibility