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~~CallsGraph proc~hvs_vtk_closepvd hvs_vtk_closePVD proc~tem_abort tem_abort proc~hvs_vtk_closepvd->proc~tem_abort mpi_abort mpi_abort proc~tem_abort->mpi_abort

Called by

proc~~hvs_vtk_closepvd~~CalledByGraph proc~hvs_vtk_closepvd hvs_vtk_closePVD proc~hvs_output_finalize hvs_output_finalize proc~hvs_output_finalize->proc~hvs_vtk_closepvd proc~tem_tracking_finalize tem_tracking_finalize proc~tem_tracking_finalize->proc~hvs_output_finalize

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