*HEADING
 BASIC VERIFICATION - RIGID BODY WITH PIN NSET REPLACING MPC TYPE PIN
 ELEMENT: B21, mpc_pinrig 
*RESTART,TIMEMARKS=NO,WRITE,NUM=10
*NODE, NSET=QA_TEST_ALLNODES
1,0.
2,10.
3,10.
4,20.
1000, 5.,5.
*ELEMENT,TYPE=B21, ELSET=EALL
1,1,2
2,3,4
*BEAM SECTION,SECTION=RECT,MATERIAL=MAT, ELSET=EALL
1.,1.
*BOUNDARY
1,1,2
1,6
4,1,2
4,6
1000,3,5
*ELSET,ELSET=HIST
1, 
*ELEMENT,ELSET=ROTI,TYPE=ROTARYI
100, 1000
*ROTARY INERTIA,ELSET=ROTI
1.E-6,1.E-6,1.E-6
***************************************
*AMPLITUDE,NAME=RAMP
0.0,0.0,1.0,1.0
***************************************
*RIGID BODY, PIN NSET=PNSET, REF NODE =1000
*NSET, NSET=PNSET
2,3
*MATERIAL,NAME=MAT
*ELASTIC
3.E6,0.0
*DENSITY
0.03, 
**
*NSET, NSET=QA_TEST_ALLNODES
QA_TEST_ALLNODES, PNSET
**
*STEP
*DYNAMIC,EXPLICIT
,1.0
*DLOAD,AMP=RAMP
1,PY,-1000.0
***************************************
*FILE OUTPUT,NUM=1
*NODE FILE
U, 
***OUTPUT,HISTORY,TIME INTERVAL=1.0E-3
***ELEMENT OUTPUT,ELSET=HIST
**S,
***ENERGY OUTPUT
**ALLKE,ALLIE,ALLSE,ALLAE,ALLVD,ALLCD,ALLPD,ALLFD,ALLWK,ETOTAL,DT
*OUTPUT, FIELD, NUMBER INTERVAL=1
*NODE OUTPUT, NSET=QA_TEST_ALLNODES
U, 
*OUTPUT,FIELD,VARIABLE=PRESELECT
*OUTPUT,HISTORY,VARIABLE=PRESELECT,TIMEINT=1
*END STEP