(fix) small mf6core style issues (MODFLOW-USGS#949)

Hofer-Julian · Jul 14, 2022 · f9f51e2 · f9f51e2
1 parent 2530437
commit f9f51e2
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/src/mf6core.f90 b/src/mf6core.f90
@@ -40,15 +40,15 @@ subroutine Mf6Run
         call Mf6Initialize()
         !
         ! -- time loop
-        tsloop: do while (totim < totalsimtime)
+        do while (totim < totalsimtime)
 
           ! perform a time step
           hasConverged = Mf6Update()
 
           ! if not converged, break
-          if(.not. hasConverged) exit tsloop   
+          if (.not. hasConverged) exit 
 
-        enddo tsloop
+        end do
         !
         ! -- finalize simulation
         call Mf6Finalize()