*HEADING
 BASIC VERIFICATION - RIGID BODY WITH T3D2 ELEMENTS REPLACING MPC TYPE LINK
 ELEMENT: PIPE31, 
*RESTART,TIMEMARKS=NO,WRITE,NUM=10
*NODE,NSET=NALL
1,0.
2,5.
3,10.
4,11.
5,16.
6,21.
1000, 5., 5.
*ELEMENT,TYPE=PIPE31, ELSET=EALL
1,1,2
2,2,3
3,4,5
4,5,6
*BEAM SECTION,SECTION=PIPE,MATERIAL=MAT, ELSET=EALL
1.,0.1
*BOUNDARY
1,1,2
1,4,6
6,1,2
6,4,6
NALL,3
1000,3,5,0.0
*ELEMENT, TYPE=T3D2, ELSET=RIGID
1100, 3, 4
*ELEMENT,TYPE=ROTARYI,ELSET=ROTI
2001, 1000
*ROTARY INERTIA,ELSET=ROTI
.0001, .0001, .0001
*RIGID BODY, ELSET=RIGID, REF NODE=1000
*SOLID SECTION, ELSET=RIGID, MATERIAL=RIGMAT
1.0,
*MATERIAL,NAME=RIGMAT
*ELASTIC
3.E6, 
*DENSITY
1e-8, 
*AMPLITUDE,NAME=RAMP
0.0,0.0,1.0,1.0
*MATERIAL,NAME=MAT
*ELASTIC
3.E6, 
*DENSITY
0.03, 
**
*NSET, NSET=QA_TEST_ALLNODES
NALL, 
**
*STEP
*DYNAMIC,EXPLICIT
,1.0
*CLOAD,AMP=RAMP
2,2,-250.
5,2,250.
*FILE OUTPUT,NUM=1
*NODE FILE
U, 
***OUTPUT,HISTORY,TIME INTERVAL=1.0E-3
***ELEMENT OUTPUT,ELSET=EALL
**S,
***ENERGY OUTPUT,ELSET=EALL
**ALLKE,ALLIE
*OUTPUT, FIELD, NUMBER INTERVAL=1
*NODE OUTPUT, NSET=QA_TEST_ALLNODES
U, 
*OUTPUT,FIELD,VARIABLE=PRESELECT
*OUTPUT,HISTORY,VARIABLE=PRESELECT,TIMEINT=1
*END STEP