*HEADING
fv5t_b31_f: NAFEMS FORCED VIBRATION; TEST 5T;  [B32]
(DIRECT INTEGRATION) 
*RESTART,WRITE,NUM=2,TIMEMARKS=NO
*NODE
1, 0.
11, 10.
*NGEN
1,11
*NSET,NSET=EVEN, GEN
2,10,2
*NSET,NSET=END
1,11
*NSET,NSET=ODD, GEN
3,9,2
*NSET,NSET=NMID
6, 
*ELEMENT,TYPE=B32
1, 1,2,3
*ELGEN,ELSET=ALLE
1, 5,2,1
*ELSET,ELSET=EMID
3,
*BEAM SECTION,SECT=RECT,MATERIAL=MAT,ELSET=ALLE
2.0,2.0
0.,0.,-1.
*MATERIAL,NAME=MAT
*DENSITY
8000.,
*ELASTIC
200.E9,0.3
*DAMPING,ALPHA=5.36,BETA=7.46E-5
*BOUNDARY
1, 1,4
11, 2,3
**
** Transient Load
** --------------
**
*NSET, NSET=CHECK
6, 11 
*NSET,NSET=QA_TEST_CHECK
CHECK,
**
*STEP
*DYNAMIC, EXPLICIT, DIRECT
0.0001,0.02
*BULK VISCOSITY
1.0E-5,0.02
***DLOAD
**ALLE,PY,1.E6
*CLOAD
END,  2,  333333.33
ODD,  2,  666666.66
EVEN, 2, 1333333.33
***OUTPUT,HISTORY,TIME INTERVAL=1.0E-3
***NODE OUTPUT,NSET=NMID
**U2,
***ELEMENT OUTPUT,ELSET=EMID
**S11,
***ENERGY OUTPUT
**ALLWK,ALLKE,ALLIE,ALLVD,ETOTAL
*FILE OUTPUT, NUMBER INTER=4, TIMEMARKS=YES
*NODE FILE, NSET=CHECK
U, 
*ENERGY FILE
*OUTPUT, FIELD, NUMBER INTERVAL=4, TIMEMARKS=YES
*NODE OUTPUT, NSET=QA_TEST_CHECK
U, 
***OUTPUT,FIELD,VARIABLE=PRESELECT
*OUTPUT,HISTORY,VARIABLE=PRESELECT,FREQ=1
*NODE OUTPUT, NSET=QA_TEST_CHECK
U, UR3, RF
*ENDSTEP
**
** Increase the time period to reach steady state
**
*STEP
*DYNAMIC,EXPLICIT
 ,1.0
***DLOAD
**ALLE,PY,1.E6
*CLOAD
END,  2,  333333.33
ODD,  2,  666666.66
EVEN, 2, 1333333.33
*FILE OUTPUT, NUMBER INTER=4, TIMEMARKS=YES
*NODE FILE, NSET=CHECK
U, 
*ENERGY FILE
*OUTPUT, FIELD, NUMBER INTERVAL=4, TIMEMARKS=YES
*NODE OUTPUT, NSET=QA_TEST_CHECK
U, 
***OUTPUT,FIELD,VARIABLE=PRESELECT
*OUTPUT,HISTORY,VARIABLE=PRESELECT,TIMEINT=0.001
*NODE OUTPUT, NSET=QA_TEST_CHECK
U, UR3, RF
*ENDSTEP