Remove instances of !KO

Author: olyson

src/riverroute/RtmHistFile.F90

@@ -1010,10 +1010,6 @@ subroutine RtmHistHtapesWrapup( rstwr, nlend )
     ! and write data to history files if end of history interval.
     do t = 1, ntapes
 
-!KO    ! Should no longer be needed
-!KO       ! Skip nstep=0 if monthly average
-!KO       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

src/riverroute/RtmTimeManager.F90

@@ -1001,10 +1001,7 @@ logical function is_first_step()
    call ESMF_ClockGet( tm_clock, advanceCount=step_no, rc=rc )
    call chkrc(rc, sub//': error return from ESMF_ClockGet')
    nstep = step_no
-!KO   is_first_step = (nstep == 0)
-!KO
    is_first_step = (nstep == 1)
-!KO
 
 end function is_first_step