diff --git a/src/utility_mod.F90 b/src/utility_mod.F90 index 16dd278c21772b01d4ae0288ee24c68e44538ce4..0d98a59919484a7095ad38bb8e87c246147f754b 100644 --- a/src/utility_mod.F90 +++ b/src/utility_mod.F90 @@ -45,7 +45,7 @@ CONTAINS isi=.TRUE. END IF IF((isi).AND.(str.NE.'')) THEN - WRITE(*,'(a20,a25,i6.6,a20,i1)') str,' = Inf at timestep',cstep, ' and substep',updatetlevel + !WRITE(*,'(a20,a25,i6.6,a20,i1)') str,' = Inf at timestep',cstep, ' and substep',updatetlevel CALL FLUSH(stdout) END IF @@ -70,5 +70,3 @@ CONTAINS END FUNCTION checkfield END MODULE utility - -