reset_velocity_grid_snapshot_cache Subroutine

public subroutine reset_velocity_grid_snapshot_cache()

独立runを同一processで開始するtest/support用途にsnapshot cacheを解放する。

Arguments

None

Source Code

  subroutine reset_velocity_grid_snapshot_cache()
    if (allocated(velocity_grid_snapshots)) deallocate (velocity_grid_snapshots)
  end subroutine reset_velocity_grid_snapshot_cache