File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_clockstuff.F |
1112 |
TIME2FREQ2 |
integer year, month, day, sec |
./pkg/fizhi/fizhi_clockstuff.F |
1152 |
TIME2FREQ2 |
timeleft = daysleft * nsday - sec |
./pkg/fizhi/fizhi_clockstuff.F |
486 |
INTERP_TIME |
time00 = DAY + MNDY(MONTH +12*MOD(YEAR ,4)) + float(sec )/86400. |
./pkg/fizhi/fizhi_clockstuff.F |
884 |
ASTRO |
integer year, day, sec, month, iday, idayp1 |
./pkg/fizhi/update_earth_exports.F |
102 |
UPDATE_EARTH_EXPORTS |
call GETALB(sec,month,day,cosz,snodep,fraci,fracl,im2,jm2,nchp, |
./pkg/fizhi/update_earth_exports.F |
43 |
UPDATE_EARTH_EXPORTS |
integer sec, day, month |
./pkg/fizhi/update_earth_exports.F |
59 |
UPDATE_EARTH_EXPORTS |
sec = nsecf(nhms) |
./pkg/fizhi/update_earth_exports.F |
696 |
GETLGR |
SUBROUTINE GETLGR(sec,IMON,IDAY,ALAT,ITYP,NCHPS,nchpdim, |
./pkg/fizhi/update_earth_exports.F |
707 |
GETLGR |
integer sec, imon, iday, nchps, nchpdim, nSx, nSy, bi, bj |
./pkg/fizhi/update_earth_exports.F |
812 |
GETALB |
subroutine GETALB(sec,month,day,cosz,snodep,fraci,fracg,im,jm, |
./pkg/fizhi/update_earth_exports.F |
854 |
GETALB |
integer sec,month,day,im,jm,nchp,nchptot,nchpland,nSx,nSy,bi,bj |
./pkg/fizhi/update_earth_exports.F |
88 |
UPDATE_EARTH_EXPORTS |
call GETLGR (sec,month,day,chlt,ityp,nchpland(bi,bj), |
./pkg/chronos/chronos.F |
454 |
INTERP_TIME |
time = DAY + MNDY(MONTH ,MOD(YEAR ,4)+1) + float(sec )/86400. |
./pkg/chronos/chronos.F |
735 |
ASTRO |
integer year, day, sec, month, iday, idayp1 |