File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
112 |
GETSICE |
. nymdbc,nhmsbc,sice,mythid) |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
169 |
GETSICE |
integer nymdbc(ndmax),nhmsbc(ndmax) |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
184 |
GETSST |
. nymdbc,nhmsbc,sst,mythid) |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
241 |
GETSST |
integer nymdbc(ndmax),nhmsbc(ndmax) |
./pkg/fizhi/update_ocean_exports.F |
112 |
GETSICE |
. nymdbc,nhmsbc,sice,mythid) |
./pkg/fizhi/update_ocean_exports.F |
168 |
GETSICE |
integer nymdbc(ndmax),nhmsbc(ndmax) |
./pkg/fizhi/update_ocean_exports.F |
224 |
GETSICE |
. ndatebc, nymdbc, nhmsbc, undef, error) |
./pkg/fizhi/update_ocean_exports.F |
280 |
GETSICE |
write(6,1000) (nn,nymdbc(nn),nhmsbc(nn),nn=n,n+2) |
./pkg/fizhi/update_ocean_exports.F |
283 |
GETSICE |
write(6,1000) (nn,nymdbc(nn),nhmsbc(nn),nn=ndby3*3+1,ndatebc) |
./pkg/fizhi/update_ocean_exports.F |
304 |
GETSICE |
timebc2 = dfloat(nymdbc(nd)) + dfloat(nhmsbc(nd))/1000000 |
./pkg/fizhi/update_ocean_exports.F |
308 |
GETSICE |
nhmsbc1 = nhmsbc(nd-1) |
./pkg/fizhi/update_ocean_exports.F |
309 |
GETSICE |
nhmsbc2 = nhmsbc(nd) |
./pkg/fizhi/update_ocean_exports.F |
364 |
GETSST |
. nymdbc,nhmsbc,sst,mythid) |
./pkg/fizhi/update_ocean_exports.F |
420 |
GETSST |
integer nymdbc(ndmax),nhmsbc(ndmax) |
./pkg/fizhi/update_ocean_exports.F |
475 |
GETSST |
. ndatebc, nymdbc, nhmsbc, undef, error) |
./pkg/fizhi/update_ocean_exports.F |
531 |
GETSST |
write(6,1000) (nn,nymdbc(nn),nhmsbc(nn),nn=n,n+2) |
./pkg/fizhi/update_ocean_exports.F |
534 |
GETSST |
write(6,1000) (nn,nymdbc(nn),nhmsbc(nn),nn=ndby3*3+1,ndatebc) |
./pkg/fizhi/update_ocean_exports.F |
557 |
GETSST |
timebc2 = dfloat(nymdbc(nd)) + dfloat(nhmsbc(nd))/1000000 |
./pkg/fizhi/update_ocean_exports.F |
561 |
GETSST |
nhmsbc1 = nhmsbc(nd-1) |
./pkg/fizhi/update_ocean_exports.F |
562 |
GETSST |
nhmsbc2 = nhmsbc(nd) |
./pkg/fizhi/update_ocean_exports.F |
648 |
BCHEADER |
. nymdbc, nhmsbc, undef, error) |
./pkg/fizhi/update_ocean_exports.F |
680 |
BCHEADER |
integer im,jm,ndatebc,nymdbc(ndmax),nhmsbc(ndmax) |
./pkg/fizhi/update_ocean_exports.F |
720 |
BCHEADER |
nhmsbc(i) = nhmsbc_32(i) |