![[Next]](802503c4.gif){kind=small}
![[Up]](80000658.gif){kind=small}
![[Back]](8016546c.gif){kind=small}
![[Previous]](ff57198c.gif){kind=small}
![[Contents]](a5f4558b.gif){kind=small}
Calling sequence : CALL DIGXD (IDGNUM, AXES, IEXIT ,IUNT)
Purpose : To enter element nodal local axis system for a single element
Parameters :
| In | |||
| IDGNUM | Gauss point 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 element. It is called repeatedly to enter the local axis system for each element for each Gauss point, at each surface. The number of Gauss points 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 | |
| 159 | No more repeats expected for this element | |
| 194 | Cannot enter this data type, current dataset is : (KEY ) | |
| 211 | Invalid temporary file unit number (iunt) |