| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/update_ocean_exports.F |
170 |
GETSICE |
character*8 cname |
|
./pkg/fizhi/update_ocean_exports.F |
223 |
GETSICE |
. cname, cdscrip, imbc, jmbc, lat0, lon0, |
|
./pkg/fizhi/update_ocean_exports.F |
229 |
GETSICE |
if (.not.error .and. cname.ne.'SICE') then |
|
./pkg/fizhi/update_ocean_exports.F |
230 |
GETSICE |
write(6,*)'Wrong data in SICE boundary condition file => ',cname |
|
./pkg/fizhi/update_ocean_exports.F |
272 |
GETSICE |
write(6,*) ' Variable: ',cname |
|
./pkg/fizhi/update_ocean_exports.F |
422 |
GETSST |
character*8 cname |
|
./pkg/fizhi/update_ocean_exports.F |
474 |
GETSST |
. cname, cdscrip, imbc, jmbc, lat0, lon0, |
|
./pkg/fizhi/update_ocean_exports.F |
480 |
GETSST |
if (.not.error .and. cname.ne.'SST') then |
|
./pkg/fizhi/update_ocean_exports.F |
481 |
GETSST |
write(6,*)'Wrong data in SST boundary condition file => ',cname |
|
./pkg/fizhi/update_ocean_exports.F |
523 |
GETSST |
write(6,*) ' Variable: ',cname |
|
./pkg/fizhi/update_ocean_exports.F |
647 |
BCHEADER |
. cname, cdscrip, im, jm, lat0, lon0, ndatebc, |
|
./pkg/fizhi/update_ocean_exports.F |
677 |
BCHEADER |
character*8 cname |
|
./pkg/fizhi/update_ocean_exports.F |
691 |
BCHEADER |
read(iunit,rec=nrec,err=500) cname, cdscrip, |