A.2. Subroutines versus Variables modified (not declared in Common)

 

-----------------------------------------------------------

Module: a3e0 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

j int*4

-----------------------------------------------------------

Module: a3e2 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

j int*4

-----------------------------------------------------------

Module: acctimes Source File: model/rtimh.f

 

crtimes char array size:800

ii int*4

ip int*4

jp int*4

kp int*4

ncall int*4

rtimes real*4 array size:400

sumtime real*4

wtimes real*4 array size:400

-----------------------------------------------------------

Module: accum Source File: lib/rnumr.f

 

arr1 real*4 dummy array size:4

n int*4

-----------------------------------------------------------

Module: acnst Source File: lib/rnumr.f

 

a real*4 dummy array size:4

nn int*4

-----------------------------------------------------------

Module: adivb Source File: lib/rnumr.f

 

c real*4 dummy array size:4

nn int*4

-----------------------------------------------------------

Module: adj1 Source File: model/mic_misc.f

 

cap real*4 dummy array

ccp real*4 dummy array

cgp real*4 dummy array

chp real*4 dummy array

cpp real*4 dummy array

crp real*4 dummy array

csp real*4 dummy array

frac real*4

i int*4

j int*4

k int*4

rap real*4 dummy array

rcp real*4 dummy array

rgp real*4 dummy array

rhp real*4 dummy array

rpp real*4 dummy array

rrp real*4 dummy array

rsp real*4 dummy array

rtp real*4 dummy array

vctr1 real*4 dummy array

vctr2 real*4 dummy array

vctr3 real*4 dummy array

vctr4 real*4 dummy array

vctr5 real*4 dummy array

vctr6 real*4 dummy array

vctr7 real*4 dummy array

vctr9 real*4 dummy array

-----------------------------------------------------------

Module: advance Source File: model/rtimi.f

 

mxyzp int*4

n int*4

-----------------------------------------------------------

Module: advect Source File: model/radvn.f

 

a real*4 dummy array

atypeh char*2

atypev char*2

i int*4

iadvar int*4

iadvaru int*4

iadvarv int*4

iadvarw int*4

iscx int*4

iux int*4

ivx int*4

iwflg int*4

iwx int*4

ka int*4

kz int*4

mxyzp int*4

n int*4

ncall int*4 array size:32

-----------------------------------------------------------

Module: advtnd Source File: model/radvn.f

 

dtli real*4

i int*4

j int*4

k int*4

tnd real*4 dummy array

-----------------------------------------------------------

Module: advwts Source File: model/radvn.f

 

idxcon int*4

idycon int*4

idzcon int*4

ii int*4

jj int*4

k int*4

ll int*4

lll int*4

-----------------------------------------------------------

Module: ae0 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

-----------------------------------------------------------

Module: ae1 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

-----------------------------------------------------------

Module: ae1m1 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

-----------------------------------------------------------

Module: ae1p1 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

-----------------------------------------------------------

Module: ae1p1p1 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

-----------------------------------------------------------

Module: ae1t0 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

-----------------------------------------------------------

Module: ae1t0p1 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

-----------------------------------------------------------

Module: ae1t1 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

-----------------------------------------------------------

Module: ae1t1p1 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

-----------------------------------------------------------

Module: ae1tn1 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

-----------------------------------------------------------

Module: ae2 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

j int*4

-----------------------------------------------------------

Module: ae3 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: ae3m3 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: ae3m3d0 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: ae3p3 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: ae3t0p3 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: ae3t3 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: ae3t3p3 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: aen1 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

-----------------------------------------------------------

Module: aen3t0p3 Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: alebl Source File: lib/rnumr.f

 

a real*4 dummy array

i int*4

j int*4

-----------------------------------------------------------

Module: aminmax Source File: isan/avarf.f

 

i int*4

j int*4

k int*4

xmax real*4

xmin real*4

-----------------------------------------------------------

Module: anlwrt Source File: model/rio.f

 

anamel char*80

cgrid char*1

indbl int*4

indwrt int*4

ivbtab int*4 array size:8000

k int*4

lenl int*4

n2d int*4

n3d int*4

n3ds int*4

ngr int*4

nn int*4

npointer int*4

nv int*4

nvcnt int*4

-----------------------------------------------------------

Module: arrsnd Source File: model/rhhi.f

 

dir real*4

k int*4

kk int*4

kkk int*4

nnns int*4

spd real*4

tavg real*4

toffset real*4

wt real*4

zold1 real*4

zold2 real*4

-----------------------------------------------------------

Module: atimb Source File: lib/rnumr.f

 

c real*4 dummy array size:4

nn int*4

-----------------------------------------------------------

Module: atob Source File: lib/rnumr.f

 

b real*4 dummy array size:4

i int*4

-----------------------------------------------------------

Module: auto_accret Source File: model/mic_cols.f

 

ad1 real*4

ad2 real*4

ar2 real*4

bd1 real*4

bd1cc real*4

bd1cr real*4

bd2 real*4

bd2cr real*4

bd2rr real*4

br2 real*4

br2cr real*4

br2rr real*4

cfmasi1 real*4

cfmasi2 real*4

d2e real*4

d2minx real*4

dmb1cgs real*4

dmb2cgs real*4

dtlt3 real*4

dtlt6 real*4

en1cgs real*4

en1cgs_2 real*4

enxfer real*4 dummy array

id1cc int*4

id1cr int*4

id1crn int*4

id2cr int*4

id2rr int*4

ir2cr int*4

ir2rr int*4

k int*4

pwmasi1 real*4

pwmasi2 real*4

qrxfer real*4 dummy array

r2cgs real*4

rxfer real*4 dummy array

tm1cc real*4

tm1cr real*4

tn1cc real*4

tn1cr real*4

tn2cc real*4

tn2rr real*4

um1cc real*4

um1cr real*4

um2 real*4

un1 real*4

un1cc real*4

un1cr real*4

un2cc real*4

un2rr real*4

wd1cr real*4

wd2rr real*4

wr2cr real*4

wr2rr real*4

-----------------------------------------------------------

Module: average_p Source File: model/rio.f

 

b real*4 dummy array

i int*4

ip int*4

j int*4

-----------------------------------------------------------

Module: avg Source File: model/rmisc.f

 

av real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: avint Source File: model/mic_init.f

 

a real*8

ans real*4 dummy

b real*8

c real*8

ca real*8

cb real*8

cc real*8

fl real*4

fr real*4

i int*4

inlft int*4

inrt int*4

istart int*4

istop int*4

r3 real*8

rp5 real*8

slope real*4

sum real*8

syl real*8

syl2 real*8

syl3 real*8

syu real*8

syu2 real*8

syu3 real*8

term1 real*8

term2 real*8

term3 real*8

x1 real*8

x12 real*8

x13 real*8

x2 real*8

x23 real*8

x3 real*8

-----------------------------------------------------------

Module: awtcmp Source File: lib/rutil.f

 

l int*4

ll int*4

q real*4 array size:24

q12 real*4

w real*4 dummy array size:144

-----------------------------------------------------------

Module: axislab Source File: isan/aplt.f

 

cformat char*16

i int*4

j int*4

k int*4

nlablx int*4

nlably int*4

number char*16

xcoord real*4

xlabn real*4

xmax1 real*4

xmin1 real*4

ycoord real*4

ylabn real*4

ymax1 real*4

ymin1 real*4

-----------------------------------------------------------

Module: azerov Source File: lib/rnumr.f

 

a1 real*4 dummy array

a2 real*4 dummy array

a3 real*4 dummy array

a4 real*4 dummy array

a5 real*4 dummy array

n int*4

-----------------------------------------------------------

Module: backlab Source File: isan/aplt.f

 

hpos real*4

title char*60

vpos real*4

-----------------------------------------------------------

Module: binom Source File: lib/rutil.f

 

istend int*4

wt1 real*4

wt2 real*4

yyy real*4 dummy

yz11 real*4

yz12 real*4

yz13 real*4

yz22 real*4

yz23 real*4

yz24 real*4

-----------------------------------------------------------

Module: blankpg Source File: lib/rname.f

 

i int*4

-----------------------------------------------------------

Module: bn_parm Source File: isan/aobj.f

 

a real*4

agam real*4

agam1 real*4

e1 real*4

e2 real*4

e3 real*4

n int*4

o4k real*4

x4k real*4 dummy

-----------------------------------------------------------

Module: bn_pass Source File: isan/aobj.f

 

dfactx real*4

dfacty real*4

grid real*4 dummy array

gxxx real*4

gyyy real*4

i int*4

j int*4

k int*4

n int*4

nv int*4

scra real*4 dummy array

sum real*4

sw real*4

-----------------------------------------------------------

Module: bn_qual Source File: isan/aobj.f

 

dfactx real*4

dfacty real*4

i int*4

j int*4

n int*4

qual real*4 dummy array

-----------------------------------------------------------

Module: botset Source File: model/rbnd.f

 

aa real*4 dummy array

dzmr real*4

i int*4

j int*4

-----------------------------------------------------------

Module: boyanc Source File: model/raco.f

 

i int*4

j int*4

k int*4

vtemp real*4 dummy array

wt real*4 dummy array

-----------------------------------------------------------

Module: bruvais Source File: model/rturb.f

 

c1 real*4

c2 real*4

c3 real*4

ci1 real*4

ci2 real*4

ci3 real*4

en2 real*4 dummy array

i int*4

iwdiffk int*4

iweten int*4

j int*4

k int*4

ki int*4

rvii real*4

-----------------------------------------------------------

Module: bubble Source File: model/ruser.f

 

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: c03 Source File: model/mic_misc.f

 

jflag int*4

-----------------------------------------------------------

Module: canopy Source File: model/rsurf.f

 

aux real*4

c2 real*4

c3 real*4

dsm real*4

es real*4

fac real*4

factv real*4

frad real*4

fswp real*4

fthi real*4

ftlo real*4

fvpd real*4

hcapveg real*4

hflxvc real*4 dummy

k int*4

kk int*4

nsoil int*4

nveg int*4 dummy

qwshed real*4 dummy

qwtot real*4

rasgnd real*4

rasveg real*4

rb real*4

rc real*4

rd real*4 dummy

rleaf real*4

rsatveg real*4

sigmaw real*4

slai real*4

slpotv real*4

swp real*4

tgp real*4 dummy array

transp real*4 dummy

tveg real*4

tvegc real*4

vpd real*4

wflxvc real*4 dummy

wgp real*4 dummy array

wshed real*4 dummy

wtemp real*4

wtroot real*4

x real*4

zdisp real*4

zognd real*4

zoveg real*4

zveg real*4

-----------------------------------------------------------

Module: cfact Source File: lib/rvfor.f

 

bignum real*8

fact real*8 dummy

tnum real*8

-----------------------------------------------------------

Module: cfll Source File: model/rbnd.f

 

cflnumh real*4

cflnumv real*4

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: ch2ch Source File: lib/rname.f

 

chval char*(*) dummy

nc int*4

ncstr int*4

ncw int*4 dummy

-----------------------------------------------------------

Module: ch2int Source File: lib/rname.f

 

form char*8

int int*4 dummy

nc int*4

-----------------------------------------------------------

Module: ch2real Source File: lib/rname.f

 

fnum real*4 dummy

form char*8

nc int*4

-----------------------------------------------------------

Module: cio_c Source File: model/rcio.f

 

i int*4

ia char dummy array

nn int*4

-----------------------------------------------------------

Module: cio_f Source File: model/rcio.f

 

i int*4

ia real*4 dummy array

nn int*4

-----------------------------------------------------------

Module: cio_f8 Source File: model/rcio.f

 

i int*4

ia real*8 dummy array

nn int*4

-----------------------------------------------------------

Module: cio_i Source File: model/rcio.f

 

i int*4

ia int*4 dummy array

nn int*4

-----------------------------------------------------------

Module: cio_pos_file Source File: model/rcio.f

 

csearch char*128

iend int*4

ierr int*4 dummy

ilen int*4

line char*128

nc int*4

nl int*4

-----------------------------------------------------------

Module: cldnuc Source File: model/mic_misc.f

 

aak real*4

acc real*4

accmax real*4

accn real*4

accnmax real*4

asup real*4

atemp real*4

bak real*4

bcc real*4

bccn real*4

bigmass real*4

bsup real*4

btemp real*4

ccnew real*4

cct real*4

cx real*4 dummy array

denom real*4

excessrv real*4

ia int*4

iak int*4

icc int*4

iccn int*4

iccnprg int*4 dummy

isup int*4

itemp int*4

ja int*4

jaero int*4 array size:40

k int*4

k1cnuc int*4 dummy

k2cnuc int*4 dummy

naero int*4

rcnew real*4

rct real*4

rnuc real*4

rv real*4 dummy array

rx real*4 dummy array

sup_input real*4

wcc1 real*4

wcc2 real*4

wccn1 real*4

wccn2 real*4

wsup1 real*4

wsup2 real*4

-----------------------------------------------------------

Module: coefz Source File: model/raco.f

 

a1da2 real*4 dummy

acoaa real*4 dummy array

acobb real*4 dummy array

acoc real*4 dummy array

acocc real*4 dummy array

acof real*4 dummy array

acog real*4 dummy array

amoe real*4 dummy array

amof real*4 dummy array

dt2al2 real*4

dt2al2r real*4

i int*4

j int*4

k int*4

rdto2cv real*4

rdtr real*4

-----------------------------------------------------------

Module: cofnest Source File: model/rnest.f

 

alpha real*4

et real*4

ev real*4

if int*4

jf int*4

kc int*4

kf int*4

nc int*4

nf int*4

nrat int*4

-----------------------------------------------------------

Module: col1 Source File: model/mic_cols.f

 

c1 real*4

colnum real*4

enxfer real*4 dummy array

ipc int*4

ipxy int*4

k int*4

qrxfer real*4 dummy array

rcx real*4

rxfer real*4 dummy array

tabvaln real*4

tabvalx real*4

-----------------------------------------------------------

Module: col2 Source File: model/mic_cols.f

 

area real*4

c1 real*4

c2 real*4

cn13 real*4

cn24 real*4

coalice real*4

coalliq real*4

colnum real*4

colnum0 real*4

enxfer real*4 dummy array

ipc int*4

ipxy int*4

ipyx int*4

it int*4

jhcatx int*4

jhcaty int*4

k int*4

qcoal real*4

qrcoal real*4

qrcx real*4

qrcy real*4

qrsip real*4

qrxfer real*4 dummy array

rcoal real*4

rcx real*4

rcy real*4

rfinlz real*4

rsip real*4

rxfer real*4 dummy array

sip real*4

tabvaln real*4

tabvalx real*4

tabvaly real*4

xtoz real*4

-----------------------------------------------------------

Module: col3 Source File: model/mic_cols.f

 

c1 real*4

cfinlz real*4

coalice real*4

coalliq real*4

coalnum real*4

colnum real*4

colnumx real*4

colnumy real*4

enxfer real*4 dummy array

ipc int*4

ipxy int*4

ipyx int*4

jhcaty int*4

k int*4

qcoal real*4

qrcoal real*4

qrcx real*4

qrcy real*4

qrxfer real*4 dummy array

rcoal real*4

rcx real*4

rcy real*4

rfinlz real*4

rxfer real*4 dummy array

tabvaln real*4

tabvalx real*4

tabvaly real*4

xtoz real*4

-----------------------------------------------------------

Module: col3344 Source File: model/mic_cols.f

 

c1 real*4

colamt real*4

colnum real*4

enxfer real*4 dummy array

ip int*4

ipc int*4

k int*4

qrxfer real*4 dummy array

rxfer real*4 dummy array

tabvaln real*4

tabvalx real*4

-----------------------------------------------------------

Module: col3443 Source File: model/mic_cols.f

 

c1 real*4

colnum real*4

enxfer real*4 dummy array

ipc int*4

ipxy int*4

ipyx int*4

jhcatx int*4

jhcaty int*4

k int*4

qrxfer real*4 dummy array

rcx real*4

rcy real*4

rxfer real*4 dummy array

tabvaln real*4

tabvalx real*4

tabvaly real*4

-----------------------------------------------------------

Module: cols Source File: model/mic_cols.f

 

colnum real*4

enxfer real*4 dummy array

ipc int*4

k int*4

tabval real*4

-----------------------------------------------------------

Module: colxfers Source File: model/mic_cols.f

 

cx real*4 dummy array

enloss real*4 dummy array

enxfer real*4 dummy array

icat int*4

jcat int*4

k int*4

kd1 int*4

kd2 int*4

qr real*4 dummy array

qrxfer real*4 dummy array

rloss real*4 dummy array

rx real*4 dummy array

rxfer real*4 dummy array

-----------------------------------------------------------

Module: commio Source File: model/rcio.f

 

cng char*2

ie int*4

irw int*4

ng int*4

-----------------------------------------------------------

Module: conpar Source File: model/rconv.f

 

conprr real*4 dummy array

dthmax real*4

i int*4

i1 int*4

i2 int*4

icpcnt int*4

iprtfrq int*4

iqmax int*4

j int*4

j1 int*4

j2 int*4

jqmax int*4

k int*4

kqmax int*4

rtsrc real*4 dummy array

thsrc real*4 dummy array

-----------------------------------------------------------

Module: contnuc Source File: model/mic_misc.f

 

akn real*4

ana real*4

dfar real*4

f1 real*4

f2 real*4

ft real*4

pbvi real*4 dummy

pdvi real*4 dummy

ptotvi real*4 dummy

ptvi real*4 dummy

-----------------------------------------------------------

Module: contour Source File: isan/aplt.f

 

idpatt int*4

title char*80

-----------------------------------------------------------

Module: corlsu Source File: model/rmisc.f

 

c1 real*4

i int*4

j int*4

k int*4

ut real*4 dummy array

vt3da real*4 dummy array

-----------------------------------------------------------

Module: corlsv Source File: model/rmisc.f

 

c1 real*4

i int*4

j int*4

k int*4

vt real*4 dummy array

vt3da real*4 dummy array

-----------------------------------------------------------

Module: cp2mod Source File: model/rconv.f

 

dzlft real*4

frres real*4

ftres real*4

k int*4

l int*4

tfrc real*4

tfrm real*4

tftc real*4

tftm real*4

-----------------------------------------------------------

Module: cputime Source File: model/rtimh.f

 

w1 real*4 dummy

-----------------------------------------------------------

Module: cross Source File: isan/astga.f

 

aa real*4 dummy array

ab real*4

aold real*4

at real*4

dab real*4

dat real*4

dp real*4

dtb real*4

dtt real*4

frpdif real*4

frxdif real*4

i int*4

ii int*4

iplab char*4

k int*4

kb int*4

km int*4

kp int*4

kt int*4

mx int*4

mx2 int*4

np int*4

p real*4

p2 real*4

pb real*4

pbot real*4

pold real*4

ppt real*4

prl real*4

prl1 real*4

prlk real*4

pt real*4

ptop real*4

tb real*4

title char*20

told real*4

tt real*4

xdel real*4

xii real*4

xlab char*8

yy real*4 dummy array

-----------------------------------------------------------

Module: crsect Source File: isan/astga.f

 

i int*4

icr int*4

inc int*4

iwdwfl int*4

iwndmx int*4

ix int*4

iz int*4

j int*4

k int*4

ncr int*4

nfld int*4

-----------------------------------------------------------

Module: cscale Source File: lib/rvfor.f

 

amax real*4 dummy

amin real*4 dummy

nn int*4

-----------------------------------------------------------

Module: cscalei Source File: lib/rvfor.f

 

iamax int*4 dummy

iamin int*4 dummy

nn int*4

-----------------------------------------------------------

Module: cu_environ Source File: model/rconv.f

 

abe real*4

dzdd real*4

dzlll real*4

hz real*4 array size:400

k int*4

nkmid int*4

plll real*4

rlll real*4

themax real*4

tlll real*4

wcpmax real*4

zlll real*4

znz real*4

-----------------------------------------------------------

Module: cyclic Source File: model/rbnd.f

 

i int*4

j int*4

k int*4

ncycle int*4

nshift int*4

var real*4 dummy array

-----------------------------------------------------------

Module: data Source File: model/mic_init.f

 

akbar real*4 dummy array

ap real*4

diam real*4 dummy array

i int*4

j int*4

jj int*4

kk int*4

kount int*4

l int*4

p real*4

x real*4 dummy array

-----------------------------------------------------------

Module: date_add_to Source File: model/dateutils.f

 

iadddays int*4

idays int*4

izhours int*4

izmin int*4

izsec int*4

outdate int*4 dummy

outhour int*4 dummy

outmonth int*4 dummy

outyear int*4 dummy

strtim real*4

ttinc real*4

xhourin real*4

xminin real*4

xsecin real*4

-----------------------------------------------------------

Module: date_make_big Source File: model/dateutils.f

 

outdate int*8 dummy

-----------------------------------------------------------

Module: date_unmake_big Source File: model/dateutils.f

 

indate int*4 dummy

inhour int*4 dummy

inmonth int*4 dummy

inyear int*4 dummy

-----------------------------------------------------------

Module: datptodatq Source File: model/rusgs.f

 

datq int*4 dummy

-----------------------------------------------------------

Module: datqtobats Source File: model/rusgs.f

 

bats int*4 dummy

-----------------------------------------------------------

Module: decomp_plot Source File: model/modsched.f

 

cnum char*2

ixxb int*4

ixxe int*4

iyyb int*4

iyye int*4

nb int*4

ng int*4

nm int*4

nn int*4

px real*4

pxb real*4

pxe real*4

py real*4

pyb real*4

pye real*4

-----------------------------------------------------------

Module: dewptjb1 Source File: isan/askewt.f

 

enl real*4

-----------------------------------------------------------

Module: diffprep Source File: model/mic_misc.f

 

c1 real*4

fre real*4

if1 int*4

if4 int*4

if6 int*4

if8 int*4

k int*4

pwmasi real*4

sb real*4 dummy array

scdei real*4

sd real*4 dummy array

se real*4 dummy array

sf real*4 dummy array

sg real*4 dummy array

sh real*4 dummy array

sm real*4 dummy array

ss real*4 dummy array

su real*4 dummy array

sumuy real*4 dummy array

sumuz real*4 dummy array

sw real*4 dummy array

sy real*4 dummy array

sz real*4 dummy array

ttest real*4 dummy array

-----------------------------------------------------------

Module: diffsclr1 Source File: model/rturb.f

 

c1 real*4

dtlti real*4

i int*4

indh int*4

j int*4

jdc int*4

k int*4

sct real*4 dummy array

vt3df real*4 dummy array

vt3dg real*4 dummy array

vt3ec real*4 dummy array

vt3ej real*4 dummy array

vt3ek real*4 dummy array

vt3eo real*4 dummy array

-----------------------------------------------------------

Module: diffsclr2 Source File: model/rturb.f

 

i int*4

j int*4

k int*4

sct real*4 dummy array

vt3df real*4 dummy array

vt3dg real*4 dummy array

-----------------------------------------------------------

Module: diffuse Source File: model/rturb.f

 

iaddr int*4

ihkkh int*4

islabxz int*4

islabxzk int*4

islabxzs int*4

islabyz int*4

islabyzk int*4

islabyzs int*4

ivkkh int*4

ixzsize int*4

iyzsize int*4

mxyzp int*4

n int*4

ncallt int*4

nhkh int*4

npsize int*4

-----------------------------------------------------------

Module: diffvel1 Source File: model/rturb.f

 

c1 real*4

c2 real*4

cross real*4

dtlvi real*4

i int*4

indh int*4

j int*4

jdc int*4

k int*4

ut real*4 dummy array

vt real*4 dummy array

vt3da real*4 dummy array

vt3db real*4 dummy array

vt3dc real*4 dummy array

vt3dd real*4 dummy array

vt3de real*4 dummy array

vt3df real*4 dummy array

vt3dg real*4 dummy array

vt3dn real*4 dummy array

vt3ej real*4 dummy array

vt3ek real*4 dummy array

vt3el real*4 dummy array

vt3em real*4 dummy array

vt3en real*4 dummy array

vt3eo real*4 dummy array

wt real*4 dummy array

-----------------------------------------------------------

Module: diffvel2 Source File: model/rturb.f

 

c1 real*4

c2 real*4

cross real*4

dtlvi real*4

i int*4

indh int*4

j int*4

k int*4

ut real*4 dummy array

vt real*4 dummy array

vt3da real*4 dummy array

vt3db real*4 dummy array

vt3dc real*4 dummy array

vt3dd real*4 dummy array

vt3de real*4 dummy array

vt3df real*4 dummy array

vt3dg real*4 dummy array

vt3dn real*4 dummy array

vt3ej real*4 dummy array

vt3ek real*4 dummy array

vt3el real*4 dummy array

vt3em real*4 dummy array

vt3eo real*4 dummy array

wt real*4 dummy array

-----------------------------------------------------------

Module: divcart Source File: model/rgrad.f

 

optyp char*6

-----------------------------------------------------------

Module: divstar Source File: model/rgrad.f

 

optyp char*6

-----------------------------------------------------------

Module: dnswt Source File: model/rnest.f

 

i int*4

j int*4

k int*4

var1 real*4 dummy array

-----------------------------------------------------------

Module: dnswt_off Source File: model/rnest.f

 

i int*4

j int*4

k int*4

var1 real*4 dummy array

-----------------------------------------------------------

Module: dptjb1 Source File: isan/askewt.f

 

dnm real*4

dt real*4

dtdew real*4

edp real*4

fac real*4

t real*4

x real*4

-----------------------------------------------------------

Module: drythrm Source File: model/rthrm.f

 

i int*4

j int*4

k int*4

rv real*4 dummy array

theta real*4 dummy array

-----------------------------------------------------------

Module: dtcheck Source File: model/rinit.f

 

courn real*4

dhmin real*4

dhminw real*4

dtsw real*4

fmap real*4

gscr real*4 array size:352

itmx int*4

k int*4

ng int*4

ngr int*4

ngridw int*4

nratios int*4

ssmax real*4

ssmaxw real*4

-----------------------------------------------------------

Module: dumset Source File: model/rbnd.f

 

aa real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: each_call Source File: model/mic_misc.f

 

colf real*4 dummy

emb real*4 dummy array

icat int*4

jhcat int*4 dummy array

k int*4

pi4dt real*4 dummy

sc real*4 dummy array

sh real*4 dummy array

sj real*4 dummy array

sk real*4 dummy array

sl real*4 dummy array

sm real*4 dummy array

-----------------------------------------------------------

Module: each_column Source File: model/mic_misc.f

 

colfacc real*4 dummy array

colfacc2 real*4 dummy array

colfacr real*4 dummy array

colfacr2 real*4 dummy array

denfac real*4 dummy array

dn0i real*4 dummy array

dpiinv real*4

dplinv real*4

dynvisc real*4 dummy array

eisref real*4

eisrefp real*4

elsref real*4

elsrefp real*4

jhcat int*4 dummy array

k int*4

ns int*4

nt int*4

rdynvsci real*4 dummy array

relhum real*4

rvisair real*4 dummy array

rvlsair real*4 dummy array

rvs0 real*4 dummy array

rvsref real*4 dummy array

rvsrefp real*4 dummy array

sa real*4 dummy array

sh real*4 dummy array

sumuy real*4 dummy array

sumuz real*4 dummy array

sumvr real*4 dummy array

tairc real*4 dummy array

thrmcon real*4 dummy array

tref real*4 dummy array

tx real*4 dummy array

vapdif real*4 dummy array

-----------------------------------------------------------

Module: effxy Source File: model/mic_cols.f

 

eff real*4 dummy array

k int*4

ncall7 int*4

-----------------------------------------------------------

Module: eintp Source File: model/rnest.f

 

ac real*4 dummy array

as real*4 dummy array

icm int*4

if int*4

jc int*4

jc1 int*4

jf int*4

k1 int*4

k2 int*4

kc int*4

kf int*4

-----------------------------------------------------------

Module: enemb Source File: model/mic_misc.f

 

cx real*4 dummy array

cxloss real*4

emb real*4 dummy array

emb0i real*4

embi real*4

fracmass real*4

k int*4

parmi real*4

-----------------------------------------------------------

Module: esat Source File: lib/rutil.f

 

tc real*4

-----------------------------------------------------------

Module: esatjb1 Source File: isan/askewt.f

 

tc real*4

-----------------------------------------------------------

Module: esif Source File: lib/rutil.f

 

x real*4

-----------------------------------------------------------

Module: esipf Source File: lib/rutil.f

 

x real*4

-----------------------------------------------------------

Module: eslf Source File: lib/rutil.f

 

x real*4

-----------------------------------------------------------

Module: eslpf Source File: lib/rutil.f

 

x real*4

-----------------------------------------------------------

Module: eswjb1 Source File: isan/askewt.f

 

pol real*4

-----------------------------------------------------------

Module: exbcbuff Source File: model/mpass_full.F

 

a real*4 dummy array

i int*4

ind int*4 dummy

j int*4

k int*4

-----------------------------------------------------------

Module: exbcsbuff Source File: model/mpass_full.F

 

a real*4 dummy array

i int*4

ind int*4 dummy

j int*4

k int*4

-----------------------------------------------------------

Module: exbuff Source File: model/mpass_full.F

 

a real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: exsbuff Source File: model/mpass_full.F

 

a real*4 dummy array

i int*4

ip int*4

j int*4

k int*4

-----------------------------------------------------------

Module: exstbuff Source File: model/mpass_st.F

 

a real*4 dummy array

i int*4

ind int*4 dummy

j int*4

k int*4

-----------------------------------------------------------

Module: exstbuffs Source File: model/mpass_st.F

 

a real*4 dummy array

i int*4

ind int*4 dummy

j int*4

k int*4

-----------------------------------------------------------

Module: fa_prepxt Source File: model/radvn.f

 

i int*4

j int*4

k int*4

velw real*4 dummy array

wtf real*4 dummy array

wtr real*4 dummy array

-----------------------------------------------------------

Module: fa_prepxu Source File: model/radvn.f

 

i int*4

j int*4

k int*4

velf real*4 dummy array

velw real*4 dummy array

wtf real*4 dummy array

wtr real*4 dummy array

-----------------------------------------------------------

Module: fa_prepxv Source File: model/radvn.f

 

i int*4

j int*4

k int*4

velf real*4 dummy array

velw real*4 dummy array

wtf real*4 dummy array

wtr real*4 dummy array

-----------------------------------------------------------

Module: fa_prepxw Source File: model/radvn.f

 

i int*4

j int*4

k int*4

velf real*4 dummy array

velw real*4 dummy array

wtf real*4 dummy array

wtr real*4 dummy array

-----------------------------------------------------------

Module: fa_prepyt Source File: model/radvn.f

 

i int*4

j int*4

k int*4

velw real*4 dummy array

wtf real*4 dummy array

wtr real*4 dummy array

-----------------------------------------------------------

Module: fa_prepyu Source File: model/radvn.f

 

i int*4

j int*4

k int*4

velf real*4 dummy array

velw real*4 dummy array

wtf real*4 dummy array

wtr real*4 dummy array

-----------------------------------------------------------

Module: fa_prepyv Source File: model/radvn.f

 

i int*4

j int*4

k int*4

velf real*4 dummy array

velw real*4 dummy array

wtf real*4 dummy array

wtr real*4 dummy array

-----------------------------------------------------------

Module: fa_prepyw Source File: model/radvn.f

 

i int*4

j int*4

k int*4

velf real*4 dummy array

velw real*4 dummy array

wtf real*4 dummy array

wtr real*4 dummy array

-----------------------------------------------------------

Module: fa_prepzt Source File: model/radvn.f

 

i int*4

j int*4

k int*4

wtf real*4 dummy array

wtr real*4 dummy array

-----------------------------------------------------------

Module: fa_prepzu Source File: model/radvn.f

 

i int*4

j int*4

k int*4

velf real*4 dummy array

velw real*4 dummy array

wtf real*4 dummy array

wtr real*4 dummy array

-----------------------------------------------------------

Module: fa_prepzv Source File: model/radvn.f

 

i int*4

j int*4

k int*4

velf real*4 dummy array

velw real*4 dummy array

wtf real*4 dummy array

wtr real*4 dummy array

-----------------------------------------------------------

Module: fa_prepzw Source File: model/radvn.f

 

i int*4

j int*4

k int*4

velf real*4 dummy array

velw real*4 dummy array

wtf real*4 dummy array

wtr real*4 dummy array

-----------------------------------------------------------

Module: fa_x Source File: model/radvn.f

 

i int*4

j int*4

k int*4

scp real*4 dummy array

-----------------------------------------------------------

Module: fa_y Source File: model/radvn.f

 

i int*4

j int*4

k int*4

scp real*4 dummy array

-----------------------------------------------------------

Module: fa_z Source File: model/radvn.f

 

i int*4

j int*4

k int*4

scp real*4 dummy array

-----------------------------------------------------------

Module: faord2x Source File: model/radvn.f

 

flx real*4 dummy array

i int*4

j int*4

k int*4

scr real*4 dummy array

-----------------------------------------------------------

Module: faord2y Source File: model/radvn.f

 

flx real*4 dummy array

i int*4

j int*4

k int*4

scr real*4 dummy array

-----------------------------------------------------------

Module: faord2z Source File: model/radvn.f

 

flx real*4 dummy array

i int*4

j int*4

k int*4

scr real*4 dummy array

-----------------------------------------------------------

Module: faord6x Source File: model/radvn.f

 

flx real*4 dummy array

i int*4

j int*4

k int*4

scr real*4 dummy array

-----------------------------------------------------------

Module: faord6y Source File: model/radvn.f

 

flx real*4 dummy array

i int*4

j int*4

k int*4

scr real*4 dummy array

-----------------------------------------------------------

Module: faord6z Source File: model/radvn.f

 

flx real*4 dummy array

i int*4

j int*4

k int*4

scr real*4 dummy array

-----------------------------------------------------------

Module: fcorio Source File: model/rmisc.f

 

fcoru real*4 dummy array

fcorv real*4 dummy array

i int*4

j int*4

omega2 real*4

-----------------------------------------------------------

Module: fdback Source File: model/rnest.f

 

ac real*4 dummy array

ibeg int*4

ic int*4

iend int*4

if int*4

ifbcf int*4

iinc int*4

iv int*4

jbeg int*4

jc int*4

jend int*4

jf int*4

jinc int*4

jv int*4

kbeg int*4

kc int*4

kend int*4

kf int*4

kv int*4

nc int*4

sumflg real*4 dummy array

-----------------------------------------------------------

Module: fdbackp Source File: model/rnest.f

 

ac real*4 dummy array

ibeg int*4

iend int*4

if int*4

ifbcf int*4

iinc int*4

ikptscm int*4

indcf int*4

iv int*4

jbeg int*4

jc int*4

jend int*4

jf int*4

jinc int*4

jv int*4

kbeg int*4

kc int*4

kend int*4

kf int*4

kptscm int*4

kv int*4

-----------------------------------------------------------

Module: fillpg Source File: lib/rname.f

 

cdup char*64

col int*4

colp7 int*4

colp9 int*4

form char*64

idup int*4

leftcol int*4

length int*4

numd char*4

numdup int*4

nv int*4

oldnum int*4

rdup real*4

row int*4

-----------------------------------------------------------

Module: fillscr Source File: model/rnest.f

 

i int*4

j int*4

k int*4

scr real*4 dummy array

-----------------------------------------------------------

Module: fillscr_den Source File: model/rnest.f

 

i int*4

j int*4

k int*4

scr real*4 dummy array

-----------------------------------------------------------

Module: fillvar Source File: model/rnest.f

 

i int*4

j int*4

k int*4

var real*4 dummy array

-----------------------------------------------------------

Module: findgr Source File: lib/rname.f

 

ind int*4

line char*80

nr int*4

-----------------------------------------------------------

Module: findln Source File: isan/astga.f

 

i int*4

ltext int*4 dummy

-----------------------------------------------------------

Module: first_rams Source File: isan/asti.f

 

cgrid char*1

dum real*4 array size:528

dumy real*4

flnma char*128

icm int*4

ifm int*4

ivbtab int*4 array size:4000

k int*4

lenf int*4

namdum char*64

ng int*4

ngbegunx int*4 array size:32

ngridsx int*4

ninestx int*4 array size:32

njnestx int*4 array size:32

nknestx int*4 array size:32

nn int*4

nnstbotx int*4 array size:32

nnsttopx int*4 array size:32

nnxpx int*4 array size:32

nnypx int*4 array size:32

nnzgx int*4 array size:32

nnzpx int*4 array size:32

nstratxx int*4 array size:32

nstratyx int*4 array size:32

nv int*4

nvbtab int*4

nxtnestx int*4 array size:32

-----------------------------------------------------------

Module: flds3d Source File: model/rhhi.f

 

i int*4

j int*4

k int*4

pc real*4 dummy array

rv real*4 dummy array

theta real*4 dummy array

thp real*4 dummy array

uc real*4 dummy array

vc real*4 dummy array

-----------------------------------------------------------

Module: fmdn0 Source File: model/rnest.f

 

icm int*4

-----------------------------------------------------------

Module: fmint4 Source File: model/rnest.f

 

icm int*4

-----------------------------------------------------------

Module: fmints Source File: model/rnest.f

 

indcm int*4

indfm int*4

indpatch int*4

ipatch int*4

k int*4

-----------------------------------------------------------

Module: fmpmove Source File: model/rnest.f

 

anew real*4 dummy array

i int*4

ibeg int*4

iend int*4

ishft int*4

j int*4

jbeg int*4

jend int*4

jshft int*4

k int*4

-----------------------------------------------------------

Module: fmpmoves Source File: model/rnest.f

 

anew real*4 dummy array

i int*4

ibeg int*4

iend int*4

ishft int*4

j int*4

jbeg int*4

jend int*4

jshft int*4

k int*4

-----------------------------------------------------------

Module: fmrefs1d Source File: model/rnest.f

 

c1 real*4

c2 real*4

icm int*4

ifm int*4

k int*4

-----------------------------------------------------------

Module: fmrefs3d Source File: model/rnest.f

 

a real*4 dummy array

c1 real*4

c2 real*4

icm int*4

l int*4

-----------------------------------------------------------

Module: framdrw Source File: isan/aplt.f

 

axlabx char*16

axlaby char*16

h char*1

i int*4

ih int*4

itrans int*4

j int*4

k int*4

nn int*4

px1 real*4 dummy

px2 real*4 dummy

py1 real*4 dummy

py2 real*4 dummy

v char*1

xdist real*4

xlabfmt char*16

xmax real*4 dummy

xmin real*4 dummy

xplot real*4 dummy array

ydist real*4

ylabfmt char*16

ymax real*4 dummy

ymin real*4 dummy

yplot real*4 dummy array

zfactor real*4

zmax real*4

zst real*4

-----------------------------------------------------------

Module: fvert Source File: model/radvn.f

 

i int*4

j int*4

k int*4

wv real*4 dummy array

-----------------------------------------------------------

Module: gammln Source File: model/mic_driv.f

 

j int*4

ser real*4

tmp real*4

x real*4

-----------------------------------------------------------

Module: gcf Source File: model/mic_driv.f

 

a0 real*4

a1 real*4

an real*4

ana real*4

anf real*4

b0 real*4

b1 real*4

fac real*4

gaccel real*4

gammcf real*4 dummy

gln real*4 dummy

gold real*4

n int*4

-----------------------------------------------------------

Module: gdtost Source File: lib/rutil.f

 

fixm2 real*4

fiym2 real*4

i int*4

ii int*4

ix1 int*4

ix2 int*4

iy1 int*4

iy2 int*4

j int*4

jj int*4

r real*4 array size:16

scr real*4 array size:16

staval real*4 dummy

xx real*4

yy real*4

-----------------------------------------------------------

Module: geodat Source File: model/rinit.f

 

deltallo real*4

deltaxp real*4

deltaxq real*4

deltayp real*4

deltayq real*4

iaddr int*4

iblksizo int*4

ierr int*4

iodim int*4

isbego int*4

iwbego int*4

lb int*4

mof int*4

niq int*4

njq int*4

no int*4

np int*4

offlat real*4

offlon real*4

title char*80

-----------------------------------------------------------

Module: geonest Source File: model/rnest.f

 

a real*4 dummy array

i int*4

icm int*4

ifm int*4

indfm int*4

ip int*4

isiz int*4

j int*4

k int*4

nc1 int*4

nxy4p int*4

nxy4pcm int*4

-----------------------------------------------------------

Module: get_hkh Source File: model/rturb.f

 

i int*4

j int*4

k int*4

scr2 real*4 dummy array

-----------------------------------------------------------

Module: get_press Source File: isan/astp.f

 

as real*4 array size:4

i int*4

iadd int*4

id int*4

iffnd int*4 array size:400

ilvl int*4

ipcounter int*4

ipoff int*4

ithere int*4 array size:400

j int*4

jpoff int*4

k int*4

l int*4

lv int*4

lvpr int*4 array size:80

misstot int*4

npx int*4

npy int*4

npz int*4

nv int*4

nvar int*4

spx real*4

spy real*4

sslat real*4

welon real*4

wwlon real*4

-----------------------------------------------------------

Module: get_sclflx Source File: model/rturb.f

 

i int*4

inds int*4

j int*4

k int*4

vt3df real*4 dummy array

vt3dg real*4 dummy array

-----------------------------------------------------------

Module: get_sclk Source File: model/rturb.f

 

hkkh real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: get_sk Source File: model/rturb.f

 

i int*4

j int*4

k int*4

scr1 real*4 dummy array

scr2 real*4 dummy array

vt3da real*4 dummy array

vt3db real*4 dummy array

vt3dc real*4 dummy array

vt3dd real*4 dummy array

vt3de real*4 dummy array

vt3df real*4 dummy array

vt3dg real*4 dummy array

vt3dh real*4 dummy array

vt3di real*4 dummy array

vt3dn real*4 dummy array

-----------------------------------------------------------

Module: get_triinds Source File: model/hemi2.f

 

i1 int*4 dummy

i2 int*4 dummy

i3 int*4 dummy

i4 int*4 dummy

j1 int*4 dummy

j2 int*4 dummy

j3 int*4 dummy

j4 int*4 dummy

-----------------------------------------------------------

Module: grad Source File: model/rgrad.f

 

optyp char*6

-----------------------------------------------------------

Module: gradxt Source File: model/rgrad.f

 

hq4 real*4 dummy array

i int*4

j int*4

k int*4

vc1da real*4 dummy array

vc3db real*4 dummy array

-----------------------------------------------------------

Module: gradxu Source File: model/rgrad.f

 

hq4 real*4 dummy array

i int*4

j int*4

k int*4

vc1da real*4 dummy array

vc3db real*4 dummy array

-----------------------------------------------------------

Module: gradyt Source File: model/rgrad.f

 

hq4 real*4 dummy array

i int*4

j int*4

k int*4

vc1da real*4 dummy array

vc3db real*4 dummy array

-----------------------------------------------------------

Module: gradyv Source File: model/rgrad.f

 

hq4 real*4 dummy array

i int*4

j int*4

k int*4

vc1da real*4 dummy array

vc3db real*4 dummy array

-----------------------------------------------------------

Module: gradzt Source File: model/rgrad.f

 

i int*4

j int*4

k int*4

vc3db real*4 dummy array

-----------------------------------------------------------

Module: gradzw Source File: model/rgrad.f

 

i int*4

j int*4

k int*4

vc3db real*4 dummy array

-----------------------------------------------------------

Module: grdspc Source File: model/rinit.f

 

dxm real*4 dummy array

dxt real*4 dummy array

dxu real*4 dummy array

dxv real*4 dummy array

dym real*4 dummy array

dyt real*4 dummy array

dyu real*4 dummy array

dyv real*4 dummy array

i int*4

j int*4

-----------------------------------------------------------

Module: gridset Source File: model/rinit.f

 

dsum real*4

dzr real*4

dzrcm real*4

dzrfm real*4

i int*4

icm int*4

icnt int*4

if int*4

ifm int*4

iinc int*4

j int*4

jcnt int*4

jf int*4

jinc int*4

k int*4

kcnt int*4

kcw int*4

kcy int*4

kf int*4

kinc int*4

kk int*4

nestza1 int*4

nestza2 int*4

ngrb int*4

nhemgrds int*4

nrat int*4

southy real*4 array size:32

tsum real*4

westx real*4 array size:32

-----------------------------------------------------------

Module: grndvap Source File: model/rsurf.f

 

alpha real*4

beta real*4

gdrm real*4

i int*4

j int*4

ksn int*4

nsoil int*4

slpotvn real*4

tgp real*4 dummy array

-----------------------------------------------------------

Module: gser Source File: model/mic_driv.f

 

ap real*4

del real*4

gamser real*4 dummy

gln real*4 dummy

n int*4

sum real*4

-----------------------------------------------------------

Module: hadvance Source File: model/rtimi.f

 

mxyzp int*4

-----------------------------------------------------------

Module: haznuc Source File: model/mic_init.f

 

bhz real*4

c1hz real*4

c2hz real*4

c3hz real*4

dccn real*4

ddccn real*4

denccn real*4

dm real*4

dnccn real*4

dum real*4

frachz real*4 dummy array

gnuccn real*4

irhhz int*4

ithz int*4

k int*4

rhhz real*4

sum real*4

thz real*4

y real*4

-----------------------------------------------------------

Module: hemintrp_cof Source File: model/hemi2.f

 

i int*4

j int*4

-----------------------------------------------------------

Module: hemintrp_table Source File: model/hemi2.f

 

hlat real*4 dummy array

hlon real*4 dummy array

i int*4

ihem1 int*4 dummy array

ihem2 int*4 dummy array

ii int*4

ind int*4 dummy

j int*4

jhem1 int*4 dummy array

jhem2 int*4 dummy array

jj int*4

ntri int*4

w34 real*4

whem1 real*4 dummy array

x0 real*4

x1 real*4

x2 real*4

x3 real*4

x4 real*4

x5 real*4

y0 real*4

y1 real*4

y2 real*4

y3 real*4

y4 real*4

y5 real*4

-----------------------------------------------------------

Module: hemintt Source File: model/hemi2.f

 

ij int*4

k int*4

t2 real*4 dummy array

-----------------------------------------------------------

Module: hemintuv Source File: model/hemi2.f

 

ij int*4

k int*4

u2 real*4 dummy array

u2r real*4

v2 real*4 dummy array

v2r real*4

-----------------------------------------------------------

Module: hg_xy Source File: lib/hutil.f

 

ix int*4

-----------------------------------------------------------

Module: hg_z Source File: lib/hutil.f

 

ihp int*4

iz int*4

jhp int*4

qh02 real*4

qh20 real*4

rtg real*4

topo real*4 dummy

-----------------------------------------------------------

Module: hifromx Source File: lib/hutil.f

 

ihigh int*4

ilow int*4

imid int*4

m int*4

msw int*4

-----------------------------------------------------------

Module: hiswrt Source File: model/rio.f

 

hnamel char*80

hnamelh char*80

ind int*4

indbl int*4

indwrt int*4

ioind1 int*4

n2d int*4

n3d int*4

n3s int*4

ngr int*4

nwordh int*4

-----------------------------------------------------------

Module: hodograph Source File: isan/askewt.f

 

ang real*4

ctit char*2

i int*4

iangle int*4

iring int*4 array size:16

n int*4

nlevs int*4

pi real*4

sbn real*4

sln real*4

srn real*4

stn real*4

uln real*4

urn real*4

utb real*4

utn real*4

uw real*4 array size:600

vw real*4 array size:600

x1 real*4

xangle real*4

xcirc real*4 array size:1440

xmaxspd real*4

xoff real*4

y1 real*4

ycirc real*4 array size:1440

yoff real*4

-----------------------------------------------------------

Module: homfrzcl Source File: model/mic_init.f

 

ajlso real*4

dc real*4

ddc real*4

dnc real*4

fracc real*4 dummy array

gnuc real*4

idnc int*4

itc int*4

k int*4

sum real*4

tc real*4

v1 real*4

y real*4

-----------------------------------------------------------

Module: hstart Source File: model/rio.f

 

hnamein char*80

iadd int*4

iadds int*4

ind int*4

indbl int*4

indwrt int*4

ioind1 int*4

jv2d int*4 array size:32

jv3d int*4 array size:32

jv3dm int*4 array size:32

jv3ds int*4 array size:32

jvtab2d int*4 array size:2240

jvtab3d int*4 array size:2240

jvtab3dm int*4 array size:2240

jvtab3ds int*4 array size:2240

maxarr int*4

n2d int*4

n3d int*4

n3s int*4

ng int*4

ngr int*4

npts int*4

nv int*4

scr real*4 array size:4

-----------------------------------------------------------

Module: htint Source File: lib/rutil.f

 

k int*4

kk int*4

l int*4

vctrb real*4 dummy array size:4

wt real*4

-----------------------------------------------------------

Module: htint2 Source File: lib/rutil.f

 

k int*4

l int*4

vctrb real*4 dummy array size:4

wt real*4

-----------------------------------------------------------

Module: htintcp Source File: lib/rutil.f

 

k int*4

l int*4

vctrb real*4 dummy array size:4

vt2c real*4 dummy array size:4

vt2d real*4 dummy array size:4

vt2e real*4 dummy array size:4

wt real*4

-----------------------------------------------------------

Module: hydro Source File: model/rsurfaux.f

 

fa real*4 array size:60

finv real*4 array size:60

i int*4

icall4 int*4

ig int*4 array size:800

ip int*4

ipg int*4 array size:12000

j int*4

jg int*4 array size:800

l int*4

lpg int*4 array size:60

ng int*4

ngrp int*4

ngrps int*4

schar real*4 dummy array

wi real*4 array size:60

-----------------------------------------------------------

Module: hydrol Source File: model/rsurfaux.f

 

add real*4

baseflow real*4

capacity real*4

delta_wgp real*4

dtltopm real*4

etafbar real*4

fa real*4 dummy array

fracw real*4

i int*4

ibotpatch int*4

ip int*4

j int*4

k int*4

ksat int*4 array size:80

l int*4

lp int*4

ngd int*4

nsoil int*4

okbar real*4

olflow real*4

qolflow real*4

qrunoff real*4

qw real*4

qwfree real*4

runoff real*4

slcpdsum real*4

tgfa real*4

tgp real*4 dummy array

tgpsum real*4

vol real*4

wateradd real*4

wfreeb real*4

wgp real*4 dummy array

wgpsum real*4

wi real*4 dummy array

wibar real*4

zi real*4 dummy array

ziadd real*4

zibar real*4

zitopm real*4 array size:80

-----------------------------------------------------------

Module: ibias Source File: lib/rutil.f

 

jd int*4

jpow int*4

jpow1 int*4

ymax real*4

ymin real*4

-----------------------------------------------------------

Module: ibindec Source File: lib/rutil.f

 

ic int*4

inc int*4

l int*4

-----------------------------------------------------------

Module: icenuc Source File: model/mic_misc.f

 

cldnuc real*4

cldnucr real*4

cx real*4 dummy array

diagni real*4

dn1 real*4

fraccld real*4

frachaz real*4

haznuc real*4

idnc int*4

irhhz int*4

itc int*4

ithz int*4

k int*4

k1pnuc int*4 dummy

k2pnuc int*4 dummy

pwmasi real*4

rhhz real*4

ridnc real*4

rirhhz real*4

ritc real*4

rithz real*4

rx real*4 dummy array

ssi real*4

tc real*4

thz real*4

vapnuc real*4

vapnucr real*4

wdnc2 real*4

wrhhz2 real*4

wtc2 real*4

wthz2 real*4

-----------------------------------------------------------

Module: initg Source File: model/mic_init.f

 

amk real*4 dummy array

amk1 real*4 dummy array

amk2 real*4 dummy array

ank real*4 dummy array

ank1 real*4 dummy array

ank2 real*4 dummy array

dmean real*4

dn1 real*4

dn2 real*4

fac1 real*4

fac2 real*4

gamp real*4

i int*4

sum real*4

sumn real*4

trunc real*4

trunc1 real*4

xntot real*4

xr3 real*4

-----------------------------------------------------------

Module: inithh Source File: model/rhhi.f

 

icm int*4

ifm int*4

-----------------------------------------------------------

Module: initlz Source File: model/rdint.f

 

icm int*4

ifm int*4

ihm int*4

ninest1 int*4 array size:32

njnest1 int*4 array size:32

rest char*8

-----------------------------------------------------------

Module: initpara Source File: model/rnode.f

 

i1 int*4

i2 int*4

iadd int*4

iadd1 int*4

iadd2 int*4

iaddr int*4 dummy

iaddrb int*4 dummy

itype int*4

j1 int*4

j2 int*4

memf int*4

ng int*4

nm int*4

-----------------------------------------------------------

Module: initqin Source File: model/mic_init.f

 

i int*4

j int*4

k int*4

pi real*4

q2 real*4 dummy array

q6 real*4 dummy array

q7 real*4 dummy array

tair real*4

-----------------------------------------------------------

Module: initv Source File: model/rvari.f

 

a real*4 dummy array

cgrid char*1

deltaxx real*4

deltayx real*4

deltazx real*4

dzmaxx real*4

dzratx real*4

flnm char*80

i int*4

idatex int*4

ifileok int*4 dummy

ihourx int*4

imonthx int*4

inudg int*4

ivvp int*4

ivvr int*4

ivvt int*4

ivvu int*4

ivvv int*4

iyearx int*4

nc int*4

nxpx int*4

nypx int*4

nzpx int*4

rlatx real*4

there log*4

wlon1x real*4

-----------------------------------------------------------

Module: input_rawi Source File: isan/asti2.f

 

elev real*4

idsta char*8

kl int*4

line char*256

line2 char*256

lp int*4

lz int*4

nb int*4

nn int*4

nobs int*4

xlat real*4

xlon real*4

-----------------------------------------------------------

Module: input_sfc Source File: isan/asti2.f

 

ddx real*4

ffx real*4

idsta char*5

line char*256

line2 char*256

nb int*4

nn int*4

nsss int*4

px real*4

tdx real*4

tx real*4

xlat real*4

xlon real*4

zx real*4

-----------------------------------------------------------

Module: intrp Source File: lib/rutil.f

 

b real*4 dummy

k int*4

kabv int*4

-----------------------------------------------------------

Module: intrrap Source File: lib/rutil.f

 

b real*4 dummy

k int*4

kabv int*4

kk int*4

nz int*4

-----------------------------------------------------------

Module: iosetb Source File: model/rdint.f

 

ind int*4

jsc int*4

n int*4

-----------------------------------------------------------

Module: iosetup Source File: model/rio.f

 

memmax int*4

memval int*4

n int*4

n2 int*4

n3 int*4

ngr int*4

nv int*4

-----------------------------------------------------------

Module: iprim Source File: lib/rutil.f

 

n int*4

-----------------------------------------------------------

Module: isan_driver Source File: isan/asgen.f

 

a real*4 dummy array

csuff char*3

i int*4

iaddari int*4

iaddars int*4

iaddrp int*4

iaddscr int*4

idat int*4

iglatn int*4 array size:32

iglonn int*4 array size:32

ilat int*4

ilon int*4

iscr int*4

itoptn int*4 array size:32

k int*4

l int*4

locfn char*80

maxxyz int*4

memari int*4

memars int*4

mempr int*4

nc int*4

ngr int*4

xnelo real*4

-----------------------------------------------------------

Module: isan_file_inv Source File: isan/asgen.f

 

cinmon char*3

indate int*4

inhour int*4

inmonth int*4

inyear int*4

isan_err_flag int*4

lnf int*4

nc int*4

nf int*4

nm int*4

nn int*4

tinc real*4

-----------------------------------------------------------

Module: isenio Source File: isan/asgen.f

 

ctype char*10

l int*4

ninn int*4

nlt int*4

npts int*4

nx3 int*4

ny3 int*4

-----------------------------------------------------------

Module: ismax Source File: lib/rfvec.f

 

ism int*4

nnn int*4

smax real*4

-----------------------------------------------------------

Module: ismin Source File: lib/rfvec.f

 

ism int*4

nnn int*4

smin real*4

-----------------------------------------------------------

Module: isnsig Source File: isan/avarf.f

 

i int*4

j int*4

k int*4

kbeg int*4

kend int*4

ki int*4

nki int*4

pp real*4 dummy array

rr real*4 dummy array

rtg real*4

tt real*4 dummy array

uu real*4 dummy array

vv real*4 dummy array

wtsz real*4

-----------------------------------------------------------

Module: isnstage Source File: isan/asti.f

 

asf real*4 dummy array

iadd1 int*4

iadd2 int*4

iadd3 int*4

iadd4 int*4

iadd5 int*4

iadd6 int*4

iaddraou int*4

iaddrapi int*4

iaddraps int*4

iaddros int*4

iaddrou int*4

iaddrpps int*4

iaddum int*4

iip int*4

iir int*4

iis int*4

iiu int*4

iiv int*4

ijk int*4

indc int*4

indf int*4

iop int*4

ior int*4

ios int*4

iou int*4

iov int*4

ipr int*4

ipu int*4

ipv int*4

ipz int*4

irsqual int*4

irsr int*4

irss int*4

irsu int*4

irsv int*4

irszss int*4

isflat int*4

isflon int*4

isfp int*4

isfr int*4

isfs int*4

isft int*4

isfu int*4

isfv int*4

isfzss int*4

isp int*4

isr int*4

isscra int*4

ist int*4

isu int*4

isv int*4

iuplat int*4

iuplon int*4

iupnlp int*4

iupnlz int*4

iupp int*4

iupr int*4

iupt int*4

iuptop int*4

iuptopg int*4

iupuz int*4

iupvz int*4

iupz int*4

iupzz int*4

memaou int*4

memapi int*4

memaps int*4

memos int*4

memou int*4

mempps int*4

ng int*4

npts int*4

nwordpi int*4

nwordps int*4

olat1 real*4

olat2 real*4

olon1 real*4

olon2 real*4

-----------------------------------------------------------

Module: jcl Source File: lib/rsys.F

 

exans log*4

-----------------------------------------------------------

Module: klbnd Source File: model/rturb.f

 

akay real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: kuocp Source File: model/rconv.f

 

anegh real*4

anegl real*4

apos real*4

avgmin real*4

avtdiff real*4

bkuo real*4

c1 real*4

coolhi real*4

dddt real*4

dzdet real*4

dzdiv real*4

factr real*4

heatmx real*4

idownd int*4

k int*4

kcoolh int*4

kdet int*4

kdiv int*4

kheat int*4

klfs int*4

kover int*4

overmax real*4

supplyw real*4

vdint real*4

vhint real*4

vmint real*4

wtdiv real*4

wtgnd real*4

wtlcl real*4

wtlfs real*4

zdetr real*4

-----------------------------------------------------------

Module: lambcon_ps Source File: isan/asti.f

 

i int*4

j int*4

k int*4

nv int*4

pi180 real*4

re real*4

rp real*4

xe real*4

xw real*4

yn real*4

yp real*4

ys real*4

-----------------------------------------------------------

Module: laord2x Source File: model/radvn.f

 

flx real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: laord2y Source File: model/radvn.f

 

flx real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: laord2z Source File: model/radvn.f

 

flx real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: latlon_ps Source File: isan/asti.f

 

gglon real*4

grx real*4

gry real*4

i int*4

j int*4

k int*4

nv int*4

-----------------------------------------------------------

Module: latnormv Source File: model/rbnd.f

 

dxl real*4

dxr real*4

i int*4

j int*4

k int*4

ut real*4 dummy array

vt real*4 dummy array

-----------------------------------------------------------

Module: latset Source File: model/rbnd.f

 

ap real*4 dummy array

c1 real*4

dtlx real*4

dxr real*4

dyr real*4

i int*4

j int*4

k int*4

lbe int*4

lbn int*4

lbs int*4

lbw int*4

thresh real*4

-----------------------------------------------------------

Module: lc Source File: model/rname.f

 

l int*4

nc int*4

-----------------------------------------------------------

Module: lcl Source File: model/rconv.f

 

dz real*4

dzlcl real*4 dummy

nitt int*4

p0k real*4

pi0i real*4

pki real*4

plcl real*4 dummy

pppi real*4

rvs real*4

ti real*4

tlcl real*4 dummy

ttd real*4

ttth0 real*4

-----------------------------------------------------------

Module: leaf Source File: model/rsurf.f

 

c1 real*4

c2 real*4

c3 real*4

dens real*4 dummy array

dpcpgl real*4 dummy array

hcapcan real*4

i int*4

ipatch int*4

j int*4

pcpgcon real*4

pcpgl real*4 dummy array

pis real*4 dummy array

prss real*4 dummy array

qpcpgl real*4 dummy array

rdi real*4

rvs real*4 dummy array

schar real*4 dummy array

snowrough real*4

tfact real*4

tgp real*4 dummy array

thetacan real*4 dummy array

ths real*4 dummy array

ups real*4 dummy array

vels real*4 dummy array

vps real*4 dummy array

vt2dd real*4 dummy array

wcapcan real*4

wgp real*4 dummy array

zts real*4 dummy array

-----------------------------------------------------------

Module: leaftw Source File: model/rsurf.f

 

c2 real*4

c3 real*4

depthgain real*4

depthloss real*4

dewgnd real*4

dewgndflx real*4

fac real*4

fracliq real*4 dummy array

gsf real*4 dummy array

hcapcan real*4

hflxgc real*4

i int*4

j int*4

k int*4

kold int*4

ksn int*4

ksnnew int*4

ktrans int*4

kzs int*4

ncall int*4

newlayers int*4

nlayers int*4

nsoil int*4

nveg int*4

pf real*4

qw real*4

qwfree real*4

qwt real*4

schar real*4 dummy array

schar4c real*4

snden real*4

sndenmax real*4

sndenmin real*4

snowmin real*4

soilcap real*4

soilhcap real*4

stretch real*4

tempk real*4 dummy array

tgp real*4 dummy array

thick real*4 array size:1600

thicknet real*4 array size:80

thik real*4

totsnow real*4

vt3da real*4 dummy array

vt3db real*4 dummy array

vt3dc real*4 dummy array

vt3dd real*4 dummy array

vt3di real*4 dummy array

w real*4

wcapcan real*4

wdiff real*4

wflx real*4

wflxgc real*4

wfree real*4

wfreeb real*4

wg real*4

wgp real*4 dummy array

wgpmid real*4

wloss real*4

wt real*4

wtnew real*4

wtold real*4

-----------------------------------------------------------

Module: ll_xy Source File: lib/hutil.f

 

cosplat real*4

cosplon real*4

cosqlat real*4

cosqlon real*4

sinplat real*4

sinplon real*4

sinqlat real*4

sinqlon real*4

t real*4

x real*4 dummy

x3p real*4

x3q real*4

xq real*4

y real*4 dummy

y3p real*4

y3q real*4

yq real*4

z3p real*4

z3q real*4

zq real*4

-----------------------------------------------------------

Module: lwradc Source File: lib/rrad.f

 

bb1 real*4 dummy array

bb2 real*4 dummy array

bndi real*4

cld real*4 dummy array

co2 real*4 dummy array

df1 real*4 dummy array

df2 real*4 dummy array

dmr real*4 dummy array

em1 real*4 dummy array

em2 real*4 dummy array

fthr real*4 dummy array

k int*4

kk int*4

kl int*4

lcldbs int*4

lcldtp int*4

nz int*4

nzp int*4

path_fact real*4

pres_wght real*4

rlong real*4 dummy

scr1 real*4 dummy array

scr2 real*4 dummy array

scr3 real*4 dummy array

sigmat_fact real*4

sx1 real*4

sx2 real*4

trans real*4

uf1 real*4 dummy array

uf2 real*4 dummy array

vpr real*4 dummy array

x real*4

-----------------------------------------------------------

Module: lwradp Source File: lib/rrad.f

 

c1 real*4

c2 real*4

fthr real*4 dummy array

k int*4

nz int*4

nz1 int*4

rlong real*4 dummy

sc real*4 dummy array

-----------------------------------------------------------

Module: make_autotab Source File: model/mic_init.f

 

akbarx real*4 array size:15552

c1tabcc real*4 dummy array

c1tabcr real*4 dummy array

c2tabcc real*4 dummy array

c2tabrr real*4 dummy array

d1 real*4

d1ecc real*4 dummy

d1ecr real*4 dummy

d1max real*4 dummy

d1min real*4 dummy

d2 real*4

d2ecr real*4

d2err real*4

d2max real*4 dummy

d2min real*4 dummy

d2minx real*4

en1 real*4

en1i real*4

en1i2 real*4

en2 real*4

i int*4

id1cc int*4

id1cr int*4

id2cr int*4

id2rr int*4

ir2cr int*4

ir2rr int*4

k int*4

r1 real*4

r1tabcc real*4 dummy array

r1tabcr real*4 dummy array

r2 real*4

r2ecr real*4 dummy

r2err real*4 dummy

r2max real*4 dummy

r2min real*4 dummy

-----------------------------------------------------------

Module: makefn Source File: model/rio.f

 

dstring char*20

fname char*(*) dummy

iblank int*4

id int*4

ih int*4

im int*4

imn int*4

is int*4

iy int*4

last int*4

ttime real*4

xdt real*4

xht real*4

xmt real*4

xsec real*4

xst real*4

-----------------------------------------------------------

Module: makeplt Source File: isan/aplt.f

 

horiz char*1

idims int*4 array size:12

nib int*4

nie int*4

nii int*4

njb int*4

nje int*4

njj int*4

px1 real*4

px2 real*4

py1 real*4

py2 real*4

vert char*1

-----------------------------------------------------------

Module: makesfc1 Source File: model/make_sfc.f

 

ifm int*4

ivtime int*4

makeland int*4

makesst int*4

nvtime int*4

-----------------------------------------------------------

Module: makevarf Source File: isan/avarf.f

 

ipi int*4

ips int*4

iri int*4

irs int*4

isfp int*4

isfqual int*4

isfr int*4

isfs int*4

isft int*4

isfu int*4

isfv int*4

isfzss int*4

isi int*4

its int*4

iui int*4

ius int*4

ivi int*4

ivs int*4

npts int*4

-----------------------------------------------------------

Module: maplc2ps Source File: isan/asti.f

 

pi180 real*4

re real*4

ri real*4 dummy

rj real*4 dummy

rp real*4

x real*4

y real*4

yp real*4

-----------------------------------------------------------

Module: mass_flux Source File: model/rtimh.f

 

area real*4

emass real*4

i int*4

intmass real*4

j int*4

k int*4

nmass real*4

ppp real*4

prtot real*4

smass real*4

tmass real*4

wmass real*4

-----------------------------------------------------------

Module: master_getall Source File: model/mpass_full.F

 

il1 int*4

ind int*4

ir2 int*4

ivar int*4

ivartype int*4

jb1 int*4

jt2 int*4

mxp int*4

mxyp int*4

mxysp int*4

mxyzp int*4

myp int*4

ng int*4

nm int*4

nummess int*4

numvars int*4

nvvv int*4

-----------------------------------------------------------

Module: master_memory Source File: model/rio.f

 

ind int*4

maxwhole int*4

nv int*4

-----------------------------------------------------------

Module: master_sendinit Source File: model/mpass_full.F

 

ind int*4

mxp int*4

mxyp int*4

mxysp int*4

mxyzp int*4

myp int*4

n4 int*4

nm int*4

nmp int*4

-----------------------------------------------------------

Module: masterput_cofnest Source File: model/mpass_init.F

 

iabuff int*4

iadd int*4

nm int*4

nwords int*4

-----------------------------------------------------------

Module: masterput_grid_dimens Source File: model/mpass_init.F

 

iabuff int*4

iadd int*4

nm int*4

nwords int*4

nxpts int*4

nypts int*4

nzpts int*4

-----------------------------------------------------------

Module: masterput_gridinit Source File: model/mpass_init.F

 

iabuff int*4

iadd int*4

nm int*4

nwords int*4

-----------------------------------------------------------

Module: masterput_gridset Source File: model/mpass_init.F

 

iabuff int*4

iadd int*4

nm int*4

nwords int*4

-----------------------------------------------------------

Module: masterput_micphys Source File: model/mpass_init.F

 

iabuff int*4

iadd int*4

nm int*4

nwords int*4

-----------------------------------------------------------

Module: masterput_misc Source File: model/mpass_init.F

 

iabuff int*4

iadd int*4

nm int*4

nwords int*4

-----------------------------------------------------------

Module: masterput_nl Source File: model/mpass_init.F

 

iabuff int*4

iadd int*4

nm int*4

nwords int*4

-----------------------------------------------------------

Module: masterput_processid Source File: model/mpass_init.F

 

nm int*4

-----------------------------------------------------------

Module: masterput_vtab Source File: model/mpass_init.F

 

iabuff int*4

iadd int*4

nm int*4

nwords int*4

-----------------------------------------------------------

Module: mcphys Source File: model/mic_driv.f

 

accpa real*4 dummy array

accpg real*4 dummy array

accph real*4 dummy array

accpp real*4 dummy array

accpr real*4 dummy array

accps real*4 dummy array

dpcpg real*4 dummy array

i int*4

icat int*4

icv int*4

icx int*4

j int*4

k int*4

k1 int*4 array size:40

k2 int*4 array size:40

k3 int*4 array size:40

mc1 int*4

mc2 int*4

mc3 int*4

mc4 int*4

mcat int*4

ncall2 int*4

ncall2g int*4 array size:60

pcpg real*4 dummy array

pcpra real*4 dummy array

pcprg real*4 dummy array

pcprh real*4 dummy array

pcprp real*4 dummy array

pcprr real*4 dummy array

pcprs real*4 dummy array

qpcpg real*4 dummy array

tairc real*4 dummy array

thp real*4 dummy array

-----------------------------------------------------------

Module: micinit Source File: model/mic_init.f

 

c1 real*4

cfden real*4 dummy array

cfemb0 real*4 dummy array

cfen0 real*4 dummy array

cfmasft real*4 dummy array

cfmasi real*4

dict real*4 dummy array

dnfac real*4 dummy array

dnsip real*4

dps real*4 dummy

dps2 real*4 dummy

dpsi real*4

dpsmi real*4 dummy array

emb0log real*4 dummy array

emb1log real*4 dummy array

embsip real*4

flngi real*4

frefac1 real*4 dummy array

frefac2 real*4 dummy array

gam real*4 dummy array

gaminc real*4 dummy array

gamm real*4 dummy array

gamn1 real*4 dummy array

gamsip13 real*4 dummy array

gamsip24 real*4 dummy array

glg real*4

glg1 real*4

glg2 real*4

glgc real*4

glgm real*4

glgmv real*4

gym real*4

ia int*4

icat int*4

ihcat int*4

parm real*4 dummy array

pwden real*4 dummy array

pwemb0 real*4 dummy array

pwen0 real*4 dummy array

pwmasi real*4

rictmax real*4 dummy

rictmin real*4 dummy

sipfac real*4 dummy array

vtfac real*4 dummy array

-----------------------------------------------------------

Module: micro Source File: model/mic_driv.f

 

nembs int*4

-----------------------------------------------------------

Module: micro_master Source File: model/mic_init.f

 

cname char*80

dataline char*80

idum int*4

ihcat int*4

iicat int*4

iihcat int*4

indbc int*4

jhcat int*4

nd1 int*4

nd2 int*4

nip int*4

-----------------------------------------------------------

Module: mkbcbuff Source File: model/mpass_full.F

 

b real*4 dummy array

i int*4

ind int*4 dummy

j int*4

k int*4

-----------------------------------------------------------

Module: mkbcsbuff Source File: model/mpass_full.F

 

b real*4 dummy array

i int*4

ind int*4 dummy

j int*4

k int*4

-----------------------------------------------------------

Module: mkbuffc Source File: model/mpass_full.F

 

b real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: mkccntab Source File: model/mic_init.f

 

ak real*4

ak0 real*4

bigmass real*4

cc real*4

ccinit real*4

ccn real*4

ccn0 real*4

ccnew real*4

ccnmax real*4

cctab real*4 dummy array

denfac real*4

denom real*4

dn0 real*4

dplinv real*4

dropmass real*4

dtlttab real*4

dynvisc real*4

elapstm real*4

elsref real*4

elsrefp real*4

emb real*4

excessrv real*4

fre real*4

iak int*4

icc int*4

iccn int*4

iccnprg int*4 dummy

isup int*4

itemp int*4

iter int*4

lak int*4

lccn int*4

mkccntb int*4

press real*4

qhydm real*4

rc real*4

rctab real*4 dummy array

rt real*4

rtbeg real*4

rtend real*4

rv real*4

rvlsair real*4

rvlsref real*4

rvlsrefp real*4

rvstr real*4

saa real*4

sab real*4

sac real*4

sad real*4

sae real*4

sba real*4

sbb real*4

sbc real*4

sbcl real*4

sbd real*4

sbel real*4

sbfl real*4

sbgl real*4

sbi real*4

sbjl real*4

sca real*4

scd real*4

sce real*4

scf real*4

scg real*4

sda real*4

sdb real*4

sdc real*4

sdd real*4

supbeg real*4

supend real*4

supsat real*4

tair real*4

tairc real*4

tairstr real*4

tairstrc real*4

thrmcon real*4

tilstr real*4

trefl real*4

vap real*4

vapdif real*4

-----------------------------------------------------------

Module: mkcoltb Source File: model/mic_init.f

 

coltabc real*4 dummy array

coltabr real*4 dummy array

dnmaxx real*4

dnmaxy real*4

dnminx real*4

dnminy real*4

dnx real*4

dny real*4

dx real*4 array size:80

dxhi real*4

dxlo real*4

fx real*4 array size:80

gx real*4 array size:80

gxm real*4

gym real*4

gyn real*4

gyn1 real*4

gyn2 real*4

gynp real*4

gynp1 real*4

gynp2 real*4

idx int*4

iembx int*4

iemby int*4

ihx int*4

ihy int*4

ix int*4

iy int*4

vny real*4

-----------------------------------------------------------

Module: mknest_buff Source File: model/mpass_nest.F

 

acs real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: mksbuff Source File: model/mpass_full.F

 

b real*4 dummy array

i int*4

ip int*4

j int*4

k int*4

-----------------------------------------------------------

Module: mksedim_tab Source File: model/mic_init.f

 

c1 real*4

cbin real*4 array size:200

delzsfc real*4

diam real*4

diam0 real*4

diam1 real*4

disp real*4

disp0 real*4

disp1 real*4

dispemb real*4

dispemb0 real*4 dummy array

dispemb1 real*4 dummy array

dmbodn real*4

fac1 real*4

fac2 real*4

fac3 real*4

fac4 real*4

fallin real*4

i int*4

ibin int*4

icat int*4

iembs int*4

j int*4

jbin int*4

k int*4

kfall int*4 dummy array

kk int*4

kkf int*4

pcpfill real*4 dummy array

rbin real*4 array size:200

reldisp real*4 array size:200

sfcpcp real*4 dummy array

sumc real*4

sumr real*4

zbotnew real*4

ztopnew real*4

-----------------------------------------------------------

Module: mkstbuff Source File: model/mpass_st.F

 

b real*4 dummy array

i int*4

ind int*4 dummy

j int*4

k int*4

-----------------------------------------------------------

Module: mkstbuffs Source File: model/mpass_st.F

 

b real*4 dummy array

i int*4

ind int*4 dummy

j int*4

k int*4

-----------------------------------------------------------

Module: model Source File: model/rdriv.f

 

begtime real*4

icm int*4

nfeed int*4

npass int*4

wtime1 real*4

wtime2 real*4

wtime_start real*4

wtime_tot real*4

-----------------------------------------------------------

Module: modsched Source File: model/modsched.f

 

is int*4

ischtab int*4 dummy array

isstp int*4

itopgrd int*4

k int*4

n int*4

ncnt int*4 array size:200

ng int*4

ngrid int*4

nnfm int*4 array size:200

nsub int*4 dummy

nt int*4

ntt int*4

-----------------------------------------------------------

Module: movenest Source File: model/rnest.f

 

icm int*4

idi int*4

idj int*4

ifm int*4

nc int*4

nf int*4

ngr int*4

-----------------------------------------------------------

Module: mrsi Source File: lib/rutil.f

 

n int*4

rsi real*4 dummy array

-----------------------------------------------------------

Module: mrsl Source File: lib/rutil.f

 

n int*4

rsl real*4 dummy array

-----------------------------------------------------------

Module: mxdefm Source File: model/rturb.f

 

akm real*4

c1 real*4

c2 real*4

c3 real*4

csx2 real*4

enfl real*4

i int*4

ienfl int*4

irich int*4

j int*4

k int*4

rchmax real*4

scr1 real*4 dummy array

scr2 real*4 dummy array

vt3dh real*4 dummy array

vt3dk real*4 dummy array

-----------------------------------------------------------

Module: mxtked Source File: model/rturb.f

 

dxi real*4

i int*4

j int*4

k int*4

scl real*4

scls real*4

sclu real*4

scr1 real*4 dummy array

scr2 real*4 dummy array

sw real*4

tket real*4 dummy array

vt3dh real*4 dummy array

vt3di real*4 dummy array

wght1 real*4

wght3 real*4

-----------------------------------------------------------

Module: namein Source File: lib/rname.f

 

isub1 int*4

isub2 int*4

line char*80

ncw int*4

nr int*4

nt int*4

nvalue int*4

nvarn int*4

value char array size:8000

varn char*20

-----------------------------------------------------------

Module: nameout Source File: model/rname.f

 

k int*4

m int*4

ng int*4

np int*4

-----------------------------------------------------------

Module: ndvilai Source File: model/rusgs.f

 

i int*4

ityp int*4

iveg int*4

j int*4

rlai real*4 dummy array

-----------------------------------------------------------

Module: newgrid Source File: model/rinit.f

 

i int*4

j int*4

k int*4

nv int*4

-----------------------------------------------------------

Module: newtemp Source File: model/mic_misc.f

 

k int*4

rv real*4 dummy array

rvisair real*4 dummy array

rvlsair real*4 dummy array

tair real*4 dummy array

tairc real*4 dummy array

theta real*4 dummy array

-----------------------------------------------------------

Module: node_decomp Source File: model/para_init.f

 

i1 int*4

i2 int*4

icm int*4

idn int*4

ifm int*4

isn int*4

itype int*4

ixy int*4

ixyz int*4

j1 int*4

j2 int*4

jnode int*4

memf int*4

nc int*4

nestvar int*4

nf int*4

ng int*4

ngr int*4

nsiz int*4

num_feed_buff int*4

num_lbc_buff int*4

num_nest_buff int*4

num_turb_buff int*4

numbuff int*4

-----------------------------------------------------------

Module: node_getfeed Source File: model/mpass_feed.F

 

i1c int*4

i2c int*4

iadbuff int*4

iadbuffm int*4

icall int*4

iptr int*4

itype int*4

j1c int*4

j2c int*4

k1c int*4

k2c int*4

mtp int*4

nfx int*4

nfy int*4

nfz int*4

nm int*4

nv int*4

nwords int*4

-----------------------------------------------------------

Module: node_getinit Source File: model/mpass_full.F

 

ind int*4

mxyp int*4

mxysp int*4

mxyzp int*4

nmp int*4

-----------------------------------------------------------

Module: node_getlbc Source File: model/mpass_lbc.F

 

ind int*4

itype int*4

mtp int*4

nm int*4

nmp int*4

nptsxy int*4

-----------------------------------------------------------

Module: node_getnbc Source File: model/mpass_nest.F

 

iabuff int*4

iadd int*4

iptc int*4 array size:256

iptr int*4

iptv int*4 array size:256

itype int*4

mtp int*4

nm int*4

nv int*4

nxc int*4

nyc int*4

nzc int*4

-----------------------------------------------------------

Module: node_getst Source File: model/mpass_st.F

 

itype int*4

mtp int*4

nm int*4

nptsxy int*4

-----------------------------------------------------------

Module: node_getturb Source File: model/mpass_turb.F

 

itype int*4

mtp int*4

nm int*4

nptsxy int*4

-----------------------------------------------------------

Module: node_memory Source File: model/rio.f

 

ind int*4

maxsub int*4

mmxyp int*4 array size:32

mmxysp int*4 array size:32

mmxyzp int*4 array size:32

nmem int*4

nv int*4

-----------------------------------------------------------

Module: node_sendall Source File: model/mpass_full.F

 

ind int*4

msgnum int*4

msgtags int*4 array size:16

mxyp int*4

mxysp int*4

mxyzp int*4

nmp int*4

-----------------------------------------------------------

Module: node_sendfeed Source File: model/mpass_feed.F

 

i1 int*4

i1f int*4

i2 int*4

i2f int*4

iadbuff int*4

iadbuffm int*4

icm int*4

ifm int*4

iptr int*4

itype int*4

itypef int*4

ivar_feed int*4 array size:280

ivar_type int*4 array size:280

j1 int*4

j1f int*4

j2 int*4

j2f int*4

k1 int*4

k1c int*4

k2 int*4

k2c int*4

mtp int*4

nc int*4

nf int*4

nm int*4

nv int*4

nvar int*4

nwords int*4

-----------------------------------------------------------

Module: node_sendlbc Source File: model/mpass_lbc.F

 

i1 int*4

i2 int*4

ind int*4

itype int*4

j1 int*4

j2 int*4

ncall int*4

nm int*4

nmp int*4

-----------------------------------------------------------

Module: node_sendnbc Source File: model/mpass_nest.F

 

i1 int*4

i2 int*4

iptr int*4

itype int*4

ivar_feed int*4 array size:280

ivar_type int*4 array size:280

j1 int*4

j2 int*4

k1 int*4

k2 int*4

mtp int*4

nc int*4

nf int*4

nm int*4

nv int*4

nvar int*4

-----------------------------------------------------------

Module: node_sendst Source File: model/mpass_st.F

 

i1 int*4

i2 int*4

itype int*4

j1 int*4

j2 int*4

nm int*4

-----------------------------------------------------------

Module: node_sendturb Source File: model/mpass_turb.F

 

i1 int*4

i2 int*4

itype int*4

j1 int*4

j2 int*4

nm int*4

-----------------------------------------------------------

Module: nodeget_cofnest Source File: model/mpass_init.F

 

iabuff int*4

iadd int*4

nwords int*4

-----------------------------------------------------------

Module: nodeget_grid_dimens Source File: model/mpass_init.F

 

iabuff int*4

iadd int*4

ngrid int*4

nm int*4

nwords int*4

-----------------------------------------------------------

Module: nodeget_gridinit Source File: model/mpass_init.F

 

iabuff int*4

iadd int*4

nwords int*4

-----------------------------------------------------------

Module: nodeget_gridset Source File: model/mpass_init.F

 

iabuff int*4

iadd int*4

nwords int*4

-----------------------------------------------------------

Module: nodeget_micphys Source File: model/mpass_init.F

 

iabuff int*4

iadd int*4

nwords int*4

-----------------------------------------------------------

Module: nodeget_misc Source File: model/mpass_init.F

 

iabuff int*4

iadd int*4

nwords int*4

-----------------------------------------------------------

Module: nodeget_nl Source File: model/mpass_init.F

 

iabuff int*4

iadd int*4

nwords int*4

-----------------------------------------------------------

Module: nodeget_vtab Source File: model/mpass_init.F

 

iabuff int*4

iadd int*4

nwords int*4

-----------------------------------------------------------

Module: nstb Source File: model/rnest.f

 

bx real*4 dummy array

by real*4 dummy array

bz real*4 dummy array

i int*4

j int*4

k int*4

nxfm int*4

nyfm int*4

nzfm int*4

-----------------------------------------------------------

Module: nstbdriv Source File: model/rtimi.f

 

n int*4

tymeinvs real*4

tymeinvv real*4

-----------------------------------------------------------

Module: nstbtnd Source File: model/rnest.f

 

i int*4

incia int*4

inciz int*4

incja int*4

incjz int*4

j int*4

k int*4

nxfm int*4

nyfm int*4

nzfm int*4

sct real*4 dummy array

-----------------------------------------------------------

Module: nstfeed Source File: model/rnest.f

 

icm int*4

isc1 int*4

isc2 int*4

nc int*4

nf int*4

-----------------------------------------------------------

Module: nudge Source File: model/rvari.f

 

i int*4

il int*4

ir int*4

j int*4

jl int*4

jr int*4

k int*4

pt real*4 dummy array

rtt real*4 dummy array

tfact real*4

tht real*4 dummy array

ut real*4 dummy array

vt real*4 dummy array

-----------------------------------------------------------

Module: nvfillm Source File: model/rname.f

 

is1 int*4

-----------------------------------------------------------

Module: nvfills Source File: isan/asgen.f

 

is1 int*4

is2 int*4

-----------------------------------------------------------

Module: nvtran Source File: lib/rname.f

 

nv int*4

-----------------------------------------------------------

Module: obanl Source File: isan/asti.f

 

gamma real*4

iaddr1 int*4

iaddr2 int*4

iaddrq int*4

idat int*4

idat2 int*4

igns int*4

iqflag int*4

iscr int*4

iswt int*4

ixxx int*4

iyyy int*4

nwords int*4

-----------------------------------------------------------

Module: obs_isen Source File: isan/asti.f

 

k int*4

l int*4

lbc int*4

lbchyd int*4

lbcp int*4

lp int*4

lz int*4

ns int*4

obsp real*4 dummy array

obsr real*4 dummy array

obss real*4 dummy array

obsu real*4 dummy array

obsv real*4 dummy array

pk real*4 array size:2000

pkn real*4

po real*4

pth real*4 array size:2000

syo real*4

th real*4

tho real*4

wt real*4

zi real*4 array size:2000

-----------------------------------------------------------

Module: obs_sigz Source File: isan/asti.f

 

bchyd real*4

k int*4

kbcu int*4

l int*4

lbc int*4

lbcp int*4

lp int*4

lz int*4

ns int*4

obsp real*4 dummy array

obsr real*4 dummy array

obst real*4 dummy array

obsu real*4 dummy array

obsv real*4 dummy array

pio real*4

pk real*4 array size:2000

psz real*4 array size:400

pth real*4 array size:2000

rsz real*4 array size:400

sigzr real*4 array size:400

tho real*4

tsz real*4 array size:400

wt real*4

zso real*4

-----------------------------------------------------------

Module: opspec1 Source File: model/rdint.f

 

icm int*4

ierr int*4

ifaterr int*4

ifm int*4

infoerr int*4

iwarerr int*4

ng int*4

nhemgrds int*4

-----------------------------------------------------------

Module: opspec2 Source File: model/rdint.f

 

icm int*4

ifaterr int*4

ifm int*4

infoerr int*4

iwarerr int*4

kc int*4

ncx int*4

ncy int*4

nesta int*4

nfx int*4

nfxp int*4

nfy int*4

nfyp int*4

nfz int*4

-----------------------------------------------------------

Module: opspec3 Source File: model/rdint.f

 

ifaterr int*4

infoerr int*4

ip int*4

iwarerr int*4

k int*4

ng int*4

ngr int*4

-----------------------------------------------------------

Module: optlib Source File: model/rprnt.f

 

fmt char*8 dummy

iplgrd int*4 dummy

iprt int*4

kk int*4

prta real*4

prtc real*4

prtg real*4

prth real*4

prtp real*4

prtr real*4

prts real*4

rtot real*4

rvap real*4

tcn real*4

til char*8 dummy

u1 real*4

u2 real*4

v1 real*4

v2 real*4

val1 real*4

val2 real*4

val3 real*4

valpi0 real*4

valpp real*4

valprs real*4

valrtp real*4

valrv real*4

valrvs real*4

valtemp real*4

valth0 real*4

valthet real*4

valthv0 real*4

-----------------------------------------------------------

Module: par_bintp Source File: model/rnest_par.f

 

ac real*4 dummy array

as real*4 dummy array

bx real*4 dummy array

by real*4 dummy array

bz real*4 dummy array

ia int*4

ic int*4

if int*4

im int*4

iv int*4

iz int*4

ja int*4

jc int*4

jf int*4

jm int*4

jv int*4

jz int*4

k1 int*4

k2 int*4

kc int*4

kf int*4

kv int*4

nc int*4

-----------------------------------------------------------

Module: par_decomp Source File: model/rw2.f

 

anodes real*4

aslabs real*4

i int*4

iblock int*4

inode int*4

islab int*4

ixb int*4 dummy array

ixe int*4 dummy array

iyb int*4 dummy array

iye int*4 dummy array

j int*4

jnode int*4

jrow int*4 dummy array

jrows int*4 dummy array

knode int*4

min_nodes int*4

nbigslabs int*4

nblocks int*4 dummy array

nslabs int*4

slabspeed real*4

totspeed real*4

workaccum real*4

workblock real*4 dummy array

workcol real*4 dummy array

workdom real*4

workload real*4 dummy array

workrow real*4 dummy array

workslab real*4

worksofar real*4

-----------------------------------------------------------

Module: par_decomp_bounds Source File: model/para_init.f

 

ng int*4

nm int*4

nx int*4

ny int*4

-----------------------------------------------------------

Module: par_est_time Source File: model/rw2.f

 

i int*4

j int*4

work real*4 dummy array

-----------------------------------------------------------

Module: par_model Source File: model/rdriv.f

 

begtime real*4

ifm int*4

isendflg int*4

n int*4

nm int*4

nnm int*4

npass int*4

pcpu real*4

pwall real*4

timemf real*4

wtime1 real*4

wtime2 real*4

wtime_start real*4

wtime_tot real*4

-----------------------------------------------------------

Module: par_node_paths Source File: model/rw2.f

 

i int*4

idn int*4

ig int*4

igetpaths int*4 dummy array

ih int*4

info int*4

ipaths int*4 dummy array

isend_type int*4

isn int*4

j int*4

ngr int*4

nnn int*4

-----------------------------------------------------------

Module: pc03 Source File: model/mic_misc.f

 

jflag int*4

k int*4

pwvtmasi real*4

vt real*4 dummy array

-----------------------------------------------------------

Module: pconjb1 Source File: isan/askewt.f

 

tck real*4

tk real*4

-----------------------------------------------------------

Module: pinterp Source File: isan/askewt.f

 

dewp real*4 dummy array

ht real*4 dummy array

i int*4

nlevs int*4 dummy

pres real*4 dummy array

temp real*4 dummy array

wdir real*4 dummy array

wspd real*4 dummy array

-----------------------------------------------------------

Module: pltisn Source File: isan/astga.f

 

ith int*4

k int*4

nplt int*4

snelat real*4

snelon real*4

swlat real*4

swlon real*4

-----------------------------------------------------------

Module: pltpr Source File: isan/astga.f

 

imid int*4

ipl int*4

iprtrans int*4

jmid int*4

k int*4

nplt int*4

poleplat real*4

poleplon real*4

snelat real*4

snelon real*4

swlat real*4

swlon real*4

-----------------------------------------------------------

Module: pltsig Source File: isan/astga.f

 

k int*4

nplt int*4

snelat real*4

snelon real*4

swlat real*4

swlon real*4

-----------------------------------------------------------

Module: pltxy Source File: isan/astga.f

 

i int*4

j int*4

nnxx int*4

nnyy int*4

rota real*4

title char*20

-----------------------------------------------------------

Module: polarst Source File: model/rinit.f

 

c1 real*4

fmapm real*4 dummy array

fmapmi real*4 dummy array

fmapt real*4 dummy array

fmapti real*4 dummy array

fmapu real*4 dummy array

fmapui real*4 dummy array

fmapv real*4 dummy array

fmapvi real*4 dummy array

i int*4

j int*4

xm2 real*4

xt2 real*4

ym2 real*4

yt2 real*4

-----------------------------------------------------------

Module: powtjb1 Source File: isan/askewt.f

 

pt real*4

tc real*4

-----------------------------------------------------------

Module: pr_hystatic_z Source File: isan/astp.f

 

n int*4

t1 real*4 dummy array

tv1 real*4

tv2 real*4

vtfact real*4

z1 real*4 dummy array

-----------------------------------------------------------

Module: pr_interp Source File: isan/astp.f

 

a2 real*4 dummy array

n int*4

-----------------------------------------------------------

Module: pr_miss_fill Source File: isan/astp.f

 

ierr int*4 dummy

ilev int*4

ithere int*4 dummy array

k int*4

kk int*4

-----------------------------------------------------------

Module: prdctp1 Source File: model/raco.f

 

heatdv real*4 dummy array

heatfx real*4 dummy array

heatfx1 real*4 dummy array

i int*4

j int*4

k int*4

pp real*4 dummy array

rocvpct real*4

-----------------------------------------------------------

Module: prdctp2 Source File: model/raco.f

 

i int*4

j int*4

k int*4

pp real*4 dummy array

-----------------------------------------------------------

Module: prdctu Source File: model/raco.f

 

dpdx real*4 dummy array

dxl real*4

i int*4

j int*4

k int*4

up real*4 dummy array

vt3da real*4 dummy array

-----------------------------------------------------------

Module: prdctv Source File: model/raco.f

 

dpdy real*4 dummy array

i int*4

j int*4

k int*4

vp real*4 dummy array

vt3da real*4 dummy array

-----------------------------------------------------------

Module: prdctw1 Source File: model/raco.f

 

i int*4

j int*4

k int*4

wp real*4 dummy array

-----------------------------------------------------------

Module: prdctw2 Source File: model/raco.f

 

amog real*4 dummy array

i int*4

j int*4

k int*4

wp real*4 dummy array

-----------------------------------------------------------

Module: prdctw3 Source File: model/raco.f

 

i int*4

j int*4

k int*4

wp real*4 dummy array

-----------------------------------------------------------

Module: prebarn Source File: isan/asti.f

 

gln real*4

glt real*4

gobkm real*4

gobrd real*4

gsdat real*4 dummy array

gswt real*4 dummy array

i int*4

iq int*4

iqf int*4 array size:16

j int*4

k int*4

n int*4

ngs int*4 dummy

ns int*4

nv int*4

scra real*4 dummy array

-----------------------------------------------------------

Module: precinv Source File: isan/askewt.f

 

dp real*4

i int*4

p1 real*4

p2 real*4

pww real*4 dummy array

s real*4

w1 real*4

w2 real*4

-----------------------------------------------------------

Module: predict Source File: model/rtimi.f

 

ac real*4 dummy array

af real*4 dummy array

ap real*4 dummy array

epsu real*4

m int*4

-----------------------------------------------------------

Module: predtr Source File: model/rtimi.f

 

mxyzp int*4

n int*4

-----------------------------------------------------------

Module: press_miss Source File: isan/astp.f

 

ithere int*4 dummy array

k int*4

prs real*4 array size:80

prsln real*4 array size:80

-----------------------------------------------------------

Module: pressio Source File: isan/asgen.f

 

ctype char*10

l int*4

locfn char*80

npts int*4

nx1 int*4

ny1 int*4

nz1 int*4

-----------------------------------------------------------

Module: prfill Source File: isan/astp.f

 

dn real*4 dummy array

i int*4

j int*4

-----------------------------------------------------------

Module: prgintrp Source File: model/rnest.f

 

icm int*4

nc int*4

nf int*4

-----------------------------------------------------------

Module: prlatlon Source File: isan/astp.f

 

i int*4

j int*4

plat real*4 dummy array

plon real*4 dummy array

-----------------------------------------------------------

Module: prosep Source File: model/rvtab.f

 

ccond1 char*(*) dummy

ccond2 char*(*) dummy

cdimen char*(*) dummy

cname char*(*) dummy

ctable char dummy array

cvar char*(*) dummy

iclen int*4

icst int*4

isep int*4

ntab int*4 dummy

ntok int*4

-----------------------------------------------------------

Module: prstage Source File: isan/astp.f

 

i int*4

ipr int*4

ipt int*4

ipu int*4

ipv int*4

ipz int*4

j int*4

k int*4

thmax real*4

thmin real*4

-----------------------------------------------------------

Module: prt2d Source File: lib/rutil.f

 

a real*4 dummy array

b char*133

fmtb char*16

fmtc char*16

fmtt char*80

fmtt2 char*80

fmtx char*8

fmty char*8

i int*4

ia int*4

ib int*4

ichend int*4

ichst int*4

ifdw int*4

ii int*4

ii1 int*4

ii2 int*4

ipage int*4

j int*4

jj int*4

jj1 int*4

jj2 int*4

jrow int*4

mmax int*4

ncol int*4

ndiff int*4

npages int*4

nppge int*4

xlab char*16

xx real*4 dummy array size:4

xxmax real*4

ylab char*16

yy real*4 dummy array size:4

yymax real*4

-----------------------------------------------------------

Module: prtlev Source File: model/mpass_nest.F

 

i int*4

j int*4

-----------------------------------------------------------

Module: prtopt Source File: model/rprnt.f

 

k int*4

-----------------------------------------------------------

Module: prtout Source File: model/rprnt.f

 

aa real*4

deli real*4

delj real*4

fact real*4

horiz char*1

hr real*4

i int*4

iaddp int*4

iaddr int*4

ierr int*4

ihdim int*4

iiaa int*4

iiab int*4

iii int*4

iist int*4

indp int*4

iplt int*4

ivdim int*4

j int*4

jjj int*4

jjoa int*4

jjob int*4

jjst int*4

jnam char*8

k int*4

ll int*4

mm int*4

naa1 int*4

noa1 int*4

npsize int*4

scrslb real*4 array size:4

tt char*68

vert char*1

xlab char*8

ylab char*8

-----------------------------------------------------------

Module: psfill Source File: isan/asti.f

 

aaa real*4 dummy array

k int*4

-----------------------------------------------------------

Module: psxfer Source File: model/mic_cols.f

 

dn real*4

dnum real*4

dvap real*4

enxfer real*4 dummy array

icat int*4

ihcat int*4

it int*4

k int*4

qrxfer real*4 dummy array

rxfer real*4 dummy array

sign real*4

vapx real*4

xcx real*4

xlim real*4

-----------------------------------------------------------

Module: ptlcljb1 Source File: isan/askewt.f

 

c1 real*4

c2 real*4

pc real*4 dummy

tc real*4 dummy

-----------------------------------------------------------

Module: pzcombo Source File: isan/askewt.f

 

dd real*4

dir real*4 dummy array

dwpt real*4 dummy array

ff real*4

ht real*4 dummy array

ik int*4

ik1 int*4

iki int*4

ikk int*4

ikt int*4

ilp int*4

ilz int*4

nlev int*4 dummy

pres real*4 dummy array

rmixx real*4

spd real*4 dummy array

tbar real*4

temp real*4 dummy array

-----------------------------------------------------------

Module: qtc Source File: model/rsurf.f

 

fracliq real*4 dummy

tempc real*4 dummy

-----------------------------------------------------------

Module: qtk Source File: model/rsurf.f

 

fracliq real*4 dummy

tempk real*4 dummy

-----------------------------------------------------------

Module: qwtk Source File: model/rsurf.f

 

fracliq real*4 dummy

qwliq0 real*4

tempk real*4 dummy

-----------------------------------------------------------

Module: radcomp Source File: model/rmisc.f

 

a1 real*4

a2 real*4

cosi real*4

dayhr real*4

dayhrr real*4

dlon real*4

dzsdx real*4

dzsdy real*4

fthrd real*4 dummy array

gglon real*4

hrangl real*4

i int*4

ipatch int*4

j int*4

k int*4

rlong real*4 dummy array

rshort real*4 dummy array

sazmut real*4

sinz real*4

slangl real*4

slazim real*4

-----------------------------------------------------------

Module: rams2_mm Source File: isan/astga.f

 

ini int*4

vmax real*4 dummy

vmin real*4 dummy

-----------------------------------------------------------

Module: rams_3to2d Source File: isan/aplt.f

 

i int*4

j int*4

k int*4

outcoords real*4 dummy array

outdata real*4 dummy array

-----------------------------------------------------------

Module: rams_aprep Source File: model/rio.f

 

c real*4 dummy array

i int*4

-----------------------------------------------------------

Module: rams_dintsort Source File: model/dateutils.f

 

cscr char*200

cstr char dummy array

mini int*8

n int*4

nm int*4

nmm int*4

nscr int*8

nums int*8 dummy array

-----------------------------------------------------------

Module: rams_grad Source File: model/rgrad.f

 

jaa int*4

jzz int*4

-----------------------------------------------------------

Module: rams_master Source File: model/rdriv.f

 

i int*4

iaddr int*4

iaddrb int*4

iboff int*4

-----------------------------------------------------------

Module: rams_mm Source File: isan/asti.f

 

i int*4

omax real*4 dummy

omin real*4 dummy

-----------------------------------------------------------

Module: rams_node Source File: model/rnode.f

 

begtime real*4

icm int*4

ifm int*4

nfeed int*4

npass int*4

nt int*4

timemf real*4

totcpu real*4

w1 real*4

w2 real*4

wstart real*4

-----------------------------------------------------------

Module: rams_output Source File: model/rdriv.f

 

icm int*4

ifm int*4

itime int*4

iupd int*4 array size:36

-----------------------------------------------------------

Module: rams_sort_dint3 Source File: model/dateutils.f

 

iall int*8 dummy array

mini int*8

n int*4

nm int*4

nmm int*4

nscr int*8

nt int*4 dummy

-----------------------------------------------------------

Module: rams_sst_init Source File: model/make_sfc.f

 

a real*4 dummy array

icm int*4

ifm int*4

ind int*4

tfact real*4

-----------------------------------------------------------

Module: rams_sstf_init Source File: model/make_sfc.f

 

begsimtime real*4

cgrid char*2

flnm char*80

idf int*4

ifm int*4

itime int*4

iy int*4

lc int*4

makesst int*4 dummy

ndays int*4

nfn int*4

nshft int*4

nsst int*4

sstftime real*4

-----------------------------------------------------------

Module: rams_unique_dint Source File: model/dateutils.f

 

ia1 int*8 dummy array

n int*4

n1 int*4 dummy

nn int*4

nt int*4

-----------------------------------------------------------

Module: rams_varf_init Source File: model/rvari.f

 

begsimtime real*4

deltaxx real*4

deltayx real*4

deltazx real*4

dzmaxx real*4

dzratx real*4

fpref char*256

idatex int*4

ihourx int*4

imonthx int*4

iy int*4

iyearx int*4

nc int*4

ndays int*4

nfn int*4

nv int*4

nxpx int*4

nypx int*4

nzpx int*4

polelatx real*4

polelonx real*4

varftime real*4

-----------------------------------------------------------

Module: rams_vsstf_init Source File: model/make_sfc.f

 

dummy real*4

flnm char*80

itime int*4

lc int*4

nc int*4

there log*4

-----------------------------------------------------------

Module: range_check Source File: model/mic_misc.f

 

cx real*4 dummy array

enxfer real*4 dummy array

icat int*4

jcat int*4

k int*4

k1 int*4 dummy array

k2 int*4 dummy array

k3 int*4 dummy array

kf1 int*4

kf2 int*4

l int*4

qr real*4 dummy array

qrxfer real*4 dummy array

qx real*4 dummy array

rx real*4 dummy array

rxfer real*4 dummy array

tx real*4 dummy array

vap real*4 dummy array

-----------------------------------------------------------

Module: rawplt Source File: isan/astga.f

 

chlat char*5

chlon char*7

chtop char*6

fsize real*4

iii int*4

ij int*4

ilp int*4

ilz int*4

ip_m int*4

ix int*4

jy int*4

nb1 int*4

nframe int*4

nframes int*4

ng1 int*4

nplot int*4 dummy

ns int*4

numrx int*4

numry int*4

sb real*4 array size:196

sb1 real*4

sb2 real*4

sbb real*4

sl real*4 array size:196

sl1 real*4

sl2 real*4

sll real*4

sminc real*4

sr real*4 array size:196

sr1 real*4

sr2 real*4

srr real*4

st real*4 array size:196

st1 real*4

st2 real*4

stt real*4

sxinc real*4

syinc real*4

tinc real*4

ub1 real*4

ub2 real*4

ubb real*4

ul1 real*4

ul2 real*4

ull real*4

ullab real*4

ur1 real*4

ur2 real*4

urr real*4

ut1 real*4

ut2 real*4

utt real*4

uvmax real*4

uvmin real*4

value3 char*3

value4 char*4

xvals real*4 dummy array

yvals real*4 dummy array

z100m real*4

z250m real*4

z500m real*4

zmax real*4

zmin real*4

-----------------------------------------------------------

Module: rayf Source File: model/rbnd.f

 

c1 real*4

c2 real*4

i int*4

j int*4

k int*4

kf int*4

tht real*4 dummy array

var real*4 dummy array

zmkf real*4

-----------------------------------------------------------

Module: rayft Source File: model/rbnd.f

 

a real*4 dummy array

ii int*4

mxyzp int*4

-----------------------------------------------------------

Module: read_nl Source File: model/rdint.f

 

tfact real*4

-----------------------------------------------------------

Module: rearrange Source File: model/rio.f

 

b real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: rearrange_p Source File: model/rio.f

 

b real*4 dummy array

i int*4

ip int*4

j int*4

-----------------------------------------------------------

Module: refs1d Source File: model/rhhi.f

 

k int*4

-----------------------------------------------------------

Module: refs3d Source File: model/rinit.f

 

c1 real*4

c2 real*4

c3 real*4

dn0 real*4 dummy array

i int*4

j int*4

k int*4

pi0 real*4 dummy array

-----------------------------------------------------------

Module: rmspaces Source File: model/rdriv.f

 

lenstr int*4

n int*4

nchar int*4 dummy

newstring char*(*) dummy

-----------------------------------------------------------

Module: rs Source File: lib/rutil.f

 

es real*4

-----------------------------------------------------------

Module: rsif Source File: lib/rutil.f

 

esi real*4

x real*4

-----------------------------------------------------------

Module: rslf Source File: lib/rutil.f

 

esl real*4

x real*4

-----------------------------------------------------------

Module: rtgintrp Source File: model/rnest.f

 

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: satadjst Source File: model/rthrm.f

 

i int*4

iterate int*4

j int*4

k int*4

p real*4 dummy array

picpi real*4

rcp real*4 dummy array

rv real*4 dummy array

rvls real*4 dummy array

t real*4 dummy array

theta real*4 dummy array

til real*4

tt real*4

-----------------------------------------------------------

Module: satlftjb1 Source File: isan/askewt.f

 

dlt real*4

eone real*4

etwo real*4

pt real*4

pwrp real*4

rate real*4

tone real*4

ttwo real*4

-----------------------------------------------------------

Module: sedim Source File: model/mic_cols.f

 

accp real*4 dummy

c1 real*4

c2 real*4

c3 real*4

cnew real*4 dummy array

cold real*4 dummy array

colddn0 real*4

dispemb real*4

dpcpg real*4 dummy

iemb int*4

iemb2 int*4

k int*4

kk int*4

kkf int*4

pcpg real*4 dummy

pcpr real*4 dummy

psfc real*4

qnew real*4

qold real*4 dummy array

qpcpg real*4 dummy

qrnew real*4 dummy array

qrolddn0 real*4

riemb real*4

rnew real*4 dummy array

rold real*4 dummy array

rolddn0 real*4

rtp real*4 dummy array

thpdif real*4 dummy array

wt2 real*4

-----------------------------------------------------------

Module: sfcbc Source File: model/rsurf.f

 

gsf real*4 dummy array

i int*4

j int*4

k int*4

schar real*4 dummy array

tgp real*4 dummy array

wgp real*4 dummy array

-----------------------------------------------------------

Module: sfcdata Source File: model/rsurf.f

 

k int*4

nnn int*4

romin real*4

roorg real*4

slfcap real*4

-----------------------------------------------------------

Module: sfcinit Source File: model/rsurf.f

 

airtemp real*4

c1 real*4

gsf real*4 dummy array

i int*4

ipatch int*4

j int*4

k int*4

nsoil int*4

nveg int*4

pis real*4 dummy array

prss real*4 dummy array

rvs real*4 dummy array

schar real*4 dummy array

tgp real*4 dummy array

wgp real*4 dummy array

-----------------------------------------------------------

Module: sfclmcv Source File: model/rsurf.f

 

cosine1 real*4 dummy array

i int*4

j int*4

psin real*4

sine1 real*4 dummy array

upwp real*4 dummy array

vpwp real*4 dummy array

vt2de real*4 dummy array

vtscr real*4 dummy array

wprp real*4 dummy array

wptp real*4 dummy array

wpwp real*4 dummy array

xw real*4

yw real*4

zwi real*4

-----------------------------------------------------------

Module: sfclyr Source File: model/rsurf.f

 

mxyp int*4

-----------------------------------------------------------

Module: sfcopqr Source File: model/rinit.f

 

datp real*4 dummy array

datq real*4 dummy array

datr real*4 dummy array

fnmiss char array size:80000

glatp real*4

glonp real*4

io1 int*4

io2 int*4

iof int*4

iofr int*4

ip int*4

iq int*4

ir int*4

iso int*4 array size:400

isoc int*4

isocpo int*4

isocpt int*4

iwo int*4 array size:400

iwoc int*4

iwocph int*4

iwocpo int*4

iwocpt int*4

jo1 int*4

jo2 int*4

jofr int*4

jp int*4

jq int*4

jr int*4

l1 log*4

l2 log*4

lb int*4

nmiss int*4

nn int*4

nofr int*4

nono int*4

rh real*4

rha real*4

rio real*4

rjo real*4

sh real*4

sha real*4

title1 char*3

title2 char*4

title3 char*80

wio1 real*4

wio2 real*4

wjo1 real*4

wjo2 real*4

xcentr real*4

xp real*4

xq real*4

xq1 real*4

xr real*4

ycentr real*4

yp real*4

yq real*4

yq1 real*4

yr real*4

-----------------------------------------------------------

Module: sfcout Source File: model/make_sfc.f

 

cgrid char*2

flnm char*80

ip int*4

k int*4

lc int*4

ngr int*4

nxy4p int*4

-----------------------------------------------------------

Module: sfcproc Source File: isan/asti2.f

 

mis1 int*4

mis2 int*4

not int*4

ns int*4

nsu int*4

p1000 real*4

p500 real*4

p600 real*4

p700 real*4

p850 real*4

p900 real*4

pss real*4 dummy array

px real*4 dummy

rss real*4 dummy array

sfln real*4 dummy array

sflt real*4 dummy array

sss real*4 dummy array

t1000 real*4

t500 real*4

t600 real*4

t700 real*4

t850 real*4

t900 real*4

tss real*4 dummy array

uss real*4 dummy array

vss real*4 dummy array

z1000 real*4

z500 real*4

z600 real*4

z700 real*4

z850 real*4

z900 real*4

zss real*4 dummy array

-----------------------------------------------------------

Module: sfcprt Source File: model/rprnt.f

 

fc real*4

i int*4

i1 int*4

i2 int*4

ipage int*4

ipatch int*4

j int*4

k int*4

leftcols int*4

maxcols int*4

ncols int*4

npages int*4

nsoil int*4

tempk real*4 array size:80

vnam2 char*26

-----------------------------------------------------------

Module: sfcqual Source File: isan/asti.f

 

gobkm real*4

gobrd real*4

i int*4

iqf int*4 array size:16

j int*4

ns int*4

quals3 real*4 dummy array

scra real*4 dummy array

-----------------------------------------------------------

Module: sfcrad Source File: model/rsurf.f

 

absg real*4

alb real*4

albedt real*4 dummy array

alg real*4

algs real*4

als real*4

alv real*4

emgs real*4

emv real*4

fcpct real*4

fractrans real*4

gslong real*4

i int*4

j int*4

k int*4

ksn int*4

nsoil int*4

nveg int*4

rad real*4

rlongup real*4 dummy array

snowfac real*4 dummy array

vf real*4 dummy array

vfc real*4

vlong real*4

vt3de real*4 dummy array

vt3df real*4 dummy array

-----------------------------------------------------------

Module: sfcread Source File: model/make_sfc.f

 

cgrid char*2

flnm char*80

ifileok int*4 dummy

ip int*4

isfc_marker int*4

isfc_ver int*4

k int*4

lc int*4

nsfx int*4

nsfy int*4

nsfzg int*4

nsfzs int*4

nxy4p int*4

sfdx real*4

sfdy real*4

sflat real*4

sflon real*4

sfplat real*4

sfplon real*4

there log*4

-----------------------------------------------------------

Module: shear Source File: isan/askewt.f

 

adr real*4 dummy

ash real*4 dummy

dh real*4

du real*4

dv real*4

i int*4

ilp int*4

sd real*4

sdd real*4

sdh real*4

sdm real*4

sm real*4

uxv real*4

-----------------------------------------------------------

Module: shradc Source File: lib/rrad.f

 

albray real*4

fthr real*4 dummy array size:4

icldfl int*4

k int*4

k1 int*4

nbnd int*4

ncall int*4

nz int*4

nzp int*4

o3 real*4 array size:800

pfct real*4

rabar real*4

rabarbar real*4

radc1 real*4

rshort real*4 dummy

sc real*4 dummy array

trsmt real*4

-----------------------------------------------------------

Module: shradp Source File: lib/rrad.f

 

fthr real*4 dummy array

k int*4

nz int*4

raysct real*4

rdcon1 real*4

rshort real*4 dummy

sc real*4 dummy array

vabs real*4

-----------------------------------------------------------

Module: sigzio Source File: isan/asgen.f

 

ctype char*10

l int*4

ninn int*4

nlt int*4

npts int*4

nx3 int*4

ny3 int*4

-----------------------------------------------------------

Module: skewt Source File: isan/askewt.f

 

aos real*4

atsa real*4

bitx real*4

bity real*4

ctit char*80

fac real*4

i int*4

isk int*4

j int*4

k int*4

p real*4

sbn real*4

sln real*4

spd real*4 dummy array

srn real*4

stn real*4

sx real*4 array size:12960

sy real*4 array size:12960

t real*4

td real*4

tk real*4

ts real*4

tx real*4

ubn real*4

uln real*4

urn real*4

utn real*4

x real*4

x1 real*4

x2 real*4

xpd real*4

xratio real*4

y real*4

y1 real*4

y2 real*4

y45 real*4 array size:648

yd real*4

ypd real*4

yratio real*4

-----------------------------------------------------------

Module: sndganls Source File: isan/askewt.f

 

alift real*4

ang real*4

aptp real*4

atheta real*4

b real*4

chh1 char*4

chh2 char*4

db real*4

dh real*4

diffmin real*4

dn real*4

dp850 real*4

dtmp real*4

du real*4

dv real*4

dwp500 real*4

dwp700 real*4

dwp850 real*4

dz real*4

f500 real*4

f850 real*4

h1 real*4

h2 real*4

hlcl real*4

ht15 real*4

ht2 real*4 array size:600

htccl real*4

htel real*4

htlfc real*4

hwbtz real*4

i int*4

iht1 int*4

iht15 int*4

iht2 int*4

ihwbtz int*4

ilcl int*4

itwmin int*4

k int*4

k300 int*4

k500 int*4

k700 int*4

k850 int*4

kccl int*4

kel int*4

kel2 int*4

klfc int*4

klfc2 int*4

lab char*80

lflag int*4

pccl real*4

pcheck real*4 array size:16

pel real*4

pinc2 real*4

plcl real*4

plfc real*4

pres2 real*4 array size:600

ptd real*4

ptlcl real*4

ptm real*4

ptp real*4 array size:600

relh real*4 array size:600

rho real*4 array size:600

ri real*4

rinum real*4

rkindex real*4

rlcl real*4

rmix real*4 array size:600

rmix1 real*4

rmixt real*4

sdeltd real*4

sdeltp real*4

sdeltt real*4

sdh real*4

sep real*4

sfcdf real*4

sfcht real*4

sfctf real*4

shr real*4

shr1 real*4

shr2 real*4

sind real*4

spd500 real*4

spd700 real*4

spd850 real*4

sppr real*4

sprmix real*4

sptd real*4

sptt real*4

sri real*4

stblty real*4

su real*4

sumb real*4

sumbc real*4

sumbel real*4

sumblfc real*4

sumn real*4

sv real*4

svap real*4 array size:600

sweat real*4

tbar real*4

tconv real*4

tconvf real*4

tem real*4

thbar real*4

theta real*4 array size:600

tlcl real*4

totals real*4

tp500 real*4

tp700 real*4

tp850 real*4

tpm real*4

trn1 real*4

trn2 real*4

tt49 real*4

tvirt real*4 array size:600

tvirt5 real*4

tvirt7 real*4

tvirt8 real*4

tvp real*4 array size:600

tvp5 real*4

tvp7 real*4

tvp8 real*4

twet real*4 array size:600

twmin real*4

txp real*4 array size:600

ua real*4

uwnd real*4 array size:600

uwnd5 real*4

uwnd7 real*4

uwnd8 real*4

uxv real*4

va real*4

vap real*4 array size:600

vv2 real*4

vv_s real*4 array size:600

vvm real*4

vwnd real*4 array size:600

vwnd5 real*4

vwnd7 real*4

vwnd8 real*4

water real*4 array size:600

wbptlcl real*4

wbtlcl real*4

wdir5 real*4

wdir7 real*4

wdir8 real*4

wetth real*4 array size:600

wm real*4

wp real*4

xmdr real*4

xmsp real*4

-----------------------------------------------------------

Module: sndproc Source File: isan/asti2.f

 

chstid char dummy array

k int*4

non int*4

not int*4

psnd real*4 dummy array

rsnd real*4 dummy array

stln real*4 dummy array

stlp real*4 dummy array

stlt real*4 dummy array

stlz real*4 dummy array

topsnd real*4 dummy array

tsnd real*4 dummy array

usndz real*4 dummy array

vsndz real*4 dummy array

zsnd real*4 dummy array

zsndz real*4 dummy array

-----------------------------------------------------------

Module: soilopr Source File: model/rusgs.f

 

datp int*4

io int*4

iof int*4

iofr int*4

ip int*4

iqv int*4

ir int*4

iso int*4 array size:400

isoc int*4

isocpo int*4

isocpt int*4

itmax int*4

ivg int*4

iwo int*4 array size:400

iwoc int*4

iwocph int*4

iwocpo int*4

iwocpt int*4

jo int*4

jofr int*4

jp int*4

jr int*4

l int*4

l1 log*4

l2 log*4

lb int*4

missing int*4

ngrdpix int*4 array size:636

nofr int*4

nono int*4

nwat int*4

rio real*4

rjo real*4

title1 char*3

title2 char*4

title3 char*80

xp real*4

yp real*4

-----------------------------------------------------------

Module: sort3 Source File: lib/rutil.f

 

a real*4 dummy array size:4

at real*4

b real*4 dummy array size:4

bt real*4

c real*4 dummy array size:4

ct real*4

i int*4

k int*4

np1 int*4

-----------------------------------------------------------

Module: sort6 Source File: isan/askewt.f

 

a real*4 dummy array size:4

at real*4

b real*4 dummy array size:4

bt real*4

c real*4 dummy array size:4

ct real*4

d real*4 dummy array size:4

dt real*4

e real*4 dummy array size:4

et real*4

f real*4 dummy array size:4

ft real*4

i int*4

k int*4

np1 int*4

-----------------------------------------------------------

Module: soundtopo Source File: isan/asti.f

 

ns int*4

sdat real*4 array size:8

sndtopg real*4 dummy array

topo real*4

-----------------------------------------------------------

Module: sstnest Source File: model/rnest.f

 

icm int*4

isiz int*4

-----------------------------------------------------------

Module: sstout Source File: model/make_sfc.f

 

cdate char*2

cgrid char*2

chour char*2

cmonth char*2

cyear char*4

flnm char*80

lc int*4

nxy4p int*4

-----------------------------------------------------------

Module: sstread Source File: model/make_sfc.f

 

ifileok int*4 dummy

iidate int*4 dummy

iihour int*4 dummy

iimonth int*4 dummy

iiyear int*4 dummy

isfc_marker int*4

isfc_ver int*4

nsfx int*4

nsfy int*4

nsfzg int*4

nsfzs int*4

nxy4p int*4

sfdx real*4

sfdy real*4

sflat real*4

sflon real*4

sfplat real*4

sfplon real*4

there log*4

-----------------------------------------------------------

Module: ssum Source File: lib/rfvec.f

 

n int*4

nnn int*4

sum real*4

-----------------------------------------------------------

Module: stable Source File: lib/rrad.f

 

beta real*4 dummy

i0 int*4

i1 int*4

i2 int*4

ii int*4

j0 int*4

j1 int*4

j2 int*4

jj int*4

k1 int*4

k2 int*4

l int*4

lt0 real*4

lt1 real*4

lt2 real*4

lu0 real*4

lu1 real*4

lu2 real*4

m int*4

n int*4

omeg real*4 dummy

p real*4

p0 real*4

p1 real*4

p2 real*4

t real*4

t0 real*4

t1 real*4

t2 real*4

u real*4

u0 real*4

u1 real*4

u2 real*4

-----------------------------------------------------------

Module: stainterp Source File: isan/aobj.f

 

dx real*4

dy real*4

fi real*4

fj real*4

k int*4

n int*4

ni int*4

nj int*4

nv int*4

sdat real*4 dummy array

sval real*4

yval1 real*4

-----------------------------------------------------------

Module: stalib Source File: isan/astgb.f

 

ht real*4

sf real*4 dummy

stvar real*4 dummy

tbar real*4

ttemp real*4

-----------------------------------------------------------

Module: staplt Source File: isan/astga.f

 

nplt int*4

snelat real*4

snelon real*4

swlat real*4

swlon real*4

-----------------------------------------------------------

Module: staprt Source File: isan/asti2.f

 

k int*4

-----------------------------------------------------------

Module: stars Source File: model/rsurf.f

 

a2 real*4

b real*4

c1 real*4

c2 real*4

c3 real*4

ch real*4

cm real*4

csh real*4

csm real*4

d real*4

fh real*4

fm real*4

i int*4

j int*4

ri real*4

rstar real*4 dummy array

tstar real*4 dummy array

ustar real*4 dummy array

-----------------------------------------------------------

Module: staxy Source File: isan/astga.f

 

nst int*4

sval char*16

-----------------------------------------------------------

Module: staxyn Source File: isan/astga.f

 

nst int*4

sval char*16

-----------------------------------------------------------

Module: store_sclflx Source File: model/rturb.f

 

i int*4

inds int*4

j int*4

k int*4

slabxzs real*4 dummy array

slabyzs real*4 dummy array

-----------------------------------------------------------

Module: store_sclk Source File: model/rturb.f

 

i int*4

j int*4

k int*4

slabxzk real*4 dummy array

slabyzk real*4 dummy array

-----------------------------------------------------------

Module: store_sk Source File: model/rturb.f

 

i int*4

j int*4

k int*4

slabxz real*4 dummy array

slabyz real*4 dummy array

-----------------------------------------------------------

Module: strain Source File: model/rturb.f

 

i int*4

j int*4

k int*4

scr2 real*4 dummy array

vt3da real*4 dummy array

vt3db real*4 dummy array

vt3dc real*4 dummy array

vt3dd real*4 dummy array

vt3de real*4 dummy array

vt3dh real*4 dummy array

vt3di real*4 dummy array

vt3dn real*4 dummy array

-----------------------------------------------------------

Module: strip Source File: lib/rname.f

 

iquote int*4

lin2 char*(*) dummy

nc int*4

nc2 int*4 dummy

nl int*4

-----------------------------------------------------------

Module: strmfun Source File: isan/asti.f

 

ari real*4 dummy array

ars real*4 dummy array

bcpr real*4

i int*4

ipp int*4

ipr int*4

irh int*4

isi int*4

ith int*4

j int*4

k int*4

lbc int*4

lbchyd int*4

lbcp int*4

po real*4

sigo real*4

sigzr real*4 array size:400

syo real*4

temp real*4 array size:400

tho real*4

thv real*4 array size:400

thvo real*4

-----------------------------------------------------------

Module: sumn Source File: model/mic_init.f

 

i int*4

sum real*4 dummy

sun real*4 dummy

-----------------------------------------------------------

Module: sxy Source File: model/mic_init.f

 

am2 real*4 array size:144

am3 real*4 array size:144

am4 real*4 array size:144

amk real*4 dummy array size:144

ank real*4 dummy array size:144

dm real*4

dm2 real*4

dm4 real*4

dn real*4

f real*4 array size:144

i int*4

ik int*4

k int*4

l int*4

psi real*4 array size:144

sm1 real*4

sm2 real*4

sm3 real*4

sm4 real*4

sm5 real*4

sn1 real*4

sn2 real*4

sn3 real*4

sn4 real*4

xave real*4 array size:144

-----------------------------------------------------------

Module: tabhab Source File: model/mic_driv.f

 

is int*4

it int*4

jhabtab int*4 dummy array size:24800

-----------------------------------------------------------

Module: tabmelt Source File: model/mic_init.f

 

binmass real*4 array size:2000

critmass real*4

db real*4 array size:2000

deltat real*4

dn real*4

dqdt real*4 array size:2000

enmlttab real*4 dummy array

fmg real*4 array size:2000

fre real*4

gammaa real*4

ibin int*4

icat int*4

idns int*4

ihcat int*4

inc int*4

iter int*4

ndns1 int*4

picemass real*4

pliqmass real*4

pmass real*4 array size:2000

q real*4 array size:2000

qmgoal real*4

qmnow real*4

rmlttab real*4 dummy array

shedtab real*4 dummy array

totfmg real*4

totmass real*4

totmdqdt real*4

totqm real*4

vt real*4

-----------------------------------------------------------

Module: tconjb1 Source File: isan/askewt.f

 

dlt real*4

s real*4

-----------------------------------------------------------

Module: td Source File: lib/rutil.f

 

es real*4

esln real*4

rr real*4

-----------------------------------------------------------

Module: tend0 Source File: model/rmisc.f

 

mxyzp int*4

n int*4

-----------------------------------------------------------

Module: tend_accum Source File: model/rmisc.f

 

at real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: the2t Source File: lib/rutil.f

 

itter int*4

pi real*4

r real*4 dummy

t real*4 dummy

th real*4 dummy

tn real*4

to real*4

-----------------------------------------------------------

Module: thetae Source File: lib/rutil.f

 

cpg real*4

dz real*4

itter int*4

pit real*4

the real*4 dummy

tmn real*4

ttd real*4

tupn real*4

tupo real*4

-----------------------------------------------------------

Module: thrmstr Source File: model/mic_misc.f

 

icat int*4

k int*4

pi real*4 dummy array

press real*4 dummy array

qhydm real*4 dummy array

rice real*4 dummy array

rliq real*4 dummy array

rv real*4 dummy array

rvstr real*4 dummy array

sa real*4 dummy array

tair real*4 dummy array

tairstr real*4

tairstrc real*4 dummy array

theta real*4 dummy array

til real*4 dummy array

-----------------------------------------------------------

Module: thvtoth Source File: lib/rutil.f

 

k int*4

theta real*4 dummy array

-----------------------------------------------------------

Module: timestep Source File: model/rtimh.f

 

iter int*4

t1 real*4

-----------------------------------------------------------

Module: tkeinit Source File: model/rturb.f

 

i int*4

j int*4

k int*4

tkep real*4 dummy array

-----------------------------------------------------------

Module: tkemy Source File: model/rturb.f

 

al0 real*4

aux real*4

dzloc real*4

gh real*4

gm real*4

i int*4

j int*4

k int*4

qq real*4

rf real*4

ri real*4

scr1 real*4 dummy array

sh real*4

sh1 real*4

sh2 real*4

shf real*4

shr real*4

sm1 real*4

sm2 real*4

smr real*4

ssm real*4

ssmf real*4

sumtk real*4

sumtkz real*4

tkep2 real*4 dummy array

tker real*4

tket real*4 dummy array

tket2 real*4

vt3dh real*4 dummy array

vt3di real*4 dummy array

wght1 real*4

wght3 real*4

-----------------------------------------------------------

Module: tlcljb1 Source File: isan/askewt.f

 

a real*4

b real*4

tc real*4

tdk real*4

tk real*4

-----------------------------------------------------------

Module: tmr Source File: lib/rutil.f

 

x real*4

-----------------------------------------------------------

Module: tmrjb1 Source File: isan/askewt.f

 

x real*4

-----------------------------------------------------------

Module: toknze Source File: lib/rname.f

 

nc int*4

npt int*4

ns int*4

ntok int*4 dummy

tokens char dummy array

-----------------------------------------------------------

Module: topset Source File: model/rbnd.f

 

ap real*4 dummy array

dzmr real*4

dztr real*4

i int*4

j int*4

-----------------------------------------------------------

Module: toptinit Source File: model/rsurf.f

 

i int*4

j int*4

topt real*4 dummy array

-----------------------------------------------------------

Module: toptsmth Source File: model/rinit.f

 

i int*4

iter int*4

j int*4

topt real*4 dummy array

vt2da real*4 dummy array

-----------------------------------------------------------

Module: transfm Source File: model/rinit.f

 

f13m real*4 dummy array

f13t real*4 dummy array

f13u real*4 dummy array

f13v real*4 dummy array

f23m real*4 dummy array

f23t real*4 dummy array

f23u real*4 dummy array

f23v real*4 dummy array

i int*4

j int*4

k int*4

rtgm real*4 dummy array

rtgt real*4 dummy array

rtgu real*4 dummy array

rtgv real*4 dummy array

terdev real*4

topm real*4 dummy array

topu real*4 dummy array

topv real*4 dummy array

-----------------------------------------------------------

Module: tri_intp_cofs Source File: model/hemi2.f

 

area real*4

tic1 real*4 dummy

tic2 real*4 dummy

tic5 real*4 dummy

-----------------------------------------------------------

Module: tricheck Source File: model/hemi2.f

 

iyes int*4 dummy

-----------------------------------------------------------

Module: trid Source File: lib/rnumr.f

 

ci real*4 dummy array size:4

cip1 real*4 dummy array size:4

k int*4

rhs real*4 dummy array size:4

var real*4 dummy array size:4

-----------------------------------------------------------

Module: trid2 Source File: lib/rnumr.f

 

k int*4

scr1 real*4 dummy array size:4

scr2 real*4 dummy array size:4

scr3 real*4 dummy array size:4

var real*4 dummy array size:4

-----------------------------------------------------------

Module: tridiff Source File: model/rturb.f

 

cj real*4 dummy array

cjp1 real*4 dummy array

ih int*4

k int*4

rhs real*4 dummy array

-----------------------------------------------------------

Module: trmgph Source File: lib/rutil.f

 

ainc real*4

amn real*4

amx real*4

b char array size:250

bb char*1

c real*4 array size:1000

il int*4

imn int*4

imx int*4

k int*4

val real*4

-----------------------------------------------------------

Module: trncl1 Source File: lib/rutil.f

 

k int*4

kabv int*4

kk int*4

kk1 int*4

rtg real*4

vctra real*4 dummy array size:4

vctrb real*4 dummy array size:4

vctrc real*4 dummy array size:4

vctrd real*4 dummy array size:4

w1 real*4

-----------------------------------------------------------

Module: trncl2 Source File: lib/rutil.f

 

k int*4

kabv int*4

kk int*4

kk1 int*4

nnp int*4

rtg real*4

vctra real*4 dummy array size:4

vctrb real*4 dummy array size:4

vctrc real*4 dummy array size:4

vctrd real*4 dummy array size:4

w1 real*4

-----------------------------------------------------------

Module: trtend Source File: model/ruser.f

 

i int*4

j int*4

k int*4

rtt real*4 dummy array

tht real*4 dummy array

wt real*4 dummy array

-----------------------------------------------------------

Module: tsa Source File: lib/rutil.f

 

a real*4

d real*4

id int*4

tq real*4

x real*4

-----------------------------------------------------------

Module: tsajb1 Source File: isan/askewt.f

 

a real*4

d real*4

i int*4

tq real*4

x real*4

-----------------------------------------------------------

Module: tw Source File: lib/rutil.f

 

aos real*4

id int*4

piter real*4

press real*4

rvap real*4

temper real*4

x real*4

-----------------------------------------------------------

Module: uevetouv Source File: lib/hutil.f

 

angle real*4

u real*4 dummy

v real*4 dummy

-----------------------------------------------------------

Module: unarrange Source File: model/rio.f

 

b real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: unfdbackp Source File: model/mpass_feed.F

 

ac real*4 dummy array

i int*4

ib int*4

j int*4

k int*4

-----------------------------------------------------------

Module: unmkbuff Source File: model/mpass_nest.F

 

ac real*4 dummy array

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: update Source File: lib/rnumr.f

 

a real*4 dummy array size:4

nn int*4

-----------------------------------------------------------

Module: usgssoil Source File: model/rusgs.f

 

deltallo real*4

deltaxp real*4

deltayp real*4

iblksizo int*4

isbego int*4

iwbego int*4

lb int*4

mof int*4

no int*4

np int*4

title char*80

-----------------------------------------------------------

Module: usgsveg Source File: model/rusgs.f

 

deltallo real*4

deltaxp real*4

deltayp real*4

iblksizo int*4

isbego int*4

iwbego int*4

lb int*4

mof int*4

no int*4

np int*4

title char*80

-----------------------------------------------------------

Module: uvtoueve Source File: lib/hutil.f

 

angle real*4

ue real*4 dummy

ve real*4 dummy

-----------------------------------------------------------

Module: uwc Source File: model/rprnt.f

 

i int*4

il int*4

ir int*4

j int*4

k int*4

ntpt int*4

tval real*4

umn real*4 array size:687984

uwflx real*4

v1 real*4 array size:5212

wmn real*4 array size:687984

-----------------------------------------------------------

Module: vapdiff Source File: model/mic_misc.f

 

k int*4

rv real*4 dummy array

-----------------------------------------------------------

Module: vapict Source File: model/mic_misc.f

 

ict1 int*4 dummy array

ict2 int*4 dummy array

if1 int*4

if4 int*4

jflag int*4

k int*4

qr real*4 dummy array

qx real*4 dummy array

rict real*4

rictmm real*4

rv real*4 dummy array

rx real*4 dummy array

rxx real*4

sumuy real*4 dummy array

sumuz real*4 dummy array

sumvr real*4 dummy array

tx real*4 dummy array

vap real*4 dummy array

wct1 real*4 dummy array

wct2 real*4 dummy array

-----------------------------------------------------------

Module: varchk Source File: lib/rname.f

 

iname int*4 dummy array

inoset int*4

inrflg int*4 dummy

nn int*4

-----------------------------------------------------------

Module: varfile_nstfeed Source File: isan/avarf.f

 

icm int*4

ifm int*4

ip1 int*4

ip2 int*4

ir1 int*4

ir2 int*4

it1 int*4

it2 int*4

iu1 int*4

iu2 int*4

iv1 int*4

iv2 int*4

-----------------------------------------------------------

Module: varhyd Source File: model/rvari.f

 

c1 real*4

i int*4

j int*4

k int*4

vpiex real*4 dummy array

-----------------------------------------------------------

Module: varlib Source File: isan/astgb.f

 

aaa real*4

crvar real*4 dummy

kk int*4

kl int*4

smix real*4

temp real*4

tempd real*4

tempn real*4

temps real*4

wt real*4

znn real*4

zs real*4

-----------------------------------------------------------

Module: varmisc Source File: model/rvari.f

 

i int*4

j int*4

k int*4

rv real*4 dummy array

theta real*4 dummy array

-----------------------------------------------------------

Module: varref Source File: model/rvari.f

 

i int*4

j int*4

k int*4

-----------------------------------------------------------

Module: varsetc Source File: lib/rname.f

 

lch int*4

var char dummy array

-----------------------------------------------------------

Module: varsetc2 Source File: lib/rname.f

 

lch int*4

var char*(*) dummy

-----------------------------------------------------------

Module: varsetf Source File: lib/rname.f

 

var real*4 dummy array size:4

-----------------------------------------------------------

Module: varsetf2 Source File: lib/rname.f

 

var real*4 dummy

-----------------------------------------------------------

Module: varseti Source File: lib/rname.f

 

ivar int*4 dummy array size:4

-----------------------------------------------------------

Module: varseti2 Source File: lib/rname.f

 

ivar int*4 dummy

-----------------------------------------------------------

Module: vartendp Source File: model/rvari.f

 

i int*4

j int*4

varp real*4 dummy array

varp2 real*4 dummy array

-----------------------------------------------------------

Module: varuv Source File: isan/avarf.f

 

i int*4

j int*4

k int*4

up real*4 dummy array

vp real*4 dummy array

-----------------------------------------------------------

Module: varweight Source File: model/rvari.f

 

delzi real*4

i int*4

j int*4

k int*4

rowe real*4

rown real*4

rows real*4

roww real*4

tnudcenti real*4

tnudlati real*4

tnudtopi real*4

varwts real*4 dummy array

wtlat real*4

wttop real*4

zloc real*4

-----------------------------------------------------------

Module: vcirec Source File: lib/rvfor.f

 

a char dummy array size:1

i int*4

nc int*4

ne int*4

nn int*4

-----------------------------------------------------------

Module: vcorec Source File: lib/rvfor.f

 

i int*4

nc int*4

ne int*4

-----------------------------------------------------------

Module: vctran Source File: lib/rvfor.f

 

line char*78

n int*4

nbits int*4

nl int*4

nlines int*4

-----------------------------------------------------------

Module: vegopr Source File: model/rusgs.f

 

dato int*4 dummy array

datp int*4

datq int*4

fracwat real*4

io int*4

iof int*4

iofr int*4

ip int*4

ipatch int*4

iqv int*4

ir int*4

irr1 int*4

irr2 int*4

iso int*4 array size:400

isoc int*4

isocpo int*4

isocpt int*4

iwo int*4 array size:400

iwoc int*4

iwocph int*4

iwocpo int*4

iwocpt int*4

jo int*4

jofr int*4

jp int*4

jr int*4

l1 log*4

l2 log*4

lb int*4

ngrdpix int*4 array size:640

ngrdpix1 int*4 array size:640

nofr int*4

nono int*4

npatpix int*4 array size:120

npatpixs int*4

patchdatq int*4 array size:120

plpp real*4

rio real*4

rjo real*4

schar real*4 dummy array

title1 char*3

title2 char*4

title3 char*80

xp real*4

yp real*4

-----------------------------------------------------------

Module: vegseasn Source File: model/rsurf.f

 

fseasn real*4

funclat real*4

i int*4

j int*4

jday int*4

nveg int*4

schar real*4 dummy array

tampl real*4

tmax real*4

tmid real*4

tmin real*4

tseasn real*4

wave real*4

xjpeak real*4

-----------------------------------------------------------

Module: vfinit Source File: lib/rvfor.f

 

n int*4

-----------------------------------------------------------

Module: vfintrp Source File: model/rnest.f

 

icm int*4

-----------------------------------------------------------

Module: vfirec Source File: lib/rvfor.f

 

a real*4 dummy array

bias real*4

cs char*1

fact real*4

facti real*4

i int*4

ic int*4

ich0 int*4

ich9 int*4

ichca int*4

ichcz int*4

ichla int*4

ichlz int*4

ics int*4

ii int*4

iii int*4

isval int*4

line char*80

nbits int*4

nc int*4

nchs int*4

nn int*4

nvalline int*4

scfct real*4

-----------------------------------------------------------

Module: vforec Source File: lib/rvfor.f

 

bias real*8

sbias real*4

sfact real*4

-----------------------------------------------------------

Module: viirec Source File: lib/rvfor.f

 

bias real*4

cs char*1

fact real*4

facti real*4

i int*4

ia int*4 dummy array

ic int*4

ich0 int*4

ich9 int*4

ichca int*4

ichcz int*4

ichla int*4

ichlz int*4

ics int*4

ii int*4

iii int*4

isval int*4

line char*80

n int*4 dummy

nbits int*4

nc int*4

nchs int*4

nn int*4

nvalline int*4

-----------------------------------------------------------

Module: viorec Source File: lib/rvfor.f

 

bias real*4

fact real*4

-----------------------------------------------------------

Module: visurf Source File: isan/avarf.f

 

dzgobs real*4

i int*4

j int*4

k int*4

pp real*4 dummy array

ppp real*4

rhm real*4

rtp real*4 dummy array

thp real*4 dummy array

ttt real*4

up real*4 dummy array

vp real*4 dummy array

wt real*4

zgp real*4

-----------------------------------------------------------

Module: vmissr Source File: isan/asgen.f

 

af real*4 dummy array

i int*4

-----------------------------------------------------------

Module: vmissw Source File: isan/asgen.f

 

as real*4 dummy array

i int*4

-----------------------------------------------------------

Module: vptsets Source File: model/rtimi.f

 

n int*4

-----------------------------------------------------------

Module: vshyd Source File: isan/avarf.f

 

gd2 real*4

i int*4

j int*4

k int*4

kabc int*4

lbc int*4

piibc real*4

pp real*4 dummy array

ppp real*4

rr real*4 dummy array

thmin real*4

ttt real*4

ziibc real*4

-----------------------------------------------------------

Module: vtabfill Source File: model/rvtab.f

 

ctable char dummy array

itab int*4 dummy array

ivar int*4

ntab int*4 dummy

-----------------------------------------------------------

Module: vtables Source File: model/rvtab.f

 

cname char*8

cvar char*8

icond int*4

iline char*256

iuse int*4

iv int*4

ivflg int*4

ivvv int*4

line char*80

linelen int*4

loop int*4

nc int*4

ng int*4

nl int*4

nsclrp int*4

nsclrt int*4

nt int*4

nv int*4

nvv int*4

-----------------------------------------------------------

Module: vterpp_i Source File: isan/asti.f

 

i int*4

j int*4

k int*4

kibc int*4

kl int*4

kpbc int*4

lpa int*4

mcnt int*4

nlvt int*4

npd int*4

pbc real*4

pi2 real*4 dummy array

pkd real*4 array size:88

pkn real*4

ppd real*4 array size:88

rd real*4 array size:88

ri2 real*4 dummy array

si2 real*4 dummy array

sy real*4

thetd real*4 array size:88

thl real*4

ud real*4 array size:88

ui2 real*4 dummy array

vd real*4 array size:88

vi2 real*4 dummy array

wt real*4

-----------------------------------------------------------

Module: vterpp_s Source File: isan/asti.f

 

i int*4

j int*4

k int*4

kibc int*4

kl int*4

kpbc int*4

mcnt int*4

npd int*4

pbc real*4

pi2 real*4 dummy array

pid real*4 array size:88

pii real*4

pkd real*4 array size:88

ppd real*4 array size:88

rd real*4 array size:88

ri2 real*4 dummy array

rtd real*4 array size:88

sigzr real*4 array size:400

tempd real*4 array size:88

thetd real*4 array size:88

thvd real*4 array size:88

thvp real*4

ti2 real*4 dummy array

ud real*4 array size:88

ui2 real*4 dummy array

vd real*4 array size:88

vi2 real*4 dummy array

vvv real*4 array size:400

zd real*4 array size:88

-----------------------------------------------------------

Module: vwrt Source File: lib/rvfor.f

 

form char*5

i int*4

ic int*4

ii int*4

iii int*4

iscr int*4

isval int*4

line char*80

nchs int*4

nvalline int*4

scfct real*4

scr real*4 dummy array

-----------------------------------------------------------

Module: vwrti Source File: lib/rvfor.f

 

form char*5

i int*4

ic int*4

ii int*4

iii int*4

iiscr int*4

iscr int*4 dummy array

isval int*4

line char*80

nchs int*4

nvalline int*4

-----------------------------------------------------------

Module: w Source File: lib/rutil.f

 

x real*4

-----------------------------------------------------------

Module: wallclock Source File: model/rnode.f

 

wh real*4

wm real*4

ws real*4

-----------------------------------------------------------

Module: wetthrm3 Source File: model/rthrm.f

 

i int*4

j int*4

k int*4

picpi real*4 dummy array

qhydm real*4 dummy array

rice real*4 dummy array

rliq real*4 dummy array

rv real*4 dummy array

tair real*4 dummy array

tairstr real*4

theta real*4 dummy array

til real*4 dummy array

-----------------------------------------------------------

Module: winchk Source File: isan/astga.f

 

iib int*4 dummy

iil int*4 dummy

iir int*4 dummy

iit int*4 dummy

iwdwfl int*4

-----------------------------------------------------------

Module: windbarb Source File: isan/askewt.f

 

angle real*4

flinc real*4

hfact real*4

hsinc real*4

iangle int*4

ifl int*4

iflags int*4

ihfstafs int*4

ihs int*4

ins int*4

istafs int*4

istt int*4

r real*4

round real*4

stinc real*4

x real*4 array size:12

x1 real*4

x2 real*4

x3 real*4

xangle real*4

xcirc real*4 array size:1440

y real*4 array size:12

y1 real*4

y2 real*4

y3 real*4

ycirc real*4 array size:1440

-----------------------------------------------------------

Module: winduv Source File: lib/rutil.f

 

dd real*4 dummy

ff real*4 dummy

u real*4

uu real*4 dummy

v real*4

vv real*4 dummy

-----------------------------------------------------------

Module: wjb1 Source File: isan/askewt.f

 

x real*4

-----------------------------------------------------------

Module: wmrjb1 Source File: isan/askewt.f

 

fwesw real*4

r real*4

wfw real*4

x real*4

-----------------------------------------------------------

Module: wobfjb1 Source File: isan/askewt.f

 

pol real*4

x real*4

-----------------------------------------------------------

Module: writepg Source File: lib/rname.f

 

fmt char*9

nch int*4

nr int*4

-----------------------------------------------------------

Module: writevl Source File: lib/rname.f

 

leftcol int*4 dummy

rghtcol int*4

row int*4 dummy

-----------------------------------------------------------

Module: x02 Source File: model/mic_misc.f

 

closs real*4

cmelt real*4

cx real*4 dummy array

dn real*4

fracmloss real*4

idns int*4

inc int*4

jflag int*4

k int*4

k1 int*4 dummy array

k2 int*4 dummy array

pwmasi real*4

pwvtmasi real*4

qr real*4 dummy array

qrmltshed real*4

qx real*4 dummy array

ricetor6 real*4

rinv real*4

rmelt real*4

rmltshed real*4

rshed real*4

rx real*4 dummy array

rxinv real*4

shedmass real*4

vt real*4 dummy array

-----------------------------------------------------------

Module: xj Source File: model/mic_init.f

 

dnxi real*4

dxy real*4

rdx real*4

vx real*4

ynup real*4

-----------------------------------------------------------

Module: xy_ll Source File: lib/hutil.f

 

alpha real*4

cosplat real*4

cosplon real*4

d real*4

qlat real*4 dummy

qlon real*4 dummy

r3q real*4

sinplat real*4

sinplon real*4

t real*4

x3p real*4

x3q real*4

xq real*4

y3p real*4

y3q real*4

yq real*4

z3p real*4

z3q real*4

zq real*4

-----------------------------------------------------------

Module: zen Source File: model/rmisc.f

 

cosz real*4 dummy array

cslcsd real*4

dayhr real*4

dayhrr real*4

gglon real*4

hrangl real*4

i int*4

j int*4

radlat real*4

snlsnd real*4

-----------------------------------------------------------

Module: zeroout Source File: model/mpass_feed.F

 

ac real*4 dummy array

i int*4

j int*4

k int*4