Symbol Description Uses
switch 7



File Line number Procedure Code
./pkg/cal/cal_addtime.F 197 CAL_ADDTIME
               switch = (mi-1)/nmonthyear
./pkg/cal/cal_addtime.F 198 CAL_ADDTIME
               yi = yi + switch
./pkg/cal/cal_addtime.F 200 CAL_ADDTIME
               if (switch .eq. 1) li = cal_IsLeap( yi, mythid )
./pkg/cal/cal_addtime.F 216 CAL_ADDTIME
                  switch = mi/nmonthyear
./pkg/cal/cal_addtime.F 217 CAL_ADDTIME
                  yi = yi - switch
./pkg/cal/cal_addtime.F 218 CAL_ADDTIME
                  if (switch .eq. 1) li = cal_IsLeap( yi, mythid )
./pkg/cal/cal_addtime.F 67 CAL_ADDTIME
      integer switch