*HEADING
 BAND-LIMITED MATERIAL DAMPING TEST
 2D BEAMS - IN PLANE PULSE - ELASTIC 
*NODE
1,     0., 0.
101, 100., 0.
201,     0., 0.
301, 100., 0.
*NGEN,NSET=ALL
1,101,1
201,301,1
*ELEMENT,TYPE=B21,ELSET=BEAM
1,1,2
*ELGEN,ELSET=BEAM
1,100,1,1
*ELEMENT,TYPE=B22,ELSET=BEAM2
201,201,202, 203
*ELGEN,ELSET=BEAM2
201,50,2,2
*BEAM SECTION,SECTION=RECT,ELSET=BEAM,MATERIAL=MAT1
1.0,1.0
*BEAM SECTION,SECTION=RECT,ELSET=BEAM2,MATERIAL=MAT1
1.0,1.0
*MATERIAL,NAME=MAT1
*ELASTIC
64000.,.33
*DENSITY
1000.,
*DAMPING, BAND LIMITED=0.102525, LOW FREQUENCY CUTOFF =4, HIGH FREQUENCY CUTOFF=10
**
*BOUNDARY
ALL, 2, 6, 0.0
*AMPLITUDE,NAME=PULSE
 .0,  .00000,  .1,  .15644,  .2,  .30902,  .3,  .45399
 .4,  .58778,  .5,  .70711,  .6,  .80902,  .7,  .89101
 .8,  .95106,  .9,  .98769, 1.0, 1.00000, 1.1,  .98769
1.2,  .95106, 1.3,  .89101, 1.4,  .80902, 1.5,  .70711
1.6,  .58778, 1.7,  .45399, 1.8,  .30902, 1.9,  .15644
2.0, 0.00000
*NSET,NSET=NOUT,GENERATE
 1,101,10
 201,301,10
*ELSET,ELSET=EOUT,GENERATE
 1,100,9
 201,300,9
**
*ELSET,ELSET=QA_TEST_EOUT
EOUT,
*NSET,NSET=QA_TEST_NOUT
NOUT,
**
*STEP
*DYNAMIC,EXPLICIT
,400.0
*CLOAD,AMPLITUDE=PULSE
1,1,1,10.0
201,1,1,10.0
*BULK VISCOSITY
0.0,0.0
*OUTPUT,FIELD,VARIABLE=PRESELECT,  NUMBER INTERVAL=2
*NODE OUTPUT, NSET=QA_TEST_NOUT
 U,
*OUTPUT,HISTORY,VARIABLE=PRESELECT,TIMEINT=200
***OUTPUT,HISTORY,VARIABLE=PRESELECT
*END STEP