*HEADING
 CORNERING ROLLING INERTIA.
 C3D8RH ELEMENTS; USES 2D DEPENDENCY FILE  pstca4syhia.res
*SYMMETRIC MODEL GENERATION,REVOLVE,NODEOFF=1000,ELEMENT=1000,TRANSPORT
*NSET,NSET=SECTR,GEN
*NSET,NSET=SECTS,GEN
*NSET,NSET=SECT
 SECTR, SECTS
*ELSET,ELSET=SECTR,GEN
*ELSET,ELSET=SECTS,GEN
*ELSET,ELSET=SECT
 SECTR, SECTS
*****************************
*STEP,INC=100,NLGEOM
 PLANE STRAIN BOUNDARY CONDITIONS
*STEADY STATE TRANSPORT,INERTIA=YES
*BOUNDARY
 NSIDE, 3
 NRIM,  1, 3
*DLOAD
 ETIRER, CENT, 0.036,   0.0, 0.0, 20.5,  0.0, 1.0, 0.0
*MOTION,TYPE=VELOCITY,ROTATION
 NTIRES, 1.0,   0.0, 0.0, 22.0,  0.0, 1.0, 22.0
*NODE PRINT,FREQ=0
*EL PRINT,ELSET=SECTR,F=100
 S,
 E,
*EL PRINT,ELSET=SECTS,F=100
 S,
*EL FILE,ELSET=SECT,F=100
 S, E
*OUTPUT,FIELD,FREQ=100
*ELEMENT OUTPUT,ELSET=SECT
S,E
*END STEP
*****************************
*STEP,INC=100,NLGEOM
 FREE AXIAL DIRECTION
*STEADY STATE TRANSPORT,INERTIA=YES
*BOUNDARY,OP=NEW
 NRIM,  1, 3
*DLOAD
 ETIRER, CENT, 0.036,   0.0, 0.0, 20.5,  0.0, 1.0, 0.0
*MOTION,TYPE=VELOCITY,ROTATION
 NTIRES, 1.0,   0.0, 0.0, 22.0,  0.0, 1.0, 22.0
*NODE PRINT,NSET=SECTR,F=100
 U,
*NODE PRINT,NSET=SECTS,F=100
 U,
*NODE FILE,NSET=SECT,F=100
 U,
*OUTPUT,FIELD,FREQ=100
*NODE OUTPUT,NSET=SECT
U,
*END STEP