*HEADING
 D.E.N.  J - INTEGRAL                            3-1-6-2
*RESTART,WRITE
*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, ELSET=EALL
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
*STEP
*STATIC
*DLOAD
1,P1NU,1.D2
2,P1NU,1.D2
3,P1NU,1.D2
*CONTOUR INTEGRAL,TYPE=J,FREQ=1,CONTOURS=3,SYMM,OUTPUT=FILE,NORMAL
0.0,  1.0
 SNAP, CRACKLE, POP
*EL PRINT,FREQ=0
U,RF
*END STEP