| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_init_chem.F |
102 |
READ_QZ |
do time0 = 1,ntime |
|
./pkg/fizhi/fizhi_init_chem.F |
105 |
READ_QZ |
qz(lat,lev,time0) = qz(lat,lev,time0)*voltomas |
|
./pkg/fizhi/fizhi_init_chem.F |
139 |
READ_OZ |
integer time0 |
|
./pkg/fizhi/fizhi_init_chem.F |
168 |
READ_OZ |
do time0=1,ntime |
|
./pkg/fizhi/fizhi_init_chem.F |
171 |
READ_OZ |
nrec = lev+(time0-1)*nlev*2 |
|
./pkg/fizhi/fizhi_init_chem.F |
177 |
READ_OZ |
oz(lat,nlev-lev+1,time0) = o3(lat) |
|
./pkg/fizhi/fizhi_init_chem.F |
71 |
READ_QZ |
integer time0 |
|
./pkg/fizhi/fizhi_init_chem.F |
93 |
READ_QZ |
do time0=1,ntime |
|
./pkg/fizhi/fizhi_init_chem.F |
96 |
READ_QZ |
read(ku,1000) (qz(lat,lev,time0),lev=1,nlev) |
|
./pkg/chronos/chronos.F |
184 |
GET_ALARM |
integer n,modalarm,nalarm,freq,date0,time0 |
|
./pkg/chronos/chronos.F |
185 |
GET_ALARM |
modalarm(freq,date0,time0) = nalarm (freq,date,time,date0,time0 ) |