remove unused variables

emorway-usgs · Dec 8, 2023 · de02c0a · de02c0a
1 parent e1bea70
commit de02c0a
Showing 1 changed file with 2 additions and 3 deletions.
diff --git a/src/Timing/tdis.f90 b/src/Timing/tdis.f90
@@ -361,9 +361,8 @@ subroutine tdis_ot(iout)
     ! -- dummy
     integer(I4B), intent(in) :: iout
     ! -- local
-    real(DP) :: cnv, delsec, totsec, persec, sixty, hrday, dayyr, &
-                delmn, delhr, totmn, tothr, totdy, totyr, permn, perhr, &
-                perdy, peryr, deldy, delyr
+    real(DP) :: cnv, delsec, totsec, persec, delmn, delhr, totmn, tothr, &
+                totdy, totyr, permn, perhr, perdy, peryr, deldy, delyr
     ! -- format
     character(len=*), parameter :: fmttmsmry = "(1X, ///9X, &
       &'TIME SUMMARY AT END OF TIME STEP', I5,' IN STRESS PERIOD ', I4)"