tem_restart_closeWrite Subroutine

public subroutine tem_restart_closeWrite(me, tree, timing, varSys, subTree)

Complete a number of empty writes (due to higher amount of mpi_file_writes from other processes to finalize the write process), close the restart dump file and write the last header.

Arguments

TypeIntentOptionalAttributesName
type(tem_restart_type) :: me

the restart information

type(treelmesh_type) :: tree

mesh, provided in treelm format

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

The timing object holding the simulation time

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

global variable system defined in solver

type(tem_subTree_type), optional :: subTree

optional subTree of given tree


Calls

proc~~tem_restart_closewrite~~CallsGraph proc~tem_restart_closewrite tem_restart_closeWrite proc~check_mpi_error check_mpi_error proc~tem_restart_closewrite->proc~check_mpi_error proc~tem_restart_writeheader tem_restart_writeHeader proc~tem_restart_closewrite->proc~tem_restart_writeheader proc~tem_restart_writedata tem_restart_writeData proc~tem_restart_closewrite->proc~tem_restart_writedata mpi_file_close mpi_file_close proc~tem_restart_closewrite->mpi_file_close mpi_barrier mpi_barrier proc~tem_restart_closewrite->mpi_barrier mpi_error_string mpi_error_string proc~check_mpi_error->mpi_error_string proc~tem_abort tem_abort proc~check_mpi_error->proc~tem_abort proc~aot_out_open aot_out_open proc~tem_restart_writeheader->proc~aot_out_open interface~aot_out_val aot_out_val proc~tem_restart_writeheader->interface~aot_out_val proc~tem_mesh_out tem_mesh_out proc~tem_restart_writeheader->proc~tem_mesh_out proc~tem_open tem_open proc~tem_restart_writeheader->proc~tem_open proc~tem_time_out tem_time_out proc~tem_restart_writeheader->proc~tem_time_out proc~newunit newunit proc~tem_restart_writeheader->proc~newunit proc~aot_out_close_table aot_out_close_table proc~tem_restart_writeheader->proc~aot_out_close_table proc~aot_out_close aot_out_close proc~tem_restart_writeheader->proc~aot_out_close interface~tem_varsys_out tem_varSys_out proc~tem_restart_writeheader->interface~tem_varsys_out proc~aot_out_open_table aot_out_open_table proc~tem_restart_writeheader->proc~aot_out_open_table proc~tem_restart_writedata->proc~check_mpi_error mpi_file_write_all mpi_file_write_all proc~tem_restart_writedata->mpi_file_write_all proc~tem_mesh_out->interface~aot_out_val proc~tem_mesh_out->proc~aot_out_close_table proc~tem_mesh_out->proc~aot_out_open_table proc~tem_open->proc~newunit proc~tem_open->proc~tem_abort proc~upper_to_lower upper_to_lower proc~tem_open->proc~upper_to_lower proc~tem_time_out->interface~aot_out_val proc~tem_time_out->proc~aot_out_close_table proc~tem_time_out->proc~aot_out_open_table proc~tem_varsys_out_single tem_varSys_out_single interface~tem_varsys_out->proc~tem_varsys_out_single proc~tem_varsys_out_vector tem_varSys_out_vector interface~tem_varsys_out->proc~tem_varsys_out_vector mpi_abort mpi_abort proc~tem_abort->mpi_abort proc~tem_varsys_out_single->interface~aot_out_val proc~tem_varsys_out_single->proc~aot_out_close_table proc~tem_varsys_out_single->proc~aot_out_open_table proc~tem_varsys_out_vector->proc~aot_out_close_table proc~tem_varsys_out_vector->proc~aot_out_open_table proc~tem_varsys_out_vector->proc~tem_varsys_out_single

Called by

proc~~tem_restart_closewrite~~CalledByGraph proc~tem_restart_closewrite tem_restart_closeWrite proc~hvs_output_close hvs_output_close proc~hvs_output_close->proc~tem_restart_closewrite proc~tem_tracker tem_tracker proc~tem_tracker->proc~hvs_output_close

Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iError
integer, private :: iChunk
real(kind=rk), private :: chunk(1)