| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/update_ocean_exports.F |
177 |
GETSICE |
integer nymdmod |
|
./pkg/fizhi/update_ocean_exports.F |
189 |
GETSICE |
nymdmod = 20000000 + nymd |
|
./pkg/fizhi/update_ocean_exports.F |
191 |
GETSICE |
nymdmod = 19000000 + nymd |
|
./pkg/fizhi/update_ocean_exports.F |
193 |
GETSICE |
nymdmod = nymd |
|
./pkg/fizhi/update_ocean_exports.F |
213 |
GETSICE |
iyear = nymdmod/10000 |
|
./pkg/fizhi/update_ocean_exports.F |
258 |
GETSICE |
nymdbc(n) = nymdbc(n) +(nymdmod/10000)*10000 |
|
./pkg/fizhi/update_ocean_exports.F |
262 |
GETSICE |
nymdbc(n) = nymdbc(n) +(nymdmod/10000-1)*10000 |
|
./pkg/fizhi/update_ocean_exports.F |
265 |
GETSICE |
nymdbc(n) = nymdbc(n) +(nymdmod/10000+1)*10000 |
|
./pkg/fizhi/update_ocean_exports.F |
297 |
GETSICE |
timemod = dfloat(nymdmod) + dfloat(nhms) /1000000 |
|
./pkg/fizhi/update_ocean_exports.F |
332 |
GETSICE |
call INTERP_TIME(nymdmod,nhms,nymdbc1,nhmsbc1,nymdbc2,nhmsbc2, |
|
./pkg/fizhi/update_ocean_exports.F |
429 |
GETSST |
integer nymdmod |
|
./pkg/fizhi/update_ocean_exports.F |
441 |
GETSST |
nymdmod = 20000000 + nymd |
|
./pkg/fizhi/update_ocean_exports.F |
443 |
GETSST |
nymdmod = 19000000 + nymd |
|
./pkg/fizhi/update_ocean_exports.F |
445 |
GETSST |
nymdmod = nymd |
|
./pkg/fizhi/update_ocean_exports.F |
464 |
GETSST |
iyear = nymdmod/10000 |
|
./pkg/fizhi/update_ocean_exports.F |
509 |
GETSST |
nymdbc(n) = nymdbc(n) +(nymdmod/10000)*10000 |
|
./pkg/fizhi/update_ocean_exports.F |
513 |
GETSST |
nymdbc(n) = nymdbc(n) +(nymdmod/10000-1)*10000 |
|
./pkg/fizhi/update_ocean_exports.F |
516 |
GETSST |
nymdbc(n) = nymdbc(n) +(nymdmod/10000+1)*10000 |
|
./pkg/fizhi/update_ocean_exports.F |
550 |
GETSST |
timemod = dfloat(nymdmod) + dfloat(nhms) /1000000 |
|
./pkg/fizhi/update_ocean_exports.F |
585 |
GETSST |
call INTERP_TIME(nymdmod,nhms,nymdbc1,nhmsbc1,nymdbc2,nhmsbc2, |