Symbol Description Uses
ndays_left 9



File Line number Procedure Code
./pkg/cal/cal_addtime.F 167 CAL_ADDTIME
            ndays_left=ndays
./pkg/cal/cal_addtime.F 171 CAL_ADDTIME
               if ( mi.eq.2 .and. di.eq.29 .and. ndays_left.gt.1 ) then
./pkg/cal/cal_addtime.F 174 CAL_ADDTIME
                  ndays_left = ndays_left - 1
./pkg/cal/cal_addtime.F 183 CAL_ADDTIME
            do while (ndays_left .ge. days_in_year)
./pkg/cal/cal_addtime.F 184 CAL_ADDTIME
               ndays_left = ndays_left - days_in_year
./pkg/cal/cal_addtime.F 194 CAL_ADDTIME
            do iday = 1,ndays_left
./pkg/cal/cal_addtime.F 57 CAL_ADDTIME
      INTEGER ndays, ndays_left, days_in_year