finish_gridvars Subroutine

public subroutine finish_gridvars()

Uses

  • proc~~finish_gridvars~~UsesGraph proc~finish_gridvars finish_gridvars module~mod_global_parameters mod_global_parameters proc~finish_gridvars->module~mod_global_parameters module~mod_basic_types mod_basic_types module~mod_global_parameters->module~mod_basic_types module~mod_connectivity mod_connectivity module~mod_global_parameters->module~mod_connectivity module~mod_constants mod_constants module~mod_global_parameters->module~mod_constants module~mod_physicaldata mod_physicaldata module~mod_global_parameters->module~mod_physicaldata module~mod_variables mod_variables module~mod_global_parameters->module~mod_variables mpi mpi module~mod_global_parameters->mpi module~mod_variables->module~mod_basic_types

Deallocate grid variables for particles

Arguments

None

Called by

proc~~finish_gridvars~~CalledByGraph proc~finish_gridvars finish_gridvars proc~main main proc~main->proc~finish_gridvars proc~timeintegration timeintegration proc~main->proc~timeintegration proc~resettree resettree proc~resettree->proc~finish_gridvars proc~timeintegration->proc~finish_gridvars proc~timeintegration->proc~resettree program~agile agile program~agile->proc~main

Source Code

  subroutine finish_gridvars()
    use mod_global_parameters

    integer :: iigrid, igrid

    do iigrid=1,igridstail; igrid=igrids(iigrid);
      deallocate(gridvars(igrid)%w,gridvars(igrid)%wold)
    end do

  end subroutine finish_gridvars