*HEADING
 RISER DYNAMIC CHECK OUT --- STOKES 5TH ORDER THEORY      
*NODE  ,NSET=ENDS
1,,1520.
11,0.
*NGEN
1,11
*ELEMENT,TYPE=B21
1,1,2
*ELGEN,ELSET=PIPE
1,10
*BEAM GENERAL SECTION,SECTION=PIPE,DENSITY=22.332,ELSET=PIPE
.6667,0.0521
,,-1.
4.32E9,2.16E9
*AQUA
0.,1470.,32.2,1.982
0.,0.,0.,0.
0.844,0.,0.,1470.
*WAVE,TYPE=STOKES
20.,9.,35.974,1.
*****
*****
*RESTART,WRITE,FREQUENCY=5
*STEP,NLGEOM
  INITIAL OFFSET
*STATIC
.25E-5,1.E-5
*DLOAD
PIPE,PY,-176.36
**      
**   Aqua Normal drag load on ELSET PIPE
PIPE,FDD,    1., 2.167,  0.7,     1.
**el,FDD, amag0,     D,   Cd, Alphr,  Ampc, Ampw
**
**   Aqua Inertial drag load on ELSET PIPE
PIPE, FI,    1.,  2.167, 1.5,   0.5
**el, FI, amag0,      D,  Cm,    Ca,  Ampw
**
*CLOAD
1,2,5.E5
*BOUNDARY
11,1,2
*BOUNDARY,USER
1,1
*NODE FILE,NSET=ENDS,FREQUENCY=1
U,RF
*PRINT,RESIDUAL=NO
*ENERGY PRINT
*ENERGY FILE
*EL PRINT,FREQUENCY=20
SF, 
*EL FILE,FREQUENCY=20
SF, 
*NODE PRINT,FREQUENCY=5
U,RF
*NODE FILE,FREQUENCY=5
U,RF
*END STEP
*STEP,NLGEOM,INC=200
  DYNAMICS
*DYNAMIC,DIRECT
.125,18.
*EL PRINT,FREQUENCY=10
SF, 
*EL FILE,FREQUENCY=10
SF, 
*END STEP