aot_out_val Interface

public interface aot_out_val

Put Fortran intrinsic types into the script.

Scalar values and one-dimensional arrays are supported. Here we add support for extdouble precision. NOTE however, that the used format will only be in double precision, as Lua does not provide higher accuracy right now anyway.

Calls

interface~~aot_out_val~2~~CallsGraph interface~aot_out_val~2 aot_out_val proc~aot_out_val_arr_extdouble aot_out_val_arr_extdouble interface~aot_out_val~2->proc~aot_out_val_arr_extdouble proc~aot_out_val_extdouble aot_out_val_extdouble interface~aot_out_val~2->proc~aot_out_val_extdouble proc~aot_out_val_arr_extdouble->interface~aot_out_val~2 proc~aot_out_close_table aot_out_close_table proc~aot_out_val_arr_extdouble->proc~aot_out_close_table proc~aot_out_open_table aot_out_open_table proc~aot_out_val_arr_extdouble->proc~aot_out_open_table proc~aot_out_breakline aot_out_breakline proc~aot_out_val_extdouble->proc~aot_out_breakline proc~aot_out_open_table->proc~aot_out_breakline

Called by

interface~~aot_out_val~2~~CalledByGraph interface~aot_out_val~2 aot_out_val proc~aot_out_val_arr_extdouble aot_out_val_arr_extdouble interface~aot_out_val~2->proc~aot_out_val_arr_extdouble proc~aot_out_val_arr_double aot_out_val_arr_double proc~aot_out_val_arr_double->interface~aot_out_val~2 proc~aot_out_val_arr_extdouble->interface~aot_out_val~2 proc~aot_out_val_arr_int aot_out_val_arr_int proc~aot_out_val_arr_int->interface~aot_out_val~2 proc~aot_out_val_arr_logical aot_out_val_arr_logical proc~aot_out_val_arr_logical->interface~aot_out_val~2 proc~aot_out_val_arr_long aot_out_val_arr_long proc~aot_out_val_arr_long->interface~aot_out_val~2 proc~aot_out_val_arr_real aot_out_val_arr_real proc~aot_out_val_arr_real->interface~aot_out_val~2 proc~aot_out_val_arr_string aot_out_val_arr_string proc~aot_out_val_arr_string->interface~aot_out_val~2 interface~aot_out_val~3 aot_out_val interface~aot_out_val~3->proc~aot_out_val_arr_double interface~aot_out_val~3->proc~aot_out_val_arr_int interface~aot_out_val~3->proc~aot_out_val_arr_logical interface~aot_out_val~3->proc~aot_out_val_arr_long interface~aot_out_val~3->proc~aot_out_val_arr_real interface~aot_out_val~3->proc~aot_out_val_arr_string

Module Procedures

private subroutine aot_out_val_extdouble(put_conf, val, vname, advance_previous)

Put extdouble variables into the Lua script.

Read more…

Arguments

Type IntentOptional Attributes Name
type(aot_out_type), intent(inout) :: put_conf
real(kind=xdble_k), intent(in) :: val
character(len=*), intent(in), optional :: vname
logical, intent(in), optional :: advance_previous

private subroutine aot_out_val_arr_extdouble(put_conf, val, vname, advance_previous, max_per_line)

This is a vectorized version of the value output.

Read more…

Arguments

Type IntentOptional Attributes Name
type(aot_out_type), intent(inout) :: put_conf

Lua script to write the array into.
real(kind=xdble_k), intent(in) :: val(:)

Actual data to write into the script
character(len=*), intent(in), optional :: vname

Name for this array
logical, intent(in), optional :: advance_previous

Flag if this array should be put on the same line as the last entry of the parent table.
integer, intent(in), optional :: max_per_line

Maximal number of entries to put into a single line. Defaults to 3.