Symbol Description Uses
mi 32


File Line number Procedure Code
./pkg/runclock/runclock_gettime.F 25 RUNCLOCK_GETTIME 
      INTEGER yr,mo,dy,hr,mi,sc
./pkg/runclock/runclock_gettime.F 52 RUNCLOCK_GETTIME 
      mi=DAT_VALS(6)
./pkg/runclock/runclock_gettime.F 57 RUNCLOCK_GETTIME 
      tins=(((((yr-05)*12+mo)*30.+dy)*24.+hr)*60.+mi)*60.+sc+0.001*ms
./pkg/runclock/runclock_gettime.F 63 RUNCLOCK_GETTIME 
       mi=mod(tm,60)
./pkg/runclock/runclock_gettime.F 64 RUNCLOCK_GETTIME 
      tm=(tm-mi)/60
./pkg/runclock/runclock_gettime.F 9 RUNCLOCK_GETTIME 
      SUBROUTINE RUNCLOCK_GETTIME( yr,mo,dy,hr,mi,sc,tins )
./pkg/cal/cal_addtime.F 137 CAL_ADDTIME 
         mi     = 0
./pkg/cal/cal_addtime.F 142 CAL_ADDTIME 
         call CAL_CONVDATE( date,yi,mi,di,si,li,wi,mythid )
./pkg/cal/cal_addtime.F 168 CAL_ADDTIME 
               if ( mi.eq.2 .and. di.eq.29 .and. ndays_left.gt.1 ) then
./pkg/cal/cal_addtime.F 169 CAL_ADDTIME 
                  mi = 3
./pkg/cal/cal_addtime.F 177 CAL_ADDTIME 
            if ((mi.gt.2.and.cal_IsLeap(yi+1,mythid).eq.2).or.
./pkg/cal/cal_addtime.F 178 CAL_ADDTIME 
     &           (mi.le.2.and.cal_IsLeap(yi,mythid).eq.2) )
./pkg/cal/cal_addtime.F 184 CAL_ADDTIME 
               if ((mi.gt.2.and.cal_IsLeap(yi+1,mythid).eq.2).or.
./pkg/cal/cal_addtime.F 185 CAL_ADDTIME 
     &              (mi.le.2.and.cal_IsLeap(yi,mythid).eq.2) )
./pkg/cal/cal_addtime.F 193 CAL_ADDTIME 
               if (di .gt. ndaymonth(mi,li)) then
./pkg/cal/cal_addtime.F 195 CAL_ADDTIME 
                  mi = mi + 1
./pkg/cal/cal_addtime.F 197 CAL_ADDTIME 
               switch = (mi-1)/nmonthyear
./pkg/cal/cal_addtime.F 199 CAL_ADDTIME 
               mi = mod(mi-1,nmonthyear)+1
./pkg/cal/cal_addtime.F 215 CAL_ADDTIME 
                  mi = mod(mi+10,nmonthyear)+1
./pkg/cal/cal_addtime.F 216 CAL_ADDTIME 
                  switch = mi/nmonthyear
./pkg/cal/cal_addtime.F 219 CAL_ADDTIME 
                  di = ndaymonth(mi,li)
./pkg/cal/cal_addtime.F 227 CAL_ADDTIME 
      added(1) = yi*10000 + mi*100 + di
./pkg/cal/cal_addtime.F 61 CAL_ADDTIME 
      integer yi,mi,di,si,li,wi
./pkg/cal/cal_timepassed.F 109 CAL_TIMEPASSED 
            call CAL_CONVDATE(   finaldate,yi,mi,di,si,li,wi,mythid )
./pkg/cal/cal_timepassed.F 112 CAL_TIMEPASSED 
            call CAL_CONVDATE( initialdate,yi,mi,di,si,li,wi,mythid )
./pkg/cal/cal_timepassed.F 130 CAL_TIMEPASSED 
            do imon = 1,mod(mi-1,12)
./pkg/cal/cal_timepassed.F 151 CAL_TIMEPASSED 
     &                cdi - ndaymonth(mi,li)
./pkg/cal/cal_timepassed.F 157 CAL_TIMEPASSED 
              csi   = ndaymonth(mi,li)*secondsperday - csi
./pkg/cal/cal_timepassed.F 52 CAL_TIMEPASSED 
      integer mi,mf