fixed problem with indexing of output

MintonGroup · Dec 5, 2022 · 965d4e6 · 965d4e6
1 parent 40ac0ee
commit 965d4e6
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/main/swiftest_driver.f90 b/src/main/swiftest_driver.f90
@@ -81,7 +81,7 @@ program swiftest_driver
       t = tstart
       nloops = ceiling((tstop - t0) / dt, kind=I8B)
       istart =  ceiling((tstart - t0) / dt + 1.0_DP, kind=I8B)
-      ioutput = int(istart / istep_out, kind=I4B)
+      ioutput = max(int(istart / istep_out, kind=I4B),1)
 
       ! Set up system storage for intermittent file dumps
       if (dump_cadence == 0) dump_cadence = ceiling(nloops / (1.0_DP * istep_out), kind=I8B)