c
c testing import of FLD damage initiation criterion
c base for fld_xss_s1.inp
c
*HEADING
 FLD damage initiation criterion with Mises plasticity
*PREPRINT,MODEL=YES
*restart,write,num=10
*NODE,NSET=NALL-1
 1,0,0
 2,1,0
 3,1,1
 4,0,1
*NODE,NSET=NALL-2
 11,2,0
 12,3,0
 13,3,1
 14,2,1
*NODE,NSET=NALL-3
 21,4,0
 22,5,0
 23,5,1
 24,4,1
*ELEMENT,TYPE=S4R,ELSET=shell-1
 1,1,2,3,4
*ELEMENT,TYPE=S4R,ELSET=shell-2
 11,11,12,13,14
*ELEMENT,TYPE=CPS4R,ELSET=solid
 21,21,22,23,24
*elset,elset=alle
 1,11,21
***************************************
*Shell SECTION,MATERIAL=MAT_MISES,ELSET=shell-1
 1.0, 5
*Shell SECTION,MATERIAL=MAT_MISES,ELSET=shell-2,section integration=gauss
 1.0, 4
*Solid SECTION,MATERIAL=MAT_MISES,ELSET=solid
 1.0
***************************************
*MATERIAL,NAME=MAT_MISES
*Density
 2000
*Elastic
 20.E+010,	0.33
*plastic
 2.e8,0.0
 4.e8,2.0
*DAMAGE INITIATION,CRITERION=FLD
 0.30, -0.2
 0.20, -0.1
 0.15,  0.0
 0.25,  0.1
 0.40,  0.2
**---------------------
*STEP
*dynamic,explicit
 ,0.2
*BOUNDARY,TYPE=DISPLACEMENT
 1,1,6
 2,2,6
 4,1,1
 3,2,2
 4,2,2
**
 11,1,6
 12,2,6
 14,1,1
 13,2,2
 14,2,2
**
 21,1,2
 22,2,2
 24,1,1
*boundary, type=velocity
 3,3,3,2
 4,3,3,2
 2,1,1,1
 3,1,1,1
**
 13,3,3,2
 14,3,3,2
 12,1,1,1
 13,1,1,1
**
 23,2,2,2
 24,2,2,2
****
*OUTPUT,FIELD,freq=10
*ELEMENT OUTPUT,elset=alle
STATUS,
SDEG,
DMICRT,
PEEQ,
S,
PE,
LE
*NODE OUTPUT
U,
*OUTPUT,HISTORY
*ELEMENT OUTPUT,ELSET=alle
STATUS,
SDEG,
DMICRT,
PEEQ,
LEP,
SP
*END STEP