*HEADING
 POINT LOADED HEMISPHERICAL SHELL --- 3 X 4 X 4 S4R5   
 3RD LEVELS SUBSTRUCTURE Creation and Housekeeping operations
 Copy all lower level substructure to .sup
 Create 3rd level substructure with different load data
 that required (compared to Ex 1.1.4)
*PREPRINT, MODEL=YES, HISTORY=YES
**
*SUBSTRUCTURE DELETE,TYPE=z31,LIBRARY=psuphou3
*SUBSTRUCTURE DELETE,TYPE=z32,LIBRARY=psuphou3
*SUBSTRUCTURE DELETE,TYPE=z300,LIBRARY=psuphou3
*SUBSTRUCTURE DIRECTORY, LIBRARY=psuphou2
*SUBSTRUCTURE DIRECTORY, LIBRARY=psuphou1
*SUBSTRUCTURE COPY, NEW TYPE = Z31,  OLD TYPE = Z11, OLD LIBRARY=psuphou2,
NEW LIBRARY=psuphou3
*SUBSTRUCTURE COPY, NEW TYPE = Z32,  OLD TYPE = Z20, OLD LIBRARY=psuphou2,
NEW LIBRARY=psuphou3
*SUBSTRUCTURE COPY,NEW TYPE = Z300,  OLD TYPE = Z20, OLD LIBRARY=psuphou2,
NEW LIBRARY=psuphou3 
**
**
*ELEMENT,TYPE=Z32,ELSET=SUBSTR11,FILE=psuphou3
101, 900000064, 900000069, 900000074, 900000079, 900000084, 900000092, 900000096,
     900000100, 900000104, 900000108, 900000109, 900000113, 900000117, 900000121,
     900000122, 900000123, 900000124,
*SUBSTRUCTURE PROPERTY,ELSET=SUBSTR11,POSITION TOL=1.E-10
*ELEMENT,TYPE=Z32,ELSET=SUBSTR12,FILE=psuphou3
102, 900000092, 900000096, 900000100, 900000104, 900000108, 900000201, 900000202,
     900000203, 900000204, 900000205, 900000124, 900000123, 900000122, 900000121,
     900000208, 900000207, 900000206,
*SUBSTRUCTURE PROPERTY,ELSET=SUBSTR12,POSITION TOL=1.E-10

0., 0., 0.,   0., 0., 1.,   90.
*NODE
   900000064,  10.000000,   0.000000,   0.000000,   1.000000,   0.000000,   0.000000
   900000069,   9.807855,   0.000000,   1.950891,   0.980786,   0.000000,   0.195089
   900000074,   9.238808,   0.000000,   3.826803,   0.923881,   0.000000,   0.382680
   900000079,   8.314698,   0.000000,   5.555699,   0.831470,   0.000000,   0.555570
   900000084,   7.071068,   0.000000,   7.071068,   0.707107,   0.000000,   0.707107
   900000092,   0.000000,  10.000000,   0.000000,   0.000000,   1.000000,   0.000000
   900000096,   0.000000,   9.807855,   1.950891,   0.000000,   0.980786,   0.195089
   900000100,   0.000000,   9.238808,   3.826803,   0.000000,   0.923881,   0.382680
   900000104,   0.000000,   8.314698,   5.555699,   0.000000,   0.831470,   0.555570
   900000108,   0.000000,   7.071068,   7.071068,   0.000000,   0.707107,   0.707107
   900000109,   5.555699,   0.000000,   8.314698,   0.555570,   0.000000,   0.831470
   900000113,   3.826803,   0.000000,   9.238808,   0.382680,   0.000000,   0.923881
   900000117,   1.950891,   0.000000,   9.807855,   0.195089,   0.000000,   0.980786
   900000121,   0.000000,   0.000000,  10.000000,   0.000000,   0.000000,   1.000000
   900000122,   0.000000,   1.950891,   9.807855,   0.000000,   0.195089,   0.980786
   900000123,   0.000000,   3.826803,   9.238808,   0.000000,   0.382680,   0.923881
   900000124,   0.000000,   5.555699,   8.314698,   0.000000,   0.555570,   0.831470
   900000201, -10.000000,   0.000000,   0.000000,  -1.000000,   0.000000,   0.000000
   900000202,  -9.807855,   0.000000,   1.950891,  -0.980786,   0.000000,   0.195089
   900000203,  -9.238808,   0.000000,   3.826803,  -0.923881,   0.000000,   0.382680
   900000204,  -8.314698,   0.000000,   5.555699,  -0.831470,   0.000000,   0.555570
   900000205,  -7.071068,   0.000000,   7.071068,  -0.707107,   0.000000,   0.707107
   900000206,  -5.555699,   0.000000,   8.314698,  -0.555570,   0.000000,   0.831470
   900000207,  -3.826803,   0.000000,   9.238808,  -0.382680,   0.000000,   0.923881
   900000208,  -1.950891,   0.000000,   9.807855,  -0.195089,   0.000000,   0.980786
*NSET,NSET=PR_NODE_OUTPUT_LEVEL_3
 900000064, 900000201, 900000092, 900000121
**
**
*STEP
*SUBSTRUCTURE GENERATE,TYPE=Z300,LIBRARY=psuphou3,OVERWRITE
*RETAINED NODAL DOFS
 900000064,
 900000069,
 900000074,
 900000079,
 900000084,
 900000109,
 900000113,
 900000117,
 900000121,
 900000201,
 900000202,
 900000203,
 900000204,
 900000205,
 900000206,
 900000207,
 900000208,
*SUBSTRUCTURE LOAD CASE,NAME=POINT
*CLOAD
 900000064 , 1,  4.000
 900000092 , 2, -2.000
 900000201 , 1, -1.000
*SUBSTRUCTURE MATRIX OUTPUT,STIFFNESS=YES,SLOAD=YES,FILENAME=PSUPHOU3,RECOVERY=YES
*END STEP