hvs_vtk_closePVD Subroutine

public subroutine hvs_vtk_closePVD(vtk_file, proc)

This routine finalizes the vtu file i.e closing cellData xml and creating pvtu file to combile all parallel vtu files

Arguments

Type IntentOptional Attributes Name
type(hvs_vtk_file_type), intent(in) :: vtk_file

The file descriptor to close again.
type(tem_comm_env_type), intent(in) :: proc

Communicator for the parallel environment.

Calls

proc~~hvs_vtk_closepvd~2~~CallsGraph proc~hvs_vtk_closepvd~2 hvs_vtk_closePVD proc~tem_abort tem_abort proc~hvs_vtk_closepvd~2->proc~tem_abort mpi_abort mpi_abort proc~tem_abort->mpi_abort

Source Code

  subroutine hvs_vtk_closePVD(vtk_file, proc)
    !> The file descriptor to close again.
    type(hvs_vtk_file_type), intent(in) :: vtk_file
    !> Communicator for the parallel environment.
    type(tem_comm_env_type), intent(in) :: proc
    ! ----------------------------------------------------------------------!
    write(logUnit(0),*) 'Using dummy hvs_vtk_closePVD because'
    write(logUnit(0),*) 'executable is configured with --no_vtk'
    call tem_abort()
  end subroutine hvs_vtk_closePVD