tem_varSys_out_vector Subroutine

public subroutine tem_varSys_out_vector(me, conf, dumpVarPos)

Allows the output of array of varSys to lua out

Arguments

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

variable to write into the lua file

type(aot_out_type), intent(inout) :: conf

aotus type handling the output to the file in lua format

integer, intent(in), optional :: dumpVarPos(:)

Position of variables to dump


Calls

proc~~tem_varsys_out_vector~~CallsGraph proc~tem_varsys_out_vector tem_varSys_out_vector proc~aot_out_open_table aot_out_open_table proc~tem_varsys_out_vector->proc~aot_out_open_table proc~tem_varsys_out_single tem_varSys_out_single proc~tem_varsys_out_vector->proc~tem_varsys_out_single proc~aot_out_close_table aot_out_close_table proc~tem_varsys_out_vector->proc~aot_out_close_table proc~tem_varsys_out_single->proc~aot_out_open_table proc~tem_varsys_out_single->proc~aot_out_close_table proc~aot_out_val aot_out_val proc~tem_varsys_out_single->proc~aot_out_val

Called by

proc~~tem_varsys_out_vector~~CalledByGraph proc~tem_varsys_out_vector tem_varSys_out_vector proc~tem_varsys_dump_vector tem_varSys_dump_vector proc~tem_varsys_dump_vector->proc~tem_varsys_out_vector interface~tem_varsys_out tem_varSys_out interface~tem_varsys_out->proc~tem_varsys_out_vector interface~tem_varsys_dump tem_varSys_dump interface~tem_varsys_dump->proc~tem_varsys_dump_vector proc~hvs_ascii_write_header hvs_ascii_write_header proc~hvs_ascii_write_header->interface~tem_varsys_out proc~tem_restart_writeheader tem_restart_writeHeader proc~tem_restart_writeheader->interface~tem_varsys_out proc~tem_restart_readheader tem_restart_readHeader proc~tem_restart_readheader->interface~tem_varsys_dump proc~hvs_asciispatial_init hvs_asciiSpatial_init proc~hvs_asciispatial_init->proc~hvs_ascii_write_header proc~hvs_ascii_init hvs_ascii_init proc~hvs_ascii_init->proc~hvs_ascii_write_header proc~tem_restart_closewrite tem_restart_closeWrite proc~tem_restart_closewrite->proc~tem_restart_writeheader proc~tem_restart_openwrite tem_restart_openWrite proc~tem_restart_openwrite->proc~tem_restart_writeheader proc~tem_load_restart tem_load_restart proc~tem_load_restart->proc~tem_restart_readheader proc~hvs_output_open hvs_output_open proc~hvs_output_open->proc~tem_restart_openwrite proc~hvs_output_close hvs_output_close proc~hvs_output_close->proc~tem_restart_closewrite proc~hvs_output_init hvs_output_init proc~hvs_output_init->proc~hvs_asciispatial_init proc~hvs_output_init->proc~hvs_ascii_init

Contents

Source Code


Source Code

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

    !> aotus type handling the output to the file in lua format
    type(aot_out_type), intent(inout) :: conf

    !> Position of variables to dump
    integer, optional, intent(in) :: dumpVarPos(:)
    ! ---------------------------------------------------------------------------
    integer :: iSys
    ! ---------------------------------------------------------------------------
    call aot_out_open_table( put_conf = conf, tname='varsys' )
    do iSys = 1, size(me)
      call tem_varSys_out_single( me         = me(iSys),   &
        &                         conf       = conf,       &
        &                         dumpVarPos = dumpVarPos, &
        &                         level      = 1           )
    end do
    call aot_out_close_table( put_conf = conf )

  end subroutine tem_varSys_out_vector