*HEADING
 TEST SUBSTRUCTURE TRANSFORMATION FOR SHELL
 USES SUBSTRUCTURE GENERATION FILE psupshl2_gen.inp
 TEST MULTIPLE LOAD CASES UNDER SUBSTRUCTURING
*SYSTEM
0., 0., 0.,   0.866025, -0.5, 0.,
0.5, 0.866025, 0.
*NODE
1,
5,   1.
2001,   , 10.
2005, 1., 10.
*NGEN,NSET=A2
1,5
*NGEN,NSET=B2
2001,2005
*NSET,NSET=PR
A2,B2
*NFILL
A2,B2, 10, 200
*ELEMENT,TYPE=Z01,ELSET=SUP1,FILE=psupshl2_gen
1001, 1,3,5,201,203,205
*SUBSTRUCTURE PROPERTY,ELSET=SUP1

0., 0., 0.,   0., 0., 1.,  -30.
*ELEMENT,TYPE=S4R
2001,1,3, 403, 401
*ELGEN,ELSET=SHELL1
2001 , 2, 2, 1, 5 , 400 ,10
*ELSET,ELSET=PR
2041, 
*SHELL GENERAL SECTION,ELSET=SHELL1,MATERIAL=MAT1,ORIENTATION=MIN30
1.0, 
*MATERIAL,NAME=MAT1
*ELASTIC
2.1E11, 0.3
*ORIENTATION,NAME=MIN30
0.866025, -0.5, 0., 0.5, 0.866025, 0.
3,
*STEP,PERTURBATION
*STATIC
*LOAD CASE,NAME=PRESS
*CLOAD
201,   1, -25
203,   1, -50
205,   1, -25
201,   2, -43.3013
203,   2, -86.6025
205,   2, -43.3013
2001 , 1, -25.
2003 , 1, -50.
2005 , 1, -25.
2001 , 2, -43.3013
2003 , 2, -86.6025
2005 , 2, -43.3013
*BOUNDARY
A2, 1,6
*END LOAD CASE
*LOAD CASE,NAME=STRETCH
*BOUNDARY
A2, 1,6
*CLOAD
201,   1, 25
203,   1, 50
205,   1, 25
201,   2, 43.3013
203,   2, 86.6025
205,   2, 43.3013
2001 , 1, 25.
2003 , 1, 50.
2005 , 1, 25.
2001 , 2, 43.3013
2003 , 2, 86.6025
2005 , 2, 43.3013
*END LOAD CASE
*NODE PRINT,NSET=PR,SUM=NO
U,
RF,
*EL PRINT,ELSET=PR,SUM=NO
E,
S,
COORD,
SF,
*EL PRINT,ELSET=PR,TOTALS=YES
1,2,3,4,5
IVOL,
SVOL,
EVOL,
*SUBSTRUCTURE PATH,ENTER=1001
*OUTPUT,FIELD,VAR=PRESELECT
*NODE PRINT,NSET=PR,SUM=NO
U,
RF,
*EL PRINT,ELSET=PR,SUM=NO
E,
S,
COORD,
SF,
*EL PRINT,ELSET=PR,TOTALS=YES
1,2,3,4,5
IVOL,
SVOL,
EVOL,
*SUBSTRUCTURE PATH,LEAVE
*END STEP