get_table_extdouble_vvect Subroutine

  1. aot_extdouble_vector_module.f90
  2. aot_extdouble_vector_module
  3. get_table_extdouble_vvect

private subroutine get_table_extdouble_vvect(val, ErrCode, maxlength, L, thandle, key, pos, default)

This routine obtains a vectorial quantity with variable length from a Lua table as a whole.

It is intented to ease the reading of vectors on the Fortran side by capsulating the parsing of the Lua table internally. For the dynamically sized array, which will be allocated, a upper limit to allocate has to be specified.

Arguments

TypeIntentOptionalAttributesName
real(kind=xdble_k), intent(out), allocatable:: val(:)

Vector read from the Lua table, will have the same length as the table but not exceed maxlength, if provided.
integer, intent(out), allocatable:: ErrCode(:)

Error code describing problems encountered in each of the components. Will be allocated with the same length as the returned vector. If the complete vector is not given in the Lua script, and no default is provided, an zerosized array will be returned.
integer, intent(in) :: maxlength

Maximal length to allocate for the vector.
type(flu_State) :: L
integer, intent(in), optional :: thandle
character(len=*), intent(in), optional :: key

Name of the variable (vector) to read.
integer, intent(in), optional :: pos

Position of the (vector) to read.
real(kind=xdble_k), intent(in), optional :: default(:)

A default vector to use, if no proper definition is found. Components will be filled with the help of this default definition.

Calls

proc~~get_table_extdouble_vvect~~CallsGraph proc~get_table_extdouble_vvect get_table_extdouble_vvect proc~flu_getglobal flu_getglobal proc~get_table_extdouble_vvect->proc~flu_getglobal proc~aot_table_push aot_table_push proc~get_table_extdouble_vvect->proc~aot_table_push interface~aot_top_get_val~3 aot_top_get_val proc~get_table_extdouble_vvect->interface~aot_top_get_val~3 interface~lua_getglobal lua_getglobal proc~flu_getglobal->interface~lua_getglobal proc~aot_table_push->proc~flu_getglobal proc~flu_gettable flu_gettable proc~aot_table_push->proc~flu_gettable proc~flu_type flu_type proc~aot_table_push->proc~flu_type proc~flu_pop flu_pop proc~aot_table_push->proc~flu_pop interface~flu_pushinteger flu_pushinteger proc~aot_table_push->interface~flu_pushinteger proc~flu_pushnil flu_pushnil proc~aot_table_push->proc~flu_pushnil proc~flu_getfield flu_getfield proc~aot_table_push->proc~flu_getfield proc~aot_top_get_extdouble aot_top_get_extdouble interface~aot_top_get_val~3->proc~aot_top_get_extdouble proc~aot_top_get_extdouble->proc~flu_pop proc~flu_todouble flu_todouble proc~aot_top_get_extdouble->proc~flu_todouble flu_isnoneornil flu_isnoneornil proc~aot_top_get_extdouble->flu_isnoneornil proc~flu_isnumber flu_isnumber proc~aot_top_get_extdouble->proc~flu_isnumber interface~lua_gettable lua_gettable proc~flu_gettable->interface~lua_gettable interface~lua_type lua_type proc~flu_type->interface~lua_type interface~lua_settop lua_settop proc~flu_pop->interface~lua_settop proc~flu_pushint flu_pushint interface~flu_pushinteger->proc~flu_pushint proc~flu_pushlong flu_pushlong interface~flu_pushinteger->proc~flu_pushlong interface~lua_pushnil lua_pushnil proc~flu_pushnil->interface~lua_pushnil interface~lua_getfield lua_getfield proc~flu_getfield->interface~lua_getfield interface~lua_tonumberx lua_tonumberx proc~flu_todouble->interface~lua_tonumberx interface~lua_pushinteger lua_pushinteger proc~flu_pushint->interface~lua_pushinteger proc~flu_pushlong->interface~lua_pushinteger lua_isnumber lua_isnumber proc~flu_isnumber->lua_isnumber

Called by

proc~~get_table_extdouble_vvect~~CalledByGraph proc~get_table_extdouble_vvect get_table_extdouble_vvect interface~aot_table_get_val~8 aot_table_get_val interface~aot_table_get_val~8->proc~get_table_extdouble_vvect interface~aot_get_val~8 aot_get_val interface~aot_get_val~8->proc~get_table_extdouble_vvect

Contents

Variables


Variables

TypeVisibilityAttributesNameInitial
logical, private :: valid_args
integer, private :: toptype