Symbol Description Uses
presentsecs 4


File Line number Procedure Code
./pkg/cal/cal_stepsperday.F 54 CAL_STEPSPERDAY 
      integer presentsecs
./pkg/cal/cal_stepsperday.F 64 CAL_STEPSPERDAY 
      presentsecs = (currentdate(2)/10000)*secondsperhour +
./pkg/cal/cal_stepsperday.F 71 CAL_STEPSPERDAY 
     &             int(presentsecs/modelstep)
./pkg/cal/cal_stepsperday.F 76 CAL_STEPSPERDAY 
        numsteps    = int((finalsecs - presentsecs)/modelstep)