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

diagcp

Module: DIAG_SERIAL
File: DIAG_PRT.f
Summary: DIAGCP produces tables of the conservation diagnostics
Author : Gary Russell/Gavin Schmidt
Version:

Declaration:
Variables:
grid : used from domain_decomp_atm

modeleclock : used from model_com

idacc : 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

areag : used from geom

wtj : used from geom

fim : used from diag_com

qdiag : used from diag_com

consrv : used from diag_com

kcon : used from diag_com

scale_con : used from diag_com

title_con : used from diag_com

nsum_con : used from diag_com

ia_con : used from diag_com

kcmx : used from diag_com

inc : used from diag_com
Initial Value = >incj
ia_inst : used from diag_com

name_consrv : used from diag_com

lname_consrv : used from diag_com

units_consrv : used from diag_com

jm : used from diag_com
Initial Value = >jm_budg
dxyp_budg : used from diag_com

lat_budg : used from diag_com

jeq : used from gc_com

xwon : used from diag_zonal

acc_period : used from mdiag_com

sname_strlen : used from mdiag_com

units_strlen : used from mdiag_com

lname_strlen : used from mdiag_com

csj : real*8, dimension(jm, kcmx)

marea : integer, dimension(jm)

fglob : real*8, dimension(kcon)

fhem : real*8, dimension(2, kcon)

mlat : integer, dimension(jm, kcon)

cnslat : real*8, dimension(jm+3, kcon)

hemis : character*4, parameter, dimension(2)
Initial Value = (/' SH ',' NH '/)
dash : character*4, parameter
Initial Value = ('----')
j : integer

jhemi : integer

jnh : integer

jp1 : integer

jpm : integer

jv1 : integer

jvm : integer

jx : integer

n : integer

n1 : integer

aglob : real*8

ahem : real*8

days : real*8

titleo : character*38, dimension(kcon)

year : integer

hour : integer

date : integer

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

Contact GISS NASA Privacy PolicyAccessibility