*HEADING
VERTICAL PULSE LOADING, WITHOUT QUIET BOUND, 48X48 C3D8R
*NODE
1,0.,0.
2401,6e-3,0.
49,0.,-6e-3
2449,6e-3,-6e-3
*NGEN,NSET=LHS
1,49
*NGEN,NSET=RHS
2401, 2449
*NFILL, NSET=FFACE
LHS,RHS,48,50
*NCOPY,OLD SET=FFACE,CHANGE NUMBER=5000,SHIFT,NEW SET=BFACE
0.,0.,-0.25e-3

*NSET, NSET=ALL
FFACE,BFACE
*NSET, NSET=LHS,GEN
1,49
5001,5049
*ELEMENT,TYPE=C3D8R, ELSET=FE
1,2,52,5052,5002,1,51,5051,5001
*ELGEN,ELSET=FE
1,48,1,1,48,50,50
*NSET,NSET=FILEN
13, 103, 601
*SOLID SECTION,ELSET=FE,MATERIAL=MAT1
*ELSET, ELSET=LOAD, GEN
1,251,50
*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,NUM=5,VAR=PRESELECT
*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