| File |
Line number |
Procedure |
Code |
|
./pkg/diagnostics/diagnostics_readparms.F |
125 |
DIAGNOSTICS_READPARMS |
& 'DIAGNOSTICS_READPARMS', ku, myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
131 |
DIAGNOSTICS_READPARMS |
READ (ku,NML=diagnostics_list) |
|
./pkg/diagnostics/diagnostics_readparms.F |
145 |
DIAGNOSTICS_READPARMS |
READ (ku,NML=DIAG_STATIS_PARMS) |
|
./pkg/diagnostics/diagnostics_readparms.F |
151 |
DIAGNOSTICS_READPARMS |
CLOSE (ku) |
|
./pkg/diagnostics/diagnostics_readparms.F |
59 |
DIAGNOSTICS_READPARMS |
INTEGER ku, stdUnit |
|
./pkg/fizhi/fizhi_readparms.F |
31 |
FIZHI_READPARMS |
integer ku, ku2 |
|
./pkg/fizhi/fizhi_readparms.F |
56 |
FIZHI_READPARMS |
& ku,myThid ) |
|
./pkg/fizhi/fizhi_readparms.F |
57 |
FIZHI_READPARMS |
read (ku,NML=fizhi_list) |
|
./pkg/fizhi/fizhi_readparms.F |
58 |
FIZHI_READPARMS |
close (ku) |
|
./pkg/fizhi/fizhi_write_datetime.F |
23 |
FIZHI_WRITE_DATETIME |
integer ku |
|
./pkg/fizhi/fizhi_write_datetime.F |
27 |
FIZHI_WRITE_DATETIME |
CALL MDSFINDUNIT( ku, myThid ) |
|
./pkg/fizhi/fizhi_write_datetime.F |
28 |
FIZHI_WRITE_DATETIME |
open(ku,file='datetime',form='formatted') |
|
./pkg/fizhi/fizhi_write_datetime.F |
29 |
FIZHI_WRITE_DATETIME |
write(ku,1000)nymd,nhms |
|
./pkg/fizhi/fizhi_write_datetime.F |
31 |
FIZHI_WRITE_DATETIME |
close (ku) |
|
./pkg/fizhi/fizhi_init_chem.F |
115 |
READ_OZ |
subroutine READ_OZ (ku,oz,lats,levs,nlat,nlev,ntime) |
|
./pkg/fizhi/fizhi_init_chem.F |
132 |
READ_OZ |
integer ku,nlat,nlev,ntime |
|
./pkg/fizhi/fizhi_init_chem.F |
164 |
READ_OZ |
close (ku) |
|
./pkg/fizhi/fizhi_init_chem.F |
165 |
READ_OZ |
open(ku,file='data.gcmo3',form='unformatted',access='direct', |
|
./pkg/fizhi/fizhi_init_chem.F |
172 |
READ_OZ |
read(ku,rec=nrec) o3 |
|
./pkg/fizhi/fizhi_init_chem.F |
182 |
READ_OZ |
close (ku) |
|
./pkg/fizhi/fizhi_init_chem.F |
48 |
READ_QZ |
subroutine READ_QZ (ku,qz,lats,levs,nlat,nlev,ntime) |
|
./pkg/fizhi/fizhi_init_chem.F |
65 |
READ_QZ |
integer ku,nlat,nlev,ntime |
|
./pkg/fizhi/fizhi_init_chem.F |
78 |
READ_QZ |
open(ku,file='data.sage',form='formatted') |
|
./pkg/fizhi/fizhi_init_chem.F |
79 |
READ_QZ |
rewind ku |
|
./pkg/fizhi/fizhi_init_chem.F |
89 |
READ_QZ |
read(ku,1000) (levs(lev),lev=1,nlev) |
|
./pkg/fizhi/fizhi_init_chem.F |
94 |
READ_QZ |
read (ku,1001) |
|
./pkg/fizhi/fizhi_init_chem.F |
96 |
READ_QZ |
read(ku,1000) (qz(lat,lev,time0),lev=1,nlev) |