| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_init_chem.F |
104 |
READ_QZ |
do lat = 1,nlat |
|
./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 |
134 |
READ_OZ |
_RL oz(nlat,nlev,ntime) |
|
./pkg/fizhi/fizhi_init_chem.F |
135 |
READ_OZ |
real*4 o3(nlat) |
|
./pkg/fizhi/fizhi_init_chem.F |
136 |
READ_OZ |
_RL lats(nlat) |
|
./pkg/fizhi/fizhi_init_chem.F |
152 |
READ_OZ |
do lat = 1,nlat |
|
./pkg/fizhi/fizhi_init_chem.F |
166 |
READ_OZ |
. recl=nlat*4) |
|
./pkg/fizhi/fizhi_init_chem.F |
174 |
READ_OZ |
call MDS_BYTESWAPR4(nlat,o3) |
|
./pkg/fizhi/fizhi_init_chem.F |
176 |
READ_OZ |
do lat=1,nlat |
|
./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 |
67 |
READ_QZ |
_RL qz(nlat,nlev,ntime) |
|
./pkg/fizhi/fizhi_init_chem.F |
68 |
READ_QZ |
_RL lats(nlat) |
|
./pkg/fizhi/fizhi_init_chem.F |
83 |
READ_QZ |
do lat = 1,nlat |
|
./pkg/fizhi/fizhi_init_chem.F |
95 |
READ_QZ |
do lat=1,nlat |