Subroutine USERARRAY

Places or gets a value into user-defined array. The array is identified by number.

Calling convention:

call userarry(iarray, k, value, code)
Arguments Data type Input/Output Description
iarray Integer Call The number of the user defined array.
k Integer Call Internal element number.
value Real Both Value associated with location k of the user defined array.
code Character*3 Call Code is 'PUT' or 'GET' to indicate whether array member is being set or interrogated.

An application for this routine is with table interpolation. For example, the following Card 9 - PARAM Parameter Card - Optional is present:

INTERP 5 5 3 1.0
TABTYPE 3 QNODE USER2ARR
TABDATA 3 0.0 0.0
TABDATA 3 200.0 100.0
-1
CALL USER1(…
..
CALL USERARRAY (2, 5, 10.0, 'PUT')
..
-1

Then when the user-written subroutine is called, value 10 is placed into location 5 of user-defined array 2. As a result, during table interpolation a heat load of 20 will be applied to element 5.

For more information, see the Thermal Solver Reference Manual PDF.