File |
Line number |
Procedure |
Code |
./pkg/fizhi/update_ocean_exports.F |
184 |
GETSICE |
integer i,j,n,nn,iyear,iyearbc,nd,ndby3,imbc,jmbc |
./pkg/fizhi/update_ocean_exports.F |
295 |
GETSICE |
ndby3 = ndatebc/3 |
./pkg/fizhi/update_ocean_exports.F |
296 |
GETSICE |
do n = 1, ndby3*3,3 |
./pkg/fizhi/update_ocean_exports.F |
300 |
GETSICE |
write(6,1000) (nn,nymdbc(nn),nhmsbc(nn),nn=ndby3*3+1,ndatebc) |
./pkg/fizhi/update_ocean_exports.F |
445 |
GETSST |
integer i,j,n,nn,iyear,iyearbc,nd,ndby3,imbc,jmbc |
./pkg/fizhi/update_ocean_exports.F |
555 |
GETSST |
ndby3 = ndatebc/3 |
./pkg/fizhi/update_ocean_exports.F |
556 |
GETSST |
do n = 1, ndby3*3,3 |
./pkg/fizhi/update_ocean_exports.F |
560 |
GETSST |
write(6,1000) (nn,nymdbc(nn),nhmsbc(nn),nn=ndby3*3+1,ndatebc) |