*HEADING
XMPCTIEX: BASIC VERIFICATION - MPC TYPE TIE with *TRANSFORM
*NODE
1,0.
2,1.
3,2.
4,2.
5,3.
6,4.
11,0.,1.
15,4.,1.
*NSET,NSET=OUTPUT
3,4,13
*NSET, NSET=TIED, GENERATE
1,6
*NGEN,NSET=WHOLE
11,15
*NSET, NSET=THREE
3, 
*NSET, NSET=FOUR
4, 
*ELEMENT,TYPE=B22,ELSET=BEAMS
1,1,2,3
2,4,5,6
3,11,12,13
4,13,14,15
*BEAM SECTION,SECT=RECT,ELSET=BEAMS,MATERIAL=MAT1
0.5,0.5
*MATERIAL,NAME=MAT1
*ELASTIC
28.1E6,0.3
*DENSITY
1700., 
*BOUNDARY
1,ENCASTRE
11,ENCASTRE
*MPC
TIE,4,3
*TRANSFORM, NSET=FOUR
0.7071,0.7071,0.,-0.7071,0.7071,0.
*TRANSFORM, NSET=THREE
0.5,0.8660254,0.,-0.8660254,0.5,0.
***************************
*STEP,PERT
*STATIC
*CLOAD
6,2,-300.
15,2,-300.
*BOUNDARY, OP=NEW
1, ENCASTRE
11,ENCASTRE
*NODE FILE,NSET=OUTPUT
U, 
*OUTPUT,FIELD
*NODE OUTPUT,NSET=OUTPUT
U,
*NODE PRINT,FREQ=1
U, 
*NODE PRINT,FREQ=1, GLO=YES
U, 
*EL FILE,FREQ=0
*OUTPUT,FIELD,FREQ=0
*ELEMENT OUTPUT
*EL PRINT,FREQ=0
*ENDSTEP
*************************
*STEP
*FREQUENCY, eigensolver=lanczos, SIM=NO
4, , 
*BOUNDARY, OP=NEW
TIED,1,6
11,ENCASTRE
*EL PRINT, F=0
*NODE PRINT, GLO=YES
U, 
*NODE FILE, NSET=WHOLE
U, 
*OUTPUT,FIELD
*NODE OUTPUT,NSET=WHOLE
U,
*MODAL PRINT
*MODAL FILE
*OUTPUT,HISTORY,FREQUENCY=1
*MODAL OUTPUT
*ENDSTEP
*************************
*STEP
*FREQUENCY, eigensolver=lanczos, SIM=NO
4, , 
*BOUNDARY, OP=NEW
WHOLE,1,6
1,ENCASTRE
*EL PRINT, F=0
*NODE PRINT, GLO=YES
U, 
*NODE FILE, NSET=TIED
U, 
*OUTPUT,FIELD
*NODE OUTPUT,NSET=TIED
U,
*MODAL PRINT
*MODAL FILE
*OUTPUT,HISTORY,FREQUENCY=1
*MODAL OUTPUT
*ENDSTEP
**************************
*STEP,NLGEOM
*STATIC
1.,1.
*CLOAD
6,2,-300.
15,2,-300.
*BOUNDARY, OP=NEW
1, ENCASTRE
11,ENCASTRE
*NODE FILE,NSET=OUTPUT
U, 
*OUTPUT,FIELD
*NODE OUTPUT,NSET=OUTPUT
U,
*NODE PRINT,FREQ=1
U, 
*NODE PRINT,FREQ=1, GLO=YES
U, 
*EL FILE,FREQ=0
*OUTPUT,FIELD,FREQ=0
*ELEMENT OUTPUT
*EL PRINT,FREQ=0
*ENDSTEP