*HEADING
 :  CPE4 MODEL CHANGE VERIFICATION; USING *ORIENTATION AND *TRANSFORM
*SYSTEM
0.0, 0.0, 0.0, 1.0, 1.0, 0.0
*NODE
1,
11,5.
401,,2.
411,5.,2.
*NGEN,NSET=BOT
1,11,1
*NGEN,NSET=TOP
401,411,1
*NFILL,NSET=NALL
BOT,TOP,4,100
*NSET, NSET=XFIX, GEN
1, 401, 100
*NSET, NSET=YFIX
1, 
*NSET, NSET=YFIX2
11, 
*NSET, NSET=XMOVE, GEN
11, 411, 100
*NSET, NSET=YMOVE, GEN
205, 207, 1
405, 407, 1
*ELEMENT,TYPE=CPE4,ELSET=EALL
1,1,3,203,201
*ELGEN,ELSET=EALL
1,5,2,1,2,200,5
*ELSET, ELSET=ESTAY
1,5,6,10
*ELSET, ELSET=EREMOV
2,3,4,7,8,9
*NSET,NSET=TRANS
YFIX, XFIX, YFIX2,XMOVE, YMOVE
*ORIENTATION, NAME=LOCAL, SYSTEM=RECT
1.0, 1.0, 0.0, -1.0, 1.0, 0.0
*ORIENTATION, NAME=LOCAL2, SYSTEM=RECT
1.0, -1.0, 0.0, 1.0, 1.0, 0.0
*TRANSFORM, NSET=TRANS, TYPE=R
1.0, 1.0, 0.0, -1.0, 1.0, 0.0
*SOLID SECTION,MATERIAL=MAT1,ELSET=ESTAY, ORIENTATION=LOCAL
1.,
*SOLID SECTION,MATERIAL=MAT1,ELSET=EREMOV, ORIENTATION=LOCAL2
1.,
*MATERIAL,NAME=MAT1
*ELASTIC
4064385.018,0.451566
*BOUNDARY
YFIX, 2, 2
XFIX, 1,1
YFIX2, 2,2
*STEP,NLGEOM
 COMPRESS ELEMENTS
*STATIC
0.1,1.,0.1,0.1
*BOUNDARY
XMOVE, 1,1 ,-0.1
*NODE PRINT, FREQ=99
U, 
RF, 
*EL PRINT, FREQ=99
E, 
S, 
*EL FILE, FREQ=99
E, S
*NODE FILE, FREQ=99
U,RF
*END STEP
*STEP,NLGEOM
REMOVE MIDDLE ELEMENTS
*STATIC
1.,1.
*MODEL CHANGE,REMOVE,TYPE=ELEMENT
EREMOV,
*END STEP
*STEP,NLGEOM
*STATIC
1.,1.
*BOUNDARY
YMOVE, 2,2, 0.0
*END STEP
*STEP,NLGEOM
 ADD ELEMENTS BACK IN
*STATIC
0.1,1.,0.1,0.1
*MODEL CHANGE,ADD,TYPE=ELEMENT
EREMOV, 
*BOUNDARY,OP=NEW
YFIX, 2, 2
XFIX, 1,1
YFIX2, 2,2
XMOVE, 1,1 , 0.1
*END STEP