*HEADING
 BASIC VERIFICATION - REVOLUTE MPC TYPE
 ELEMENT: B33H, TEST TYPE:5 ,TEST NUMBER:6  --  MPCREVOLUTE
*NODE
*NODE,NSET=CUBE
*ELEMENT,TYPE=C3D8P,ELSET=CUBE
*SOLID SECTION,ELSET=CUBE,MATERIAL=MAT1
*MATERIAL,NAME=MAT1
*ELASTIC
 200.0E9,0.0
*PERMEABILITY,SPECIFIC=1.
 1.,
*INITIAL CONDITIONS,TYPE=RATIO
 CUBE,0.5
*ELEMENT,TYPE=B33H,ELSET=A
*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
 CUBE,1,3
*CONSTRAINT, NOCHECK
*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,ELSET=A,FREQ=9999
 SF,
*NODE PRINT,FREQ=9999
 U,COORD
 RF,
*EL FILE,ELSET=A,FREQ=9999
 SF,
*NODE FILE,FREQ=9999
 U,COORD
*OUTPUT,FIELD
*NODE OUTPUT
 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