tem_condition_dump_vector Subroutine

private subroutine tem_condition_dump_vector(me, outUnit)

Dumps array of condition to given unit

Arguments

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

condition to write into the lua file
integer, intent(in) :: outUnit

unit to write to

Calls

proc~~tem_condition_dump_vector~~CallsGraph proc~tem_condition_dump_vector tem_condition_dump_vector proc~aot_out_open aot_out_open proc~tem_condition_dump_vector->proc~aot_out_open proc~tem_condition_out_vector tem_condition_out_vector proc~tem_condition_dump_vector->proc~tem_condition_out_vector proc~aot_out_close aot_out_close proc~tem_condition_dump_vector->proc~aot_out_close proc~aot_out_open_table aot_out_open_table proc~tem_condition_out_vector->proc~aot_out_open_table proc~aot_out_close_table aot_out_close_table proc~tem_condition_out_vector->proc~aot_out_close_table proc~tem_condition_out_single tem_condition_out_single proc~tem_condition_out_vector->proc~tem_condition_out_single proc~tem_condition_out_single->proc~aot_out_open_table proc~tem_condition_out_single->proc~aot_out_close_table proc~aot_out_val aot_out_val proc~tem_condition_out_single->proc~aot_out_val

Called by

proc~~tem_condition_dump_vector~~CalledByGraph proc~tem_condition_dump_vector tem_condition_dump_vector interface~tem_condition_dump tem_condition_dump interface~tem_condition_dump->proc~tem_condition_dump_vector

Contents

Source Code

tem_condition_dump_vector

Source Code

  subroutine tem_condition_dump_vector(me, outUnit)
    ! -------------------------------------------------------------------- !
    !> condition to write into the lua file
    type(tem_condition_type), intent(in) :: me(:)
    !> unit to write to
    integer, intent(in) :: outUnit
    ! -------------------------------------------------------------------- !
    ! 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_condition_out_vector( me, conf )
    call aot_out_close( put_conf = conf )

  end subroutine tem_condition_dump_vector