** Mass scaling verification: Test of global vs. local mass scaling with
**                            *VARIABLE MASS SCALING
*HEADING
*RESTART,WRITE	
*NODE,NSET=NALL
1,   0.0, 0.0
2,   2.5, 0.0
3,   5.0, 0.0
4,   0.0, 2.5
5,   2.5, 2.5
6,   5.0, 2.5
7,   0.0, 5.0
8,   2.5, 5.0
9,   5.0, 5.0
*NSET,NSET=QA_TEST
NALL,
*NSET,NSET=DISP
3,6,9
*NSET,NSET=BOT
1,2,3
*NSET,NSET=LEFT
1,4,7
*ELEMENT,TYPE=CPE4R,ELSET=SCALE1
1, 1,2,5,4
2, 2,3,6,5
*ELEMENT,TYPE=CPE4R,ELSET=SCALE2
3, 4,5,8,7
4, 5,6,9,8
*SOLID SECTION,ELSET=SCALE1,MATERIAL=SCALE1
0.5, 
*SOLID SECTION,ELSET=SCALE2,MATERIAL=SCALE2
0.5, 
*MATERIAL,NAME=SCALE1
*ELASTIC
1.E6, .2
*DENSITY
5.E-4, 
*MATERIAL,NAME=SCALE2
*ELASTIC
1.E6, .2
*DENSITY
1.E-3, 
*BOUNDARY
BOT,2
LEFT,1
*AMPLITUDE,NAME=SMOOTH,DEFINITION=SMOOTH STEP
0.,0.,  .01, 1.
*STEP
*DYNAMIC,EXPLICIT,ELEMENT BY ELEMENT
,.015
*VARIABLE MASS SCALING,ELSET=SCALE1,TYPE=SET EQUAL DT,DT=1.E-4,FREQUENCY=1
*VARIABLE MASS SCALING,TYPE=SET EQUAL DT,DT=2.E-4,FREQUENCY=1
*BOUNDARY,AMP=SMOOTH
DISP, 1,1, .05
*RESTART,WRITE,NUMBER INTERVAL=5
******************************
*FILE OUTPUT,NUMBER INTERVAL=4,TIMEMARKS=YES
*NODE FILE, NSET=DISP
RF,
*ENERGY FILE
********************************
*OUTPUT,FIELD, NUMBER INTERVAL=1,TIMEMARKS=YES
*NODE OUTPUT, NSET=QA_TEST
RF,
*OUTPUT,HISTORY,TIME INTERVAL=0.015
*ENERGY OUTPUT, VAR=ALL
**********************
***OUTPUT,HISTORY,TIME INTERVAL=0.
***NODE OUTPUT,NSET=BOT
**RF,
***ELEMENT OUTPUT,ELSET=SCALE1
**EMSF,EDT
***ELEMENT OUTPUT,ELSET=SCALE2
**EMSF,EDT
*END STEP