*HEADING
 STRAIGHT LINE ROLLING INERTIA. 
 M3D8R ELEMENTS;  USES 2D DEPENDENCY FILE  pstma3shia.res
*SYMMETRIC MODEL GENERATION,REVOLVE,NODEOFF=1000,ELEMENT=1000
 0.0, 0.0, 0.0,    0.0, 0.0, 1.0
 0.0, 1.0, 0.0
 360.0, 12
*NSET,NSET=SECTR,GEN
 100, 399
*NSET,NSET=SECTS,GEN
 400, 699
*NSET,NSET=SECT
 SECTR, SECTS
*ELSET,ELSET=SECTR,GEN
 100, 299
*ELSET,ELSET=SECTS,GEN
 300, 499
*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
 ESHELLR, CENT, 57.6,   0.0, 0.0, 0.0,  0.0, 0.0, 1.0
*TRANSPORT VELOCITY
 NTIRES, 40.0
*NODE PRINT,FREQ=0
*EL PRINT,ELSET=SECTR
 S, 
 E,
*EL PRINT,ELSET=SECTS
 S, 
*EL FILE,ELSET=SECT
 S, E
*OUTPUT,FIELD
*ELEMENT OUTPUT,ELSET=SECT
S,E
*CONTROLS, PARAMETERS=FIELD

,0.0,
*END STEP
*****************************
*STEP,INC=100,NLGEOM
 FREE AXIAL DIRECTION
*STEADY STATE TRANSPORT,INERTIA=YES
*BOUNDARY,OP=NEW
 NRIM,  1, 3
*DLOAD
 ESHELLR, CENT, 57.6,   0.0, 0.0, 0.0,  0.0, 0.0, 1.0
*TRANSPORT VELOCITY
 NTIRES, 40.0
*NODE PRINT,NSET=SECTR
 U, 
*NODE PRINT,NSET=SECTS
 U, 
*NODE FILE,NSET=SECT
 U, 
*OUTPUT,FIELD
*NODE OUTPUT,NSET=SECT
U,
*END STEP