*HEADING
 BASIC VERIFICATION - KINEMATIC COUPLING 
 EQUIVALENT TO MPC TYPE BEAM 
*NODE
1,0.
6,12.
*NGEN
1,6,
*ELEMENT, TYPE=MASS, ELSET=MASS
100,6
*ELEMENT, TYPE=ROTARYI, ELSET=ROTARY
101,6
*MASS, ELSET=MASS
.1,
*ROTARY INERTIA, ELSET=ROTARY
.1,.1,.1
*ELEMENT,TYPE=B21, ELSET=EALL
1,1,2
2,2,3
3,3,4
4,4,5
*NSET, NSET=TWO
5, 
*NSET, NSET=THREE
6, 
*BEAM SECTION,SECTION=L,MATERIAL=MAT, ELSET=EALL
0.5,1.0,0.2,0.2
*BOUNDARY
1,1,6
*SURFACE, TYPE=NODE, NAME=BEAMTIP
 5, 1.0
*COUPLING, CONSTRAINT NAME=BEAMMPCTYPE, REF NODE=6, SURFACE=BEAMTIP
*KINEMATIC
 1, 6
*MATERIAL,NAME=MAT
*ELASTIC
2.E+11,.3 
*DENSITY
7800., 
*NSET, NSET=OUT
5,6
*NSET, NSET=QA_TEST_ALLNODES
1,2,3,4,5,6
*AMPLITUDE, NAME=AMP,DEFINITION=SMOOTH STEP
0.0,0.0,1.0,1.0
******************************
*STEP
*DYNAMIC,EXPLICIT
**,1.E-2
,1.0
*CLOAD, AMPLITUDE=AMP
6,2,-1.E+7
*OUTPUT, FIELD, NUMBER=4, TIMEMARKS=YES
*NODE OUTPUT, NSET=QA_TEST_ALLNODES
U
**OUTPUT,HISTORY,FREQ=1
**NODE OUTPUT,NSET=OUT
**U,V,A
**ENERGY OUTPUT
**ALLIE,ALLKE,ALLAE,ALLWK,ETOTAL
*END STEP