Dumps array of varSys to given unit
Type | Intent | Optional | 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 |
subroutine tem_varSys_dump_vector(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_vector( me, conf, dumpVarPos ) call aot_out_close( put_conf = conf ) end subroutine tem_varSys_dump_vector