*HEADING D.E.N. J - INTEGRAL *SYSTEM 10.0, *NODE 1, 7, 10. 87,10., 10. 247, -10., 10. 327, -10. 91, 10., 30. 251, -10., 30. 321, 1001 ,,, .5 2001 ,,, 1.0 1007, 10. ,, .5 2007, 10. ,, 1.0 1087, 10., 10., .5 2087, 10., 10., 1.0 1247, -10., 10., .5 2247, -10., 10., 1.0 1327, -10., , .5 2327, -10., , 1.0 1091, 10., 30., .5 2091, 10., 30., 1.0 1251, -10., 30., .5 2251, -10., 30., 1.0 1321, , , .5 2321, , , 1.0 *NGEN,NSET=END1 87,247,20 *NGEN,NSET=END2 91,251,20 *NFILL,NSET=Z1 END1,END2,4,1 *NGEN,NSET=TIP1 1,321,20 *NGEN,NSET=OUTER1 7,87,20 247,327,20 87,247,20 *NFILL,SINGULAR=1,NSET=Z1 TIP1,OUTER1,6,1 *NGEN,NSET=END3 1087, 1247, 20 *NGEN,NSET=END4 1091, 1251, 20 *NFILL,NSET=Z2 END3,END4,4,1 *NGEN,NSET=TIP2 1001,1321,20 *NGEN,NSET=OUTER2 1007,1087,20 1087,1247,20 1247,1327,20 *NFILL,SINGULAR=1,NSET=Z2 TIP2,OUTER2,6,1 *NGEN,NSET=END5 2087, 2247, 20 *NGEN,NSET=END6 2091, 2251, 20 *NFILL,NSET=Z3 END5,END6,4,1 *NGEN,NSET=TIP3 2001, 2321, 20 *NGEN,NSET=OUTER3 2007, 2087, 20 2247, 2327, 20 2087,2247,20 *NFILL,SINGULAR=1,NSET=Z3 TIP3,OUTER3,6,1 *ELEMENT,TYPE=C3D20 1, 2001,2003,3,1, 2041,2043,43,41, 2002,1003,2,1001, 2042,1043,42, 1041, 2021,2023,23,21 *ELGEN,ELSET=EALL 1,3,2,1,8,40,10 23,3,2,1,4,40,10 *NSET,NSET=XAXIS,GENERATE 321,327 1321,1327 2321,2327 *NSET,NSET=YAXIS,GENERATE 247,251 1247,1251 2247,2251 247,327,20 1247,1327,20 2247,2327,20 *ELSET,ELSET=PULL 25,35,45,55 *NSET,NSET=SNAP ,GENERATE 1,321,20 *NSET,NSET=CRACKLE,GENERATE 1001, 1321,40 *NSET,NSET=POP ,GENERATE 2001,2321,20 *ELSET,ELSET=DRAW,GENERATE 1,71,10 2,72,10 3,73,10 *SOLID SECTION,MATERIAL=A1,ELSET=EALL *MATERIAL,NAME=A1 *ELASTIC 30.E6, .3 *BOUNDARY XAXIS,2 YAXIS,1 Z1,3 Z3,3 *RESTART,WRITE,FREQUENCY=999 *STEP *STATIC *DLOAD PULL, P4,-100. *CONTOUR INTEGRAL,FREQUENCY=1,CONTOURS=3,SYMM,OUTPUT=BOTH,NORMAL 0.0,1.0,0.0 SNAP, CRACKLE, POP, *CONTOUR INTEGRAL,FREQUENCY=1,CONTOURS=3,SYMM,OUTPUT=BOTH,NORMAL,TYPE=K FACTORS 0.0,1.0,0.0 SNAP, CRACKLE, POP, *CONTOUR INTEGRAL,FREQUENCY=1,CONTOURS=3,SYMM,OUTPUT=BOTH,NORMAL,TYPE=T-STRESS 0.0,1.0,0.0 SNAP, CRACKLE, POP, *ENERGY PRINT *EL PRINT S, *NODE PRINT U,RF *END STEP