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

diag_river

Module:
File: LAKES.f
Summary: (now parallel)
Author : Gavin Schmidt
Version:

Declaration:
Variables:
rhow : used from constant

teeny : used from constant

undef : used from constant

im : used from resolution

jm : used from resolution

modeleclock : used from model_com

jyear0 : used from model_com

amon0 : used from model_com

jdate0 : used from model_com

jhour0 : used from model_com

amon : used from model_com

itime : used from model_com

dtsrc : used from model_com

idacc : used from model_com

itime0 : used from model_com

nday : used from model_com

calendar : used from model_com

int_months_per_year : used from timeconstants_mod

grid : used from domain_decomp_atm

write_parallel : used from domain_decomp_atm

am_i_root : used from domain_decomp_atm

getdomainbounds : used from domain_decomp_atm

sumxpe : used from domain_decomp_atm

byaxyp : used from geom

aij : used from diag_com
Initial Value = >aij_loc
ij_mrvr : used from diag_com

trname : used from oldtracer_mod

trw0 : used from oldtracer_mod

itime_tr0 : used from oldtracer_mod

tr_wd_type : used from oldtracer_mod

nwater : used from oldtracer_mod

ntm : used from tracer_com

n_water : used from tracer_com

taijn : used from trdiag_com
Initial Value = >taijn_loc
tij_rvr : used from trdiag_com

to_per_mil : used from trdiag_com

units_tij : used from trdiag_com

scale_tij : used from trdiag_com

irvrmth : used from lakes_com

jrvrmth : used from lakes_com

namervr : used from lakes_com

nrvr : used from lakes_com

rvrout : real*8, dimension(NRVR)

rvrout_root : real*8, dimension(NRVR)

scalervr : real*8

days : real*8

inm : integer

i : integer

n : integer

j : integer

increment : logical

out_line : character(len=300)
local variable to hold mixed-type output for parallel I/O
trvrout : real*8, dimension(NRVR, NTM)

i_0 : integer

i_1 : integer

j_0 : integer

j_1 : integer

year : integer

hour : integer

date : integer

secondsperyear : type(rational)

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

Contact GISS NASA Privacy PolicyAccessibility