*HEADING : Submodel from pgs68srm [S8R] *RESTART,WRITE *PREPRINT,ECHO=YES,HISTORY=NO,MODEL=NO *NODE 1,6. 7,6.,3. 29,10., 35,10.,3. *NGEN,NSET=NL 1,7,1 *NGEN,NSET=NR 29,35,1 *NFILL,NSET=NALL NL,NR,4,7 *NSET,NSET=NT 14,21,28,35, *NSET,NSET=NB 8,15,22, *ELEMENT,TYPE=S8R,ELSET=EALL 1,1,15,17,3,8,16,10,2 *ELGEN,ELSET=EALL 1,3,2,1,2,14,3 *ELSET,ELSET=E1 1,2,3, *SHELL SECTION,ELSET=EALL,MATERIAL=MAT1 0.001, *MATERIAL,NAME=MAT1 *ELASTIC 1.E6,0.3 *SUBMODEL NL,NR, *FILE FORMAT,ZERO INCREMENT *STEP,PERTURBATION *STATIC *BOUNDARY,SUBMODEL,STEP=2 NL,1,6 *DLOAD EALL,P,1.E-7 *EL FILE,POS=NODES,ELSET=E1,FREQ=999 S,E, *EL FILE,ELSET=E1,FREQ=2 SF,SE,SVOL, *NODE FILE,FREQ=1 U, *NODE PRINT,NSET=NR,SUMM=NO U, *EL PRINT,FREQ=999 S, *END STEP *STEP *STATIC 0.1,1. *DLOAD EALL,P,1.E-7 *BOUNDARY,SUBMODEL,STEP=2 NL,1,6 NR,1,6 *EL FILE,ELSET=E1,FREQ=2 SF,SE,SVOL, *EL FILE S,E, *NODE FILE,FREQ=1 U, *END STEP