VTK_END Function

  1. mod_vtk.f90
  2. VTK
  3. VTK_END

public function VTK_END() result(E_IO)

This function is used to finalize the file opened and it has not inputs. The \LIBVTKIO manages the file unit without the user's action.

Arguments

None

Return Value integer(kind=I4P)

The VTK_END variables have the following meaning:

The following is an example of VTK_END calling:


Called by

proc~~vtk_end~~CalledByGraph proc~vtk_end VTK_END proc~save_fe_f_vtk save_fe_f_vtk proc~save_fe_f_vtk->proc~vtk_end

Contents

Source Code

VTK_END

Source Code

  function VTK_END() result(E_IO)
  !---------------------------------------------------------------------------------------------------------------------------------
  !!This function is used to finalize the file opened and it has not inputs. The \LIBVTKIO manages the file unit without the
  !!user's action.
  !---------------------------------------------------------------------------------------------------------------------------------

  !---------------------------------------------------------------------------------------------------------------------------------
  implicit none
  integer(I4P):: E_IO ! Input/Output inquiring flag: $0$ if IO is done, $> 0$ if IO is not done
  !!The VTK\_END variables have the following meaning:
  !!
  !!\begin{description}
  !! \item[{\color{RoyalBlue}E\_IO}] contains the inquiring integer flag for error handling.
  !!\end{description}
  !!
  !!The following is an example of VTK\_END calling:
  !!
  !!\begin{boxred}{VTK\_END Calling}
  !!\begin{verbatim}
  !!...
  !!E_IO = VTK_END()
  !!...
  !!\end{verbatim}
  !!\end{boxred}
  !---------------------------------------------------------------------------------------------------------------------------------

  !---------------------------------------------------------------------------------------------------------------------------------
  close(unit=Unit_VTK,iostat=E_IO)
  return
  !---------------------------------------------------------------------------------------------------------------------------------
  endfunction VTK_END