Index

Rundeck: P1SoM40

Created: Thu May 9 03:30:17 EDT 2024

diagdh

Module: DIAG_SERIAL

File: DIAG_PRT.f

Summary: DIAGDH prints out hourly diurnal cycle diagnostics It uses the same quantities as DIAGHH and shares some arrays When radiation is not called every hour this will not average exactly to same numbers as in DIAGDD.
Author : J. Lerner
Version:

---

Declaration:

subroutine diagdh

Variables:

hours_per_day : used from timeconstants_mod

modeleclock : used from model_com

nday : used from model_com

calendar : used from model_com

idacc : used from model_com

jdate0 : used from model_com

amon : used from model_com

amon0 : used from model_com

jyear0 : used from model_com

xlabel : used from model_com

lrunid : used from model_com

kdiag : used from diag_com

qdiag : used from diag_com

units_dd : used from diag_com

hr_in_month : used from diag_com

hdiurn : used from diag_com

ijdd : used from diag_com

namdd : used from diag_com

ndiuvar : used from diag_com

hr_in_day : used from diag_com

scale_dd : used from diag_com

lname_dd : used from diag_com

name_dd : used from diag_com

denom_dd : used from diag_com

ia_12hr : used from diag_com

ndiupt : used from diag_com

acc_period : used from mdiag_com

xhour : real*8, dimension(hr_in_month)

mhour : integer, dimension(hr_in_month)

i : integer

ih : integer

ih0 : integer

iregf : integer

iregl : integer

is : integer

jd : integer

jdayofm : integer

k : integer

kp : integer

kq : integer

kr : integer

ndays : integer

kf : integer

kndiu : integer

kr1 : integer

kr2 : integer

unitso : character*16, dimension(ndiuvar)

lnameo : character*16, dimension(ndiuvar)

snameo : character*16, dimension(ndiuvar)

fhour : real*8, dimension(hr_in_month, ndiuvar)

cpout : character

year : integer

month : integer

date : integer

cmonth : type(calendarmonth)