*HEADING
STANDARD: GLOBAL MODEL TEST *DYNAMIC PROCEDURE 
[CPE8H]
*PREPRINT,ECHO=YES,MODEL=YES,HISTORY=YES
*PARAMETER
f=15
T1=1.0/f
T01=0.1*T1
omega=2*3.14159*f
*NODE,NSET=NALL
1,
7,0.,1.5
801,8.,
807,8.,1.5
*NGEN,NSET=NL
1,7,1
*NGEN,NSET=NR
801,807,1
*NFILL,NSET=NALL
NL,NR,8,100
*ELEMENT,TYPE=CPE8H,ELSET=EALL
1,1,201,203,3,101,202,103,2
*ELGEN,ELSET=EALL
1,3,2,1,4,200,3
*SOLID SECTION,MATERIAL=A1, ELSET=EALL
1.0, 
*MATERIAL,NAME=A1
*ELASTIC,TYPE=ISOTROPIC
30.0E6,0.3
*DENSITY
10., 
*BOUNDARY
NL,1,2
*AMPLITUDE,NAME=SINEWAVE,DEF=PERIODIC
1,<omega>,0.0,0.0
0,1,0,0
*STEP
*DYNAMIC
1e-3,<T1>
*CLOAD,AMPLITUDE=SINEWAVE
801,2,-100000.
*****************************
*FILE FORMAT, ZERO INCREMENT
*NODE FILE, NSET=NALL, FREQ=1
U,
***************
*OUTPUT,FIELD,FREQ=1
*NODE OUTPUT,NSET=NALL
U,
*ELEMENT OUTPUT
S,
*****************
*OUTPUT,HISTORY, FREQ=1
*NODE OUTPUT,NSET=NALL
U1,U2
*ENERGY OUTPUT,VAR=PRESELECT
*END STEP