*HEADING
ADAPTIVE MESHING EXAMPLE
FLAT ROLLING - ADAPTIVE MESH, EULERIAN NODES AT INLET AND OUTLET
Units - N, m
**
*RESTART,W,N=20
*NODE,NSET=BAR
**
**
*ELEMENT, TYPE=C3D8R, ELSET=BAR
*SOLID SECTION,ELSET=BAR,MAT=C15,CONTROLS=SECT
1.,
*SECTION CONTROLS, NAME=SECT,HOURGLASS=STIFFNESS
**
*MATERIAL,NAME=C15
*ELASTIC
1.5E11,.3
*PLASTIC
168.72E06,0
219.33E06,0.1
272.02E06,0.2
308.53E06,0.3
337.37E06,0.4
361.58E06,0.5
382.65E06,0.6
401.42E06,0.7
*DENSITY
7.85E3,
***********************************************
****   ROLL
*NODE,NSET=REF
*NSET,NSET=BOT,GEN
*NSET,NSET=LEFT,GEN
*NSET,NSET=EULER,GEN
*NSET,NSET=EULER1,GEN
*NSET, NSET=EULERSMALL1, GEN
*NSET, NSET=EULERSMALL2, GEN
*NSET, NSET=EULERINT, GEN
*NSET, NSET=EQN1,GEN
*NSET,NSET=EQN2,GEN
*EQUATION
EQN1,1,1.0,1646,1,-1.0
*EQUATION
EQN2,1,1.0,1,1,-1.0
*ELSET, ELSET=EULER1, GEN
*ELSET, ELSET=EULER2, GEN
*INITIAL CONDITIONS,TYPE=VELOCITY
BAR,1,.30
*BOUNDARY
LEFT,ZSYMM
BOT,YSYMM
*ELSET,ELSET=TOP,GEN
*ELSET,ELSET=SIDE,GEN
*SURFACE, NAME=SURF1, REGION TYPE=SLIDING
TOP,S4
SIDE,S2
*SURFACE, NAME=EULER1, REGION TYPE=EULERIAN
EULER1,S3
*SURFACE, NAME=EULER2, REGION TYPE=EULERIAN
EULER2,S5
*SURFACE,TYPE=CYLINDER,NAME=RIGID,FILLET RADIUS=.001
START,0.0,-0.175
CIRCL,-0.175,0.0,0.0,0.0
CIRCL,0.0,0.175,0.0,0.0
*RIGID BODY, REFNODE=10000, ANALYTICAL SURFACE = RIGID
*STEP
*DYNAMIC,EXPLICIT
,0.50
*STEADY STATE DETECTION,ELSET=BAR,SAMPLING=UNIFORM
*STEADY STATE CRITERIA
SSPEEQ,  , .0409, 0., 0.
SSSPRD,  , .0409, 0., 0.
SSTORQ,  , .0409, 0., 0., 10000, 0., 0., 1.
SSFORC,  , .0409, 0., 0., 10000, 0., 1., 0.
*BOUNDARY
10000,1,5
*BOUNDARY,TYPE=VELOCITY
10000,6,6,6.2832
*BOUNDARY,TYPE=VELOCITY,REGION TYPE=EULERIAN
EULERSMALL1,3,3,0.0
EULERSMALL2,2,2,0.0
*FIXED MASS SCALING, FACTOR=2750.
*SURFACE INTERACTION,NAME=FRICT
*FRICTION
 0.3,
*CONTACT PAIR,INTERACTION=FRICT
SURF1,RIGID
*FILE OUTPUT, NUMBER INTERVAL=1, TIMEMARKS=YES
*EL FILE, ELSET=TOP
 PEEQ,
*NODE FILE,NSET=REF
 U,RF
*OUTPUT, FIELD,NUMBER INTERVAL=10
*ELEMENT OUTPUT
PEEQ,
*NODE OUTPUT
U,V
*OUTPUT,HISTORY,TIME INTERVAL=1.E-4
*NODE OUTPUT,NSET=REF
RF2,RM3
*INCREMENTATION OUTPUT
SSPEEQ,SSSPRD,SSTORQ,SSFORC
*****
*NSET, NSET=QA_TEST_REFN
REF,
*ELSET, ELSET=QA_TEST
TOP,
*NSET, NSET=QA_TEST
BOT,
*OUTPUT, FIELD, TIME MARKS=YES, NUMBER INTERVAL=1
*ELEMENT OUTPUT, ELSET=QA_TEST
PEEQ,
*NODE OUTPUT, NSET=QA_TEST
U,
*NODE OUTPUT, NSET=QA_TEST_REFN
RF,
*OUTPUT, HIST, FREQ=9999
*ENERGY OUTPUT, VAR=PRESELECT
******
*ADAPTIVE MESH,ELSET=BAR,FREQUENCY=5
*ADAPTIVE MESH CONSTRAINT
EULER,1,1,0.
EULER1,2,3,0.
*ENDSTEP