File |
Line number |
Procedure |
Code |
./pkg/fizhi/update_ocean_exports.F |
175 |
GETSICE |
integer i,j,n,nn,iyear,iyearbc,nd,ndby3,imbc,jmbc |
./pkg/fizhi/update_ocean_exports.F |
185 |
GETSICE |
save imbc,jmbc,lat0,lon0,ndatebc,undef |
./pkg/fizhi/update_ocean_exports.F |
223 |
GETSICE |
. cname, cdscrip, imbc, jmbc, lat0, lon0, |
./pkg/fizhi/update_ocean_exports.F |
235 |
GETSICE |
if(.not.error.and.imbc*jmbc.ne.xsize*ysize)then |
./pkg/fizhi/update_ocean_exports.F |
237 |
GETSICE |
write(6,*) ' B.C. Resolution: ',imbc*jmbc |
./pkg/fizhi/update_ocean_exports.F |
274 |
GETSICE |
write(6,*) ' Resolution: x= ',imbc,' y= ',jmbc, |
./pkg/fizhi/update_ocean_exports.F |
310 |
GETSICE |
call BCDATA (iunit,imbc,jmbc,nd,nd+1,sicebc1,sicebc2) |
./pkg/fizhi/update_ocean_exports.F |
427 |
GETSST |
integer i,j,n,nn,iyear,iyearbc,nd,ndby3,imbc,jmbc |
./pkg/fizhi/update_ocean_exports.F |
437 |
GETSST |
save imbc,jmbc,lat0,lon0,ndatebc,undef |
./pkg/fizhi/update_ocean_exports.F |
474 |
GETSST |
. cname, cdscrip, imbc, jmbc, lat0, lon0, |
./pkg/fizhi/update_ocean_exports.F |
486 |
GETSST |
if(.not.error.and.imbc*jmbc.ne.xsize*ysize)then |
./pkg/fizhi/update_ocean_exports.F |
488 |
GETSST |
write(6,*) ' B.C. Resolution: ',imbc*jmbc |
./pkg/fizhi/update_ocean_exports.F |
525 |
GETSST |
write(6,*) ' Resolution: x= ',imbc,' y= ',jmbc, |
./pkg/fizhi/update_ocean_exports.F |
563 |
GETSST |
call BCDATA (iunit,imbc,jmbc,nd,nd+1,sstbc1,sstbc2) |