File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_clockstuff.F |
412 |
INTERP_TIME |
& nymd1,nhms1, nymd2,nhms2, fac1,fac2 ) |
./pkg/fizhi/fizhi_clockstuff.F |
445 |
INTERP_TIME |
_RL fac1,fac2 |
./pkg/fizhi/fizhi_clockstuff.F |
508 |
INTERP_TIME |
fac2 = (time00-time1)/(time2-time1) |
./pkg/fizhi/fizhi_turb.F |
1439 |
TRBFLX |
_RL vrt1con,pi,rsq2pi,p5sr,clh,vk,rvk,aitr,gbycp,fac1,fac2 |
./pkg/fizhi/update_ocean_exports.F |
182 |
GETSICE |
_RL fac1, fac2, lat0, lon0, timebc1, timebc2, timemod, undef |
./pkg/fizhi/update_ocean_exports.F |
350 |
GETSICE |
. fac1,fac2) |
./pkg/fizhi/update_ocean_exports.F |
355 |
GETSICE |
. + sicebc2(i+bislot,j+bjslot)*fac2 |
./pkg/fizhi/update_ocean_exports.F |
443 |
GETSST |
_RL fac1, fac2, lat0, lon0, timebc1, timebc2, timemod, undef |
./pkg/fizhi/update_ocean_exports.F |
612 |
GETSST |
. fac1,fac2) |
./pkg/fizhi/update_ocean_exports.F |
617 |
GETSST |
. + sstbc2(i+bislot,j+bjslot)*fac2 |
./pkg/chronos/chronos.F |
366 |
INTERP_TIME |
. nymd1,nhms1, nymd2,nhms2, fac1,fac2 ) |
./pkg/chronos/chronos.F |
399 |
INTERP_TIME |
_RL fac1,fac2 |
./pkg/chronos/chronos.F |
462 |
INTERP_TIME |
fac2 = (time-time1)/(time2-time1) |