h5hut_obj_Final Subroutine

private impure subroutine h5hut_obj_Final(this)

Finalizes object and frees memeory.

Type Bound

h5hut_obj

Arguments

Type IntentOptional Attributes Name
class(h5hut_obj), intent(inout) :: this

A H5hut object


Calls

proc~~h5hut_obj_final~~CallsGraph proc~h5hut_obj_final h5hut_obj%h5hut_obj_Final proc~hdf5_obj_final hdf5_obj%hdf5_obj_Final proc~h5hut_obj_final->proc~hdf5_obj_final h5garbage_collect_f h5garbage_collect_f proc~hdf5_obj_final->h5garbage_collect_f proc~hashtbl_obj_final hashtbl_obj%hashtbl_obj_Final proc~hdf5_obj_final->proc~hashtbl_obj_final

Called by

proc~~h5hut_obj_final~~CalledByGraph proc~h5hut_obj_final h5hut_obj%h5hut_obj_Final proc~eulerian_set_readh5hut eulerian_set%eulerian_set_ReadH5HUT proc~eulerian_set_readh5hut->proc~h5hut_obj_final proc~eulerian_set_writeh5hut eulerian_set%eulerian_set_WriteH5HUT proc~eulerian_set_writeh5hut->proc~h5hut_obj_final proc~marker_set_readh5hut marker_set%marker_set_ReadH5HUT proc~marker_set_readh5hut->proc~h5hut_obj_final proc~marker_set_writeh5hut marker_set%marker_set_WriteH5HUT proc~marker_set_writeh5hut->proc~h5hut_obj_final proc~particle_set_readh5hut particle_set%particle_set_ReadH5HUT proc~particle_set_readh5hut->proc~h5hut_obj_final proc~particle_set_writeh5hut particle_set%particle_set_WriteH5HUT proc~particle_set_writeh5hut->proc~h5hut_obj_final proc~respart_set_readh5hut ResPart_set%ResPart_set_ReadH5HUT proc~respart_set_readh5hut->proc~h5hut_obj_final proc~respart_set_writeh5hut ResPart_set%ResPart_set_WriteH5HUT proc~respart_set_writeh5hut->proc~h5hut_obj_final proc~respart_set_writeh5hut->proc~marker_set_writeh5hut proc~solid_set_readh5hut solid_set%solid_set_ReadH5HUT proc~solid_set_readh5hut->proc~h5hut_obj_final proc~solid_set_writeh5hut solid_set%solid_set_WriteH5HUT proc~solid_set_writeh5hut->proc~h5hut_obj_final

Source Code

    impure subroutine h5hut_obj_Final(this)
      !> Finalizes object and frees memeory.
      implicit none
      class(h5hut_obj), intent(inout) :: this                                  !! A H5hut object

      ! Close file
      call this%hdf5%Close()

      ! Finalize internal objects
      call this%hdf5%Finalize()

      ! Nullify pointers
      this%parallel => null()

      return
    end subroutine h5hut_obj_Final