tem_varSys_dump_single Subroutine

public subroutine tem_varSys_dump_single(me, outUnit, dumpVarPos)

Dump single varSys to given unit

Arguments

Type IntentOptional Attributes Name
type(tem_varSys_type), intent(in) :: me

variable to write into the lua file
integer, intent(inout) :: outUnit

unit to write to
integer, intent(in), optional :: dumpVarPos(:)

Position of variables to dump

Calls

proc~~tem_varsys_dump_single~2~~CallsGraph proc~tem_varsys_dump_single~2 tem_varSys_dump_single proc~aot_out_open aot_out_open proc~tem_varsys_dump_single~2->proc~aot_out_open proc~aot_out_close aot_out_close proc~tem_varsys_dump_single~2->proc~aot_out_close proc~tem_varsys_out_single~2 tem_varSys_out_single proc~tem_varsys_dump_single~2->proc~tem_varsys_out_single~2 proc~aot_out_open_table aot_out_open_table proc~tem_varsys_out_single~2->proc~aot_out_open_table proc~aot_out_val aot_out_val proc~tem_varsys_out_single~2->proc~aot_out_val proc~aot_out_close_table aot_out_close_table proc~tem_varsys_out_single~2->proc~aot_out_close_table

Called by

proc~~tem_varsys_dump_single~2~~CalledByGraph proc~tem_varsys_dump_single~2 tem_varSys_dump_single interface~tem_varsys_dump~2 tem_varSys_dump interface~tem_varsys_dump~2->proc~tem_varsys_dump_single~2

Contents

Source Code

tem_varSys_dump_single

Source Code

  subroutine tem_varSys_dump_single(me, outUnit, dumpVarPos)
    ! ---------------------------------------------------------------------------
    !> variable to write into the lua file
    type(tem_varSys_type), intent(in) :: me

    !> unit to write to
    integer, intent(inout) :: outUnit

    !> Position of variables to dump
    integer, optional, intent(in) :: dumpVarPos(:)
    ! ---------------------------------------------------------------------------
    ! aotus type handling the output to the file in lua format
    type(aot_out_type) :: conf
    ! ---------------------------------------------------------------------------
    call aot_out_open( put_conf = conf, outUnit = outUnit )
    call tem_varSys_out_single( me, conf, dumpVarPos )
    call aot_out_close( put_conf = conf )

  end subroutine tem_varSys_dump_single