Merge branch 'master' into reconnection
This commit is contained in:
commit
9571b82eda
@ -423,10 +423,6 @@ program amun
|
|||||||
!
|
!
|
||||||
call generate_mesh()
|
call generate_mesh()
|
||||||
|
|
||||||
! store mesh statistics
|
|
||||||
!
|
|
||||||
call store_mesh_stats(step, time)
|
|
||||||
|
|
||||||
! calculate new timestep
|
! calculate new timestep
|
||||||
!
|
!
|
||||||
call new_time_step(dtnext)
|
call new_time_step(dtnext)
|
||||||
@ -437,6 +433,10 @@ program amun
|
|||||||
|
|
||||||
end if
|
end if
|
||||||
|
|
||||||
|
! store mesh statistics
|
||||||
|
!
|
||||||
|
call store_mesh_stats(step, time)
|
||||||
|
|
||||||
#ifdef MPI
|
#ifdef MPI
|
||||||
! reduce termination flag over all processors
|
! reduce termination flag over all processors
|
||||||
!
|
!
|
||||||
|
Loading…
x
Reference in New Issue
Block a user