finalize Function

private function finalize(self) result(error)

Type Bound

vtk_file

Arguments

Type IntentOptional Attributes Name
class(vtk_file), intent(inout) :: self

Return Value integer(kind=I4P)


Calls

proc~~finalize~6~~CallsGraph proc~finalize~6 vtk_file%finalize finalize finalize proc~finalize~6->finalize

Called by

proc~~finalize~6~~CalledByGraph proc~finalize~6 vtk_file%finalize proc~write_check write_check proc~write_check->proc~finalize~6 proc~write_slave write_slave proc~write_slave->proc~finalize~6 proc~write_vts write_vts proc~write_vts->proc~finalize~6 program~vtk_fortran_write_vtm vtk_fortran_write_vtm program~vtk_fortran_write_vtm->proc~finalize~6 program~vtk_fortran_write_vtr vtk_fortran_write_vtr program~vtk_fortran_write_vtr->proc~finalize~6 program~vtk_fortran_write_vts vtk_fortran_write_vts program~vtk_fortran_write_vts->proc~finalize~6 program~vtk_fortran_write_vtu vtk_fortran_write_vtu program~vtk_fortran_write_vtu->proc~finalize~6 program~vtk_fortran_write_vtu~2 vtk_fortran_write_vtu program~vtk_fortran_write_vtu~2->proc~finalize~6 program~vtk_fortran_write_pvts vtk_fortran_write_pvts program~vtk_fortran_write_pvts->proc~write_vts program~vtk_fortran_write_volatile vtk_fortran_write_volatile program~vtk_fortran_write_volatile->proc~write_check program~vtk_fortran_write_volatile->proc~write_slave

Source Code

   function finalize(self) result(error)
   !< Finalize file (writer).
   class(vtk_file), intent(inout)  :: self  !< VTK file.
   integer(I4P)                    :: error !< Error status.
   character(len=:),           allocatable :: xml_volatile !< XML volatile file.

   error = 1
   if (allocated(self%xml_writer)) error = self%xml_writer%finalize()
   endfunction finalize