Merge pull request #67 from olyson/zerothtstep

Stop running 0th timestep
ESCOMP · Nov 12, 2024 · 99b425e · 99b425e
2 parents 9fe1ea8 + 16bc164
commit 99b425e
Showing 1 changed file with 0 additions and 3 deletions.
diff --git a/src/riverroute/mosart_histfile.F90 b/src/riverroute/mosart_histfile.F90
@@ -940,9 +940,6 @@ subroutine mosart_hist_HtapesWrapup( rstwr, nlend )
       ! and write data to history files if end of history interval.
       do t = 1, ntapes
 
-         ! Skip nstep=0 if monthly average
-         if (nstep==0 .and. tape(t)%nhtfrq==0) cycle
-
          ! Determine if end of history interval
          tape(t)%is_endhist = .false.
          if (tape(t)%nhtfrq==0) then   !monthly average