*HEADING
PDEBCRGAX: DEBONDING OF AN AXISYMMETRIC INTERFACE VIA CRACK LENGTH VERSUS TIME CRITERION
*RESTART,WRITE,FREQ=1
*NODE
1,2.0, 0.0
121,14.,
2001,2.0,10.
2121,14.,10.
2,2.0,
122,14.
999, 14.0, 0.0
*NGEN,NSET=BOT
1,121,10
*NGEN,NSET=BOT2
11,121,10
*NGEN,NSET=TOP
2001,2121,10
*NFILL
BOT,TOP,4,500
*NSET, NSET=TERM2,GEN
41,101,20
*ELEMENT,TYPE=CAX4
1,1,21,1021,1001,11,521,1011,501
*ELGEN,ELSET=SOLID
1,6,20,20,2,1000,1000
*SOLID SECTION,ELSET=SOLID,MAT=ELASTIC
1., 
*MATERIAL,NAME=ELASTIC
*ELASTIC
5.E7,.3
**
*** Contact definitions.
**
*rigid body,analytical surface=ASURF, REF NODE=999
*surface,TYPE=SEGMENTS,NAME=ASURF
START,-1.0, 0.0
LINE, 15.0, 0.0
*ELSET, ELSET=BOT
21,41,61,81,101
*surface, NAME=BSURF
BOT, S1
*SURFACE INTERACTION, NAME=BOTH
1.0, 
*CONTACT PAIR,INTERACTION=BOTH,SMALL SLIDING
BSURF, ASURF
*NSET,NSET=NREF
121,
***
**** Nodeset defining the bonded portion of the surface
***
*NSET, NSET=BOND
21,41,61,81
*INITIAL CONDITIONS, TYPE=CONTACT, NORMAL
BSURF,ASURF,BOND
*ELSET, ELSET=TOPDL, GEN
1001, 1101, 20
**
*STEP,INC=20
*STATIC
0.0008, 0.002
*BOUNDARY
1,2
999, 1, 2
999, 6
*DLOAD
TOPDL, P3, -5.E05
*DEBOND,SLAVE=BSURF,MASTER=ASURF,TIME INC=.0001, FREQUENCY=1,OUTPUT=BOTH
0.,1.
.0005,0.,
*FRACTURE CRITERION,TYPE=CRACK LENGTH,TOLERANCE=0.01, NSET=NREF
7.4374E-04, 4.0
8.6092E-04, 6.0
9.1743E-04, 8.0
9.2161E-04, 10.0001
*ENERGY PRINT
*EL PRINT
S,
E,
*CONTACT PRINT
CSTRESS,CDISP
DBT,DBSF,DBS
*EL PRINT,ELSET=SOLID
S,E
*OUTPUT,FIELD
*CONTACT OUTPUT, VARIABLE=ALL
CSTRESS,CDISP
DBT,DBSF,DBS
*OUTPUT,FIELD
*ELEMENT OUTPUT,ELSET=SOLID
S, E
*END STEP