| File |
Line number |
Procedure |
Code |
|
./pkg/cal/cal_stepsforday.F |
131 |
CAL_STEPSFORDAY |
laststep = int((secondsperday - startsecs)/mdstep) |
|
./pkg/cal/cal_stepsforday.F |
136 |
CAL_STEPSFORDAY |
fullsteps = int((secondsperday - startsecs)/mdstep) |
|
./pkg/cal/cal_stepsforday.F |
139 |
CAL_STEPSFORDAY |
frac1 = (secondsperday - startsecs) - fullsteps*mdstep |
|
./pkg/cal/cal_stepsforday.F |
153 |
CAL_STEPSFORDAY |
fullsteps = int((secondsperday - startsecs)/mdstep) |
|
./pkg/cal/cal_stepsforday.F |
156 |
CAL_STEPSFORDAY |
frac1 = (secondsperday - startsecs) - fullsteps*mdstep |
|
./pkg/cal/cal_stepsforday.F |
62 |
CAL_STEPSFORDAY |
integer startsecs |
|
./pkg/cal/cal_stepsforday.F |
85 |
CAL_STEPSFORDAY |
startsecs = (modelstartdate(2)/10000)*secondsperhour + |