*HEADING
 Substructure *SLOAD CASE with centrifugal loads
 Uses substructure generation file psupsld2_gen.inp
*NODE,SYSTEM=C
*ELEMENT,TYPE=Z100,ELSET=E1,FILE=psupsld2_gen
*SUBSTRUCTURE PROPERTY,ELSET=E1
*ELEMENT,TYPE=Z100,ELSET=E2,FILE=psupsld2_gen
*SUBSTRUCTURE PROPERTY,ELSET=E2
*ELEMENT,TYPE=Z100,ELSET=E3,FILE=psupsld2_gen
*SUBSTRUCTURE PROPERTY,ELSET=E3
*ELEMENT,TYPE=Z100,ELSET=E4,FILE=psupsld2_gen
*SUBSTRUCTURE PROPERTY,ELSET=E4
*ELSET,ELSET=EALL
E1,E2,E3,E4
*NSET,NSET=SYM
*NSET,NSET=MID
*NSET,NSET=NALL
SYM,MID
*TRANSFORM,TYPE=C,NSET=NALL
*BOUNDARY
SYM,YSYMM
*STEP
*STATIC
0.5,1.
*SLOAD
EALL,CENT,100000.
*EL FILE,FREQ=0
*NODE FILE,GLOBAL=NO
U,
*NODE PRINT,GLOBAL=NO
U,
*OUTPUT,FIELD,VAR=PRESELECT
*SUBSTRUCTURE PATH,ENTER EL=1
*NODE PRINT
U,
*EL PRINT
S,
*NODE FILE
U,
*EL FILE
S,E
*SUBSTRUCTURE PATH,LEAVE
*SUBSTRUCTURE PATH,ENTER EL=2
*NODE PRINT
U,
*EL PRINT
S,
*NODE FILE
U,
*EL FILE
S,E
*SUBSTRUCTURE PATH,LEAVE
*SUBSTRUCTURE PATH,ENTER EL=3
*NODE PRINT
U,
*EL PRINT
S,
*NODE FILE
U,
*EL FILE
S,E
*SUBSTRUCTURE PATH,LEAVE
*SUBSTRUCTURE PATH,ENTER EL=4
*NODE PRINT
U,
*EL PRINT
S,
*NODE FILE
U,
*EL FILE
S,E
*SUBSTRUCTURE PATH,LEAVE
*END STEP