Calling sequence : CALL DINXD (IDMNUM, AXES, IEXIT, IUNT)
Purpose : To enter materially dependent nodal local axis system for a single node
Parameters :
In | |||
IDMNUM | Material identification number (Integer) | ||
AXES | Normalised local X, Y, and Z vectors (Real array*9) | ||
IUNT | Temporary file channel number (Integer) | ||
Out | |||
IEXIT | Error condition |
Use : This routine is called to enter the local X, Y, and Z axes for a particular node. It is called repeatedly to enter the local axis system for each node for each material, at each surface. The number of materials is the inner repeat and the number of surfaces the outer repeat.
The array AXES should be loaded with the following data in the following order:
AXES(1) : | Global X component of Local X axis |
AXES(2) : | Global Y component of Local X axis |
AXES(3) : | Global Z component of Local X axis |
AXES(4) : | Global X component of Local Y axis |
AXES(5) : | Global Y component of Local Y axis |
AXES(6) : | Global Z component of Local Y axis |
AXES(7) : | Global X component of Local Z axis |
AXES(8) : | Global Y component of Local Z axis |
AXES(9) : | Global Z component of Local Z axis |
Errors : The error condition is indicated by the value of IEXIT.
IEXIT | Meaning |
0 | Successful Call | |
32 | Current error must be cleared up first | |
129 | Error in writing to temporary file on unit (iunt) | |
141 | Id numbers cannot be less than 1 | |
142 | Id numbers above 999999 are invalid | |
143 | Id above 99999 not allowed for character file | |
173 | No more repeats expected for this node | |
194 | Cannot enter this data type, current dataset is : (KEY ) | |
211 | Invalid temporary file unit number (iunt) |