*HEADING
 Substructure *SLOAD CASE with centrifugal loads
 Uses substructure generation file psupsld2_gen.inp
*NODE,SYSTEM=C
1,2.,0.
2,4.,0.
3,6.,0.
4,2.,11.25
5,6.,11.25
6,2.,22.5
7,4.,22.5
8,6.,22.5
9,2.,33.75
10,6.,33.75
11,2.,45.
12,4.,45.
13,6.,45.
14,2.,56.25
15,6.,56.25
16,2.,67.5
17,4.,67.5
18,6.,67.5
19,2.,78.75
20,6.,78.75
21,2.,90.
22,4.,90.
23,6.,90.
*ELEMENT,TYPE=Z100,ELSET=E1,FILE=psupsld2_gen
1,1,2,3,4,5,6,7,8
*SUBSTRUCTURE PROPERTY,ELSET=E1
*ELEMENT,TYPE=Z100,ELSET=E2,FILE=psupsld2_gen
2,6,7,8,9,10,11,12,13
*SUBSTRUCTURE PROPERTY,ELSET=E2

0.,0.,0.,0.,0.,1.,22.5
*ELEMENT,TYPE=Z100,ELSET=E3,FILE=psupsld2_gen
3,11,12,13,14,15,16,17,18
*SUBSTRUCTURE PROPERTY,ELSET=E3

0.,0.,0.,0.,0.,1.,45.
*ELEMENT,TYPE=Z100,ELSET=E4,FILE=psupsld2_gen
4,16,17,18,19,20,21,22,23
*SUBSTRUCTURE PROPERTY,ELSET=E4

0.,0.,0.,0.,0.,1.,67.5
*ELSET,ELSET=EALL
E1,E2,E3,E4
*NSET,NSET=SYM
1,2,3,21,22,23
*NSET,NSET=MID
4,5,6,7,8,9,10,11,12,13,
14,15,16,17,18,19,20
*NSET,NSET=NALL
SYM,MID
*TRANSFORM,TYPE=C,NSET=NALL
0.,0.,0.,0.,0.,1.
*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, HISTORY
*NODE OUTPUT, GLOBAL=NO, NSET=NALL
 U
*OUTPUT,FIELD,VAR=PRESELECT
*SUBSTRUCTURE PATH,ENTER EL=1
*OUTPUT,FIELD,VAR=PRESELECT
*NODE PRINT
U, 
*EL PRINT
S, 
*NODE FILE
U, 
*EL FILE
S,E
*SUBSTRUCTURE PATH,LEAVE
*SUBSTRUCTURE PATH,ENTER EL=2
*OUTPUT,FIELD,VAR=PRESELECT
*NODE PRINT
U, 
*EL PRINT
S, 
*NODE FILE
U, 
*EL FILE
S,E
*SUBSTRUCTURE PATH,LEAVE
*SUBSTRUCTURE PATH,ENTER EL=3
*OUTPUT,FIELD,VAR=PRESELECT
*NODE PRINT
U, 
*EL PRINT
S, 
*NODE FILE
U, 
*EL FILE
S,E
*SUBSTRUCTURE PATH,LEAVE
*SUBSTRUCTURE PATH,ENTER EL=4
*OUTPUT,FIELD,VAR=PRESELECT
*NODE PRINT
U, 
*EL PRINT
S, 
*NODE FILE
U, 
*EL FILE
S,E
*SUBSTRUCTURE PATH,LEAVE
*END STEP