Fix extrapolation.

Co-authored-by: gianlupo <[email protected]>
CaNS-World · Nov 5, 2024 · 6442d7f · 6442d7f
1 parent e883b94
commit 6442d7f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/main.f90 b/src/main.f90
@@ -371,7 +371,7 @@ program cans
     if(myid == 0) print*, 'Time step #', istep, 'Time = ', time
     do irk=1,3
       tm_coeff(:) = rkcoeff(:,irk)
-      dtrk = sum(tm_coeff(:))*dt
+      dtrk = sum(rkcoeff(:,1:irk))*dt
       dtrki = dtrk**(-1)
       dt_r = dtrk/dto
       !