*HEADING
VERTICAL PULSE LOADING, WITHOUT QUIET BOUND, 16X16 C3D8R
*NODE
1,0.,0.
273,2e-3,0.
17,0.,-2e-3
289,2e-3,-2e-3
*NGEN,NSET=LHS
1,17
*NGEN,NSET=RHS
273, 289
*NFILL, NSET=FFACE
LHS,RHS,16,17
*NCOPY,OLD SET=FFACE,CHANGE NUMBER=1000,SHIFT,NEW SET=BFACE
0.,0.,-0.25e-3

*NSET, NSET=ALL
FFACE,BFACE
*NSET, NSET=LHS,GEN
1,17
1001,1017
*ELEMENT,TYPE=C3D8R, ELSET=FE
1,2,19,1019,1002,1,18,1018,1001
*ELGEN,ELSET=FE
1,16,1,1,16,17,16
*NSET,NSET=FILEN
13, 37, 205
*SOLID SECTION,ELSET=FE,MATERIAL=MAT1
*ELSET, ELSET=LOAD, GEN
1,81,16
*MATERIAL,NAME=MAT1
*ELASTIC
7.3E10,.33
*DENSITY
2842.0, 
*BOUNDARY
LHS,1
ALL,3,3
*AMPLITUDE,NAME=PULSE
0,0,1e-7,1,2e-7,0
**
*STEP,NLGEOM=NO
*DYNAMIC,EXPLICIT
,1.5e-6
*BULK VISCOSITY
0,0
*DLOAD,AMPLITUDE=PULSE
LOAD,p2,1e+9
*OUTPUT,FIELD,VAR=PRESELECT,NUM=5
*OUTPUT,HISTORY
*NODE OUTPUT,NSET=FILEN
U,V,A
**
** Output requests for qa testing
**
*NSET,NSET=QA_TEST
FILEN,
*OUTPUT,FIELD,NUM=1
*NODE OUTPUT,NSET=QA_TEST
U,
*OUTPUT,HISTORY,VAR=PRESELECT,TIME INTERVAL=3.75e-7
*FILE OUTPUT, NUMBER INTERVAL=1
*NODE FILE, NSET=FILEN
U,
*END STEP