Starter Subroutine USERWIS

You can specify the number of cards and their format.

Arguments

The argument list of USERWIS and its individual arguments and descriptions are:

C-----------------------------------------------------------------------------------------
SUBROUTINE USERWIS(IIN     ,IOUT    ,NUMNOD   ,ITAB    ,
     .                   X       ,V       ,VR       ,MASS  ,INER    ,
     .                   NUVAR   ,NUVARI  ,UVAR     ,IUVAR   )
C-----------------------------------------------------------------------------------------

Definitions

Argument	Format	Description
`IIN`	Integer read only scalar	Input file unit (Starter input file) on which the data are read.
`IOUT`	Integer read only scalar	Output file unit (Starter output file).
`NUMNOD`	Integer scalar	Number of nodes (defined with /NODE option).
`ITAB(NUMNOD)`	Integer array	An array of size `NUMNOD`. This defines the node ID versus Radioss internal node number.
`X(3,NUMNOD)`	Float array	Nodal coordinates.
`V(3,NUMNOD)`	Float array	Nodal initial coordinates.
`VR(3,NUMNOD)`	Float array	Nodal initial rotational velocities.
`Mass(NUMNOD)`	Float array	Nodal mass.
`INTER(NUMNOD)`	Float array	Nodal spherical inertia.
`NUVAR`	Integer scalar	Needed size of global user float array.
`NUVARI`	Integer scalar	Needed size of global user integer array.
`UVAR(MAXNUVAR)`	Float array	An array of size `MAXNUVAR` in Radioss Starter. This array is transmitted via the restart file to Radioss Engine, where it has a size of `NUVAR`.
IUVAR(MAXNUVARI)	Integer array	An array of size `MAXNUVARI` in Radioss Starter. This array is transmitted via the restart file to Radioss Engine, where it has a size of `NUVARI`.