*INCLUDE, INPUT=mesh-rev1.inp
*TRANSFORM,TYPE=C,NSET=NALL
*NODE, NSET=E-NODE
*NODE, NSET=C-NODE
**
**
*SURFACE, NAME=EDGEF1
EDGE1
*SURFACE, NAME=EDGEF2
EDGE2
*SURFACE, NAME=EDGEF3
EDGE3
*SURFACE, NAME=EDGEF4
EDGE4
*SURFACE, NAME=EDGEF5
EDGE5
*SURFACE, NAME=EDGEF6
EDGE6
*SURFACE, NAME=EDGEF7
EDGE7
*SURFACE, NAME=EDGEF8
EDGE8
*SURFACE, NAME=EDGEF9
EDGE9
*SURFACE, NAME=EDGEF10
EDGE10
*SURFACE, NAME=EDGEF11
EDGE11
*SURFACE, NAME=EDGEF12
EDGE12
*SURFACE, NAME=INNERFCS
INNER
*SURFACE, NAME=ID_SURF
ID_EL
*SURFACE, NAME=OD_SURF
OD_EL
*SURFACE, NAME=EXP, TYPE=USER
*RIGID BODY,ANALYTICAL SURFACE=EXP,REF NODE=900001
*SURFACE, NAME=COMP, TYPE=USER
*RIGID BODY,ANALYTICAL SURFACE=COMP,REF NODE=900002
**
*contact pair, interaction=ninner, TRACKING=STATE, HCRIT=6E-4
id_surf, EXP
*surface interaction,name=ninner
*SURFACE BEHAVIOR, PENALTY
,,.001
*FRICTION
0.40
**, TYPE=SURFACE TO SURFACE
*contact pair, interaction=OUTER, TRACKING=STATE, HCRIT=6E-4
OD_SURF, COMP
*surface interaction,name=OUTER
*SURFACE BEHAVIOR, PENALTY
,,.001
*FRICTION
0.15
*contact pair, interaction=BSS, TRACKING=STATE, HCRIT=6E-4
EDGEF1, EDGEF2
EDGEF3, EDGEF4
EDGEF5, EDGEF6
EDGEF7, EDGEF8
EDGEF9, EDGEF10
EDGEF11, EDGEF12
INNERFCS,
*surface interaction,name=BSS
*SURFACE BEHAVIOR, PENALTY
,,.001
*FRICTION
0.2
****************************
**Not used yet
***SURFACE, NAME=STENT_SURF
**STENT
***contact pair, interaction=SIDE
**STENT_SURF,
***surface interaction,name=SIDE
***SURFACE BEHAVIOR, PENALTY
**,,.0001
***FRICTION
**0.20
**
*MATERIAL, NAME=CORD
*Elastic
3.53e+07, 0.3
*PLASTIC
85591.6,0.0000
100428.1,0.0164
110792.7,0.0327
119969.5,0.0487
128214.7,0.0645
142814.0,0.0954
155767.9,0.1253
167590.0,0.1545
*SOLID SECTION,ELSET=STENT,MATERIAL=CORD
***MEMBRANE SECTION, ELSET=SURFS, MATERIAL=CORD
**1E-6
*******           History Definition           *********
********                                        *********
**
*boundary
e-node,1,6
c-node,1,6
YFIX, 2, 2
YSYM, 2, 2
ZFIX, 3, 3
**                                 *********
*STEP,NLGEOM,INC=1000, UNSYMM=YES
STEP 1: PRE-CRIMP to 0.066" OD
*STATIC
.05,1,,0.05
*MODEL CHANGE, REMOVE, TYPE=CONTACT PAIR
ID_SURF, EXP
EDGEF1, EDGEF2
EDGEF3, EDGEF4
EDGEF5, EDGEF6
EDGEF7, EDGEF8
EDGEF9, EDGEF10
EDGEF11, EDGEF12
INNERFCS,
***STENT_SURF,
*OUTPUT, FIELD, FREQUENCY=100
*ELEMENT OUTPUT, VARIABLE=PRESELECT
*NODE OUTPUT, NSET=NALL
U
*RESTART, WRITE, FREQUENCY=100
*end step
*STEP
STEP 2: Recoil
*STATIC
.025,1,,.1
*end step
**
*STEP
STEP 3: SWITCH CONTACT
*STATIC
*MODEL CHANGE, ADD, TYPE=CONTACT PAIR
ID_SURF, EXP
*MODEL CHANGE, REMOVE, TYPE=CONTACT PAIR
OD_SURF, COMP
*end step
*STEP,NLGEOM,INC=1000, UNSYMM=YES
STEP 4: PRE-EXPAND to 0.0782" ID
*STATIC
.01,1,,.035
*end step
*STEP
STEP 5: Recoil
*STATIC
.025,1,,.1
*end step
**
*STEP
STEP 6: SWITCH CONTACT
*STATIC
*MODEL CHANGE, ADD, TYPE=CONTACT PAIR
OD_SURF, COMP
EDGEF1, EDGEF2
EDGEF3, EDGEF4
EDGEF5, EDGEF6
EDGEF7, EDGEF8
EDGEF9, EDGEF10
EDGEF11, EDGEF12
INNERFCS,
***STENT_SURF,
*MODEL CHANGE, REMOVE, TYPE=CONTACT PAIR
ID_SURF, EXP
*end step
*STEP,NLGEOM,INC=1000, UNSYMM=YES
STEP 7: CRIMP to 0.042" OD
*STATIC, STABILIZE=2E-6
.01,1, , .02
*end step
*STEP, INC=500
STEP 8: Recoil
*STATIC
.025,1,,.1
*end step
**
*STEP
STEP 9: SWITCH CONTACT
*STATIC
*MODEL CHANGE, ADD, TYPE=CONTACT PAIR
ID_SURF, EXP
*MODEL CHANGE, REMOVE, TYPE=CONTACT PAIR
OD_SURF, COMP
***STENT_SURF,
*end step
*STEP,NLGEOM,INC=1000, UNSYMM=YES
STEP 10: EXPAND to 0.1378" OD
*STATIC
.01,1, , 0.01
*end step
*STEP
STEP 11: Recoil
*STATIC
.025,1, 0.1
*end step
**