Revert "EVOLUTION: Update all blocks after the mesh update."

This reverts commit 8b36ce58e18bdc5af35c03571e77c5566efb2ae0.
This commit is contained in:
Grzegorz Kowal 2023-08-29 17:06:15 -03:00
parent dfe7310408
commit 48f6618121

@ -1090,6 +1090,7 @@ module evolution
! references
!
use blocks , only : set_blocks_update
use coordinates, only : toplev
use forcing , only : update_forcing, forcing_enabled
use mesh , only : update_mesh
@ -1116,6 +1117,10 @@ module evolution
!
if (toplev > 1) then
! set all meta blocks to not be updated
!
call set_blocks_update(.false.)
! check refinement and refine
!
call update_mesh(status)
@ -1126,6 +1131,10 @@ module evolution
call update_variables(time + dt, 0.0d+00, status)
if (status /= 0) go to 100
! set all meta blocks to be updated
!
call set_blocks_update(.true.)
end if ! toplev > 1
! error entry point