File |
Line number |
Procedure |
Code |
./pkg/fizhi/update_earth_exports.F |
716 |
GETLGR |
INTEGER sec, imon, iday, nchps, nchpdim, nSx, nSy, bi, bj |
./pkg/cal/cal_timepassed.F |
135 |
CAL_TIMEPASSED |
do imon = 1,mod(mi-1,12) |
./pkg/cal/cal_timepassed.F |
136 |
CAL_TIMEPASSED |
cdi = cdi + ndaymonth(imon,li) |
./pkg/cal/cal_timepassed.F |
140 |
CAL_TIMEPASSED |
do imon = 1,mod(mf-1,12) |
./pkg/cal/cal_timepassed.F |
141 |
CAL_TIMEPASSED |
cdf = cdf + ndaymonth(imon,lf) |
./pkg/cal/cal_timepassed.F |
59 |
CAL_TIMEPASSED |
INTEGER imon |
./pkg/ecco/cost_genread.F |
60 |
COST_GENREAD |
integer iyear, imon |
./pkg/ecco/cost_genread.F |
72 |
COST_GENREAD |
imon=irec+(iyear-1)*preproc_i(1) |
./pkg/ecco/cost_genread.F |
74 |
COST_GENREAD |
& imon, nnzbar, dummy, mythid ) |