*HEADING
 TEST SUBSTRUCTURE TRANSFORMATION FOR SHELL
 USES SUBSTRUCTURE GENERATION FILE psupshl1_gen.inp
*SYSTEM
0., 0., 0.,   0.866025, -0.5, 0.,
0.5, 0.866025, 0.
*NODE
1,
5,   1.
201,   , 10.
205, 1., 10.
*NGEN,NSET=A2
1,5
*NGEN,NSET=B2
201,205
*NSET,NSET=PRINT_NODES
A2,B2
*NFILL,NSET=ALL_NODES
A2,B2, 10, 20
*ELEMENT,TYPE=Z01,ELSET=SUPER_ELEMENT_1,FILE=psupshl1_gen
1001, 1,3,5
*SUBSTRUCTURE PROPERTY,ELSET=SUPER_ELEMENT_1

0., 0., 0.,   0., 0., 1.,  -30.
*ELEMENT,TYPE=S4R
2001,1,3, 43, 41
*ELGEN,ELSET=SHELL_ELEMENTS
2001 , 2, 2, 1, 5 , 40 ,10
*ELSET,ELSET=PRINT_ELEMENTS
2041, 
*SHELL SECTION,ELSET=SHELL_ELEMENTS,MATERIAL=MATERIAL_1,ORIENTATION=ORIENTATION_MIN30,
OFFSET=0
1.0, 
*MATERIAL,NAME=MATERIAL_1
*ELASTIC
2.1E11, 0.3
*ORIENTATION,NAME=ORIENTATION_MIN30
0.866025, -0.5, 0., 0.5, 0.866025, 0.
3,
*STEP,PERTURBATION
*STATIC
*RESTART,WRITE

*CLOAD
201 , 1, -25.
203 , 1, -50.
205 , 1, -25.
201 , 2, -43.3013
203 , 2, -86.6025
205 , 2, -43.3013
*SLOAD
1001,SUPER-LOAD-CASE-1, 1.
*BOUNDARY
A2, 1,6
*NODE FILE,NSET=PRINT_NODES
U,RF
*EL FILE,ELSET=PRINT_ELEMENTS,DIRECTIONS=YES
E,S
COORD,
SF,
IVOL,
SVOL,
EVOL,
*NODE PRINT,NSET=PRINT_NODES,SUM=NO
U,
RF,
*EL PRINT,ELSET=PRINT_ELEMENTS,SUM=NO
E,
S,
COORD,
SF,
*EL PRINT,ELSET=PRINT_ELEMENTS,TOTALS=YES
1,2,3,4,5
IVOL,
SVOL,
EVOL,
*SUBSTRUCTURE PATH,ENTER=1001
*OUTPUT,FIELD,VAR=PRESELECT
*NODE FILE,NSET=PRINT-NODES
U,RF
*EL FILE,ELSET=PRINT-ELEMENTS,DIRECTIONS=YES
E,S,
COORD,
SF,
IVOL,
SVOL,
EVOL,
*NODE PRINT,NSET=PRINT-NODES,SUM=NO
U,
RF,
*EL PRINT,ELSET=PRINT-ELEMENTS,SUM=NO
E,
S,
COORD,
SF,
*EL PRINT,ELSET=PRINT-ELEMENTS,TOTALS=YES
1,2,3,4,5
IVOL,
SVOL,
EVOL,
*SUBSTRUCTURE PATH,LEAVE
*OUTPUT,FIELD,VAR=PRESELECT
*END STEP