*HEADING
ADAPTIVE MESHING EXAMPLE
WATER SLOSHING IN A TANK
Units - N, m, sec
*RESTART, WRITE, NUMBER=30
*SYSTEM
0.,0.,0.,.9999025,-.01396218,0.,
.01396218,.9999025,0.
*NODE
1, -.45,-.6
25,.45, -.6
251,-.45,-.00628
275,.45,0.00628
75000, 0.0, 0.0
*NODE, NSET=RIG
1000,-.45,.2
1001,-.45,-.6
1002,.45, -.6
1003,.45,0.0
1004,.45, .2
*NGEN, NSET=A1
1, 251, 25
*NGEN, NSET=A2
25, 275, 25
*NFILL, NSET=A
A1,A2,24,1
*NSET,NSET=BOT,GEN
1,25,1
*NSET,NSET=TOP,GEN
251,275,1
*ELEMENT, TYPE=CPE4R
1,1,2,27, 26
*ELGEN, ELSET=WATER
1,24,1,1,10,25,24,
*SOLID SECTION, ELSET=WATER, MATERIAL=WATER,CONTROLS=SECT
1.0, 
*SECTION CONTROLS, NAME=SECT,KINEMATICS=ORTHOGONAL,HOURGLASS=STIFFNESS
25.,
*MATERIAL, NAME=WATER
****K=2.E+6, G=2., K/G=1.E6,(Actual water: K = 2.E+9)
*EOS, TYPE=USUP
45.10182,0.,0.,
*VISCOSITY
13.E-4, 
*DENSITY
983.2, 
*ELEMENT,TYPE=R2D2, ELSET=RIGID
1000,1000,1001
1001,1001,1002
1002,1002,1003
1003,1003,1004
*BOUNDARY
75000,1,6,0.0
*INITIAL CONDITIONS, TYPE=STRESS, GEOSTATIC
WATER,0.,0.,-5781.216,-.6,1.,1., 
*ELSET,ELSET=TOP,GEN
217,240,1
*AMPLITUDE,NAME=AMP, DEFINITION=PERIODIC
1,5.5,0.,+.01396
-.01396,0.
*NSET,NSET=REF
75000, 
*SURFACE,TYPE=ELEMENT,NAME=RIGSURF
RIGID,SPOS
*SURFACE,TYPE=ELEMENT, NAME=WATSURF
WATER,
*RIGID BODY, REF NODE=75000,ELSET=RIGID
*ELSET,ELSET=QA_TEST_TOP
TOP,
*NSET,NSET=QA_TEST_TOP
TOP,
**
*STEP
*DYNAMIC, EXPLICIT
,14.
*DLOAD
WATER, GRAV, 9.8, 0., -1., 0.
*BOUNDARY,AMPLITUDE=AMP
75000,6,6,1.0
*CONTACT PAIR,INTERACTION=WATRIG
RIGSURF,WATSURF
*SURFACE INTERACTION, NAME=WATRIG
*FILE OUTPUT, NUMBER=2, TIME MARKS=YES
*EL FILE, ELSET=TOP
PRESS,
*NODE FILE, NSET=TOP
U,
***OUTPUT,HISTORY,TIME INTERVAL=2.0E-2
***NODE OUTPUT,NSET=TOP
**U1,U2
**COORD,
***NODE OUTPUT,NSET=RIG
**U1,U2
**COORD,
***NODE OUTPUT,NSET=REF
**UR3,
***ELEMENT OUTPUT,ELSET=TOP
**S,PRESS,
***ENERGY OUTPUT
**ALLKE,ALLIE,ALLAE,ALLVD,ALLWK,ETOTAL,
**DT,
*ADAPTIVE MESH, ELSET=WATER,FREQUENCY=5,MESH SWEEPS=3,CONTROLS=C1
*ADAPTIVE MESH CONTROLS, NAME=C1, CURVATURE REFINEMENT=0.0
*DIAGNOSTICS, ADAPTIVE MESH=DETAIL
*OUTPUT, FIELD, NUMBER INTERVAL=2, TIMEMARKS=YES
**ELEMENT OUTPUT, ELSET=QA_TEST_TOP
**PRESS,
*NODE OUTPUT, NSET=QA_TEST_TOP
U,
*OUTPUT,FIELD,VARIABLE=PRESELECT
*OUTPUT,HISTORY,VARIABLE=PRESELECT,TIMEINT=7
*END STEP