*HEADING
ELEMENT TESTED      : C3D8R
SECONDARY SURFACE TYPE  : NODE
MAIN SURFACE TYPE : NODE
TEST THE USE OF MPC'S
*PREPRINT, ECHO=YES, MODEL=YES, HISTORY=YES
*NODE
      1,           5.,           5.,  6.16298E-31
      2,           5.,           5.,          10.
      3,          25.,          25.,          10.
      4,          25.,          25.,  3.48631E-30
      5,          10.,           0.,          10.
      6,          50.,           0.,          10.
      7,          50.,           0.,           0.
      8,          10.,           0.,           0.
      9,           0.,          10.,           0.
     10,           0.,          10.,          10.
     11,           0.,          50.,          10.
     12,           0.,          50.,           0.
*ELEMENT, TYPE=C3D8R, ELSET=EALL
1, 8, 5, 6, 7, 1, 2, 3, 4
2, 1,  2,  3,  4,  9, 10, 11, 12
*NSET, NSET=NBC
 1, 2, 5, 8, 9,10
*NSET, NSET=NSECONDARY, GENERATE
 5,  8,  1
*NSET, NSET=NMAIN, GENERATE
  9,  12,   1
*SURFACE, NAME=SSECONDARY, TYPE=NODE
NSECONDARY,
*SURFACE, NAME=SMAIN, TYPE=NODE
NMAIN,
*SOLID SECTION, ELSET=EALL,MATERIAL=MAT
*MATERIAL,NAME=MAT
*ELASTIC
10E8,0.3
*DENSITY
100
*TIE, CYCLICSYM, POSITION=0.5, NAME=TIE1
 SSECONDARY, SMAIN
*CYCLIC SYMMETRY MODEL,N=4
 0,0,0, 0,0,1
*MPC
LINK, 2, 3
LINK, 1, 4
*STEP
*FREQUENCY,EIGENSOLVER=LANCZOS
 10
*OUTPUT, FIELD, FREQUENCY=0
*END STEP