tem_restart_dump_data Subroutine

public subroutine tem_restart_dump_data(restart, varsys, tree, time, subtree)

This subroutine evaluated get_element and dump each chunk

This routine is used in tracking to dump in data in harvester format for single variable system

Arguments

TypeIntentOptionalAttributesName
type(tem_restart_type), intent(inout) :: restart

The restart object describing how and what to output.

type(tem_varSys_type), intent(in) :: varsys

Description of the available variable system to get the given varnames from.

type(treelmesh_type), intent(in) :: tree

Mesh to write the data on.

type(tem_time_type), intent(in) :: time

Point in time to use for this data.

Can be important for space-time function evaluations.

type(tem_subTree_type), intent(in), optional :: subtree

Optional restriction of the elements to output.


Calls

proc~~tem_restart_dump_data~~CallsGraph proc~tem_restart_dump_data tem_restart_dump_data proc~tem_get_element_chunk tem_get_element_chunk proc~tem_restart_dump_data->proc~tem_get_element_chunk proc~check_mpi_error check_mpi_error proc~tem_restart_dump_data->proc~check_mpi_error mpi_file_write_all mpi_file_write_all proc~tem_restart_dump_data->mpi_file_write_all proc~tem_abort tem_abort proc~check_mpi_error->proc~tem_abort mpi_error_string mpi_error_string proc~check_mpi_error->mpi_error_string mpi_abort mpi_abort proc~tem_abort->mpi_abort

Called by

proc~~tem_restart_dump_data~~CalledByGraph proc~tem_restart_dump_data tem_restart_dump_data proc~hvs_output_write hvs_output_write proc~hvs_output_write->proc~tem_restart_dump_data proc~tem_tracker tem_tracker proc~tem_tracker->proc~hvs_output_write

Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: nVars

transient reducution

integer, private :: nElems

transient reducution

integer, private :: nScalars

transient reducution

integer, private :: elemOff

transient reducution

integer, private :: nChunkElems

transient reducution

integer, private :: iElem
integer, private :: iChunk
integer, private :: buf_start
integer, private :: buf_end
real(kind=rk), private, allocatable:: res(:)
integer, private, allocatable:: elemPos(:)
integer, private :: ioStatus(mpi_status_size)
integer, private :: iError