*HEADING
 BASIC VERIFICATION - REVOLUTE MPC TYPE with *TRANSFORM
 ELEMENT: B33H, TEST TYPE:5 ,TEST NUMBER:6  --  MPCREVOLUTE
*NODE
10,0.0,0.0,0.0
20,2.0,0.0,0.0
1,1.0,0.0,0.0
2,1.0,0.0,0.0
3,1.0,0.0,0.0
4,1.0,0.0,1.0
5,1.0,1.0,0.0
*NSET, NSET=TWO
2, 
*NSET, NSET=THREE
3, 
*NSET, NSET=FIVE
5 , 
*ELEMENT,TYPE=B33H,ELSET=A
1,10,1
2,2,20
*TRANSFORM,NSET=TWO
** 45 ABOUT Z AXIS, THEN 45 ABOUT (TRANSF) X AXIS
0.7071,0.7071,0.,-0.5,0.6,0.7071
*TRANSFORM,NSET=THREE
** 30 ABOUT Y AXIS, THEN 45 ABOUT (TRANSF.) X AXIS
0.8660254,0.0,-0.5,0.35355339,0.7971,0.61237243
*TRANSFORM,NSET=FIVE
** 30 ABOUT Y AXIS, THEN 60 ABOUT (TRANSF.) Z AXIS
0.4330127,0.866025,-0.25,-0.75,0.5,0.4330127
*MPC
PIN,1,2
PIN,2,3
REVOLUTE,2,3,5
REVOLUTE,3,1,4
*BEAM SECTION,SECT=CIRC,MATERIAL=MAT,ELSET=A
0.1, 
*MATERIAL,NAME=MAT
*ELASTIC
200.0E9,0.0
*BOUNDARY
4,6,6
5,6,6
10,1,6
*STEP, UNSYMM=YES
 PULL ON THE JOINT
*STATIC
1.0,1.0
*CLOAD,FOLLOWER
20,1,1.0E6
*MONITOR,NODE=20,DOF=2
*EL PRINT,FREQ=9999
SF, 
*NODE PRINT,FREQ=9999, GLO=YES
U,COORD
RF, 
*EL FILE,FREQ=9999
SF, 
*NODE FILE,FREQ=9999
U,COORD
*END STEP
*STEP,NLGEOM, UNSYMM=YES
  TWIST THE 3-4 JOINT 45 DEGREES
*STATIC
0.25,1.0
*BOUNDARY
4,6,6, 0.785398164
*END STEP
*STEP,NLGEOM, UNSYMM=YES
  TWIST THE 3-5 JOINT 45 DEGREES
*STATIC
0.25,1.0            
*BOUNDARY
5,6,6,-0.785398164
*END STEP