Symbol Description Uses
mdstep 13


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 142 CAL_STEPSFORDAY 
          frac2     = secondsperday - fullsteps*mdstep
./pkg/cal/cal_stepsforday.F 146 CAL_STEPSFORDAY 
     &                frac3/mdstep
./pkg/cal/cal_stepsforday.F 148 CAL_STEPSFORDAY 
          firststep = laststep - secondsperday/mdstep + 1
./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 159 CAL_STEPSFORDAY 
          frac2     = secondsperday - fullsteps*mdstep
./pkg/cal/cal_stepsforday.F 173 CAL_STEPSFORDAY 
            numsteps  = numsteps + frac4/mdstep
./pkg/cal/cal_stepsforday.F 180 CAL_STEPSFORDAY 
            firststep = laststep - endsecs/mdstep + 1
./pkg/cal/cal_stepsforday.F 50 CAL_STEPSFORDAY 
      integer mdstep
./pkg/cal/cal_stepsforday.F 78 CAL_STEPSFORDAY 
      mdstep     = int(modelstep)