*HEADING
ELEMENT TESTED      : S4R
SECONDARY SURFACE TYPE  : NODE
MAIN SURFACE TYPE : NODE
TEST MODEL CHANGE OPTION
**
*PREPRINT, ECHO=YES, MODEL=YES, HISTORY=YES
*NODE
      1,           0.,          30.
      2,          15.,          15.
      3,          25.,          25.
      4,           0.,          50.
      5,           0.,          10.
      6,           5.,           5.
      7,          30.,           0.
      8,          50.,           0.
      9,          10.,           0.
*ELEMENT, TYPE=S4R, ELSET=EALL
1, 1, 2, 3, 4
2, 2, 1, 5, 6
3, 2, 7, 8, 3
4, 7, 2, 6, 9
*NSET, NSET=NBC
 5, 6, 9
*NSET, NSET=NSECONDARY, GENERATE
 7,  9,  1
*NSET, NSET=NMAIN
 1, 4, 5
*SURFACE, NAME=SSECONDARY, TYPE=NODE
NSECONDARY,
*SURFACE, NAME=SMAIN, TYPE=NODE
NMAIN,
*SHELL SECTION, ELSET=EALL,MATERIAL=MAT
1., 
*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
*BOUNDARY
NBC, 1,6, 0
*STEP
REMOVE ELEMENT WITH MODEL CHANGE OPTION
*STATIC
0.1, 1.0
*MODEL CHANGE, TYPE=ELEMENT, REMOVE
4,
*CLOAD
8, 1, 1E6
*OUTPUT, FIELD, FREQUENCY=0
*END STEP
**
*STEP
ADD THE ELEMENT BACK
*STATIC
0.1, 1.0
*MODEL CHANGE, TYPE=ELEMENT, ADD
4,
*END STEP
**
*STEP
PERFORM A FREQUENCY EXTRACTION
*FREQUENCY, EIGENSOLVER=LANCZOS, SIM=NO
14
*END STEP