*HEADING
 :  CPEG8T MODEL CHANGE VERIFICATION
*NODE
1,
11,0.,5.
801,2.
811,2.,5.
*NODE,NSET=REFND
998,0.,0.
*NGEN,NSET=BOT
1,11,1
*NGEN,NSET=TOP
801,811,1
*NFILL,NSET=NALL
BOT,TOP,8,100
*NSET, NSET=LHS, GEN
1, 801, 100
*NSET, NSET=RHS, GEN
11,811,100
*NSET,NSET=NMID,GEN
5,805,100
*NSET, NSET=PINNED
1, 
*ELEMENT,TYPE=CPEG8T,ELSET=EALL
1,1,201,203,3, 101,202,103,2
*ELGEN,ELSET=EALL
1,5,2,1,4,200,5
*ELSET,ELSET=ERHS
5,10,15,20
*ELSET, ELSET=EREM
 3, 4, 5, 8, 9,10,13,14,15,18,19,20
*SOLID SECTION,MATERIAL=HEAT,ELSET=EALL,REFNODE=REFND
1.,
*MATERIAL,NAME=HEAT
*ELASTIC
100.00E4, 0.25
*EXPANSION
1.0E-6, 
*DENSITY
.2829, 
*CONDUCTIVITY
7.872E-4, 
*BOUNDARY
LHS,11
BOT, 1, 1
PINNED, 2, 2
REFND,3,5
*STEP
 APPLY FILM CONDITION TO RHS
*COUPLED TEMPERATURE-DISPLACEMENT,STEADY STATE
1.,1.
*FILM
ERHS,F3,100.,1.
*NODE PRINT
RF, 
U, 
NT11,
*EL PRINT
E,
S,
HFL, 
*NODE FILE, FREQ=99
U,RF, NT
*EL FILE, FREQ=99
HFL, S, E
*END STEP
*STEP
REMOVE RIGHT HAND SIDE ELEMENTS
*COUPLED TEMPERATURE-DISPLACEMENT,STEADY STATE
1.,1.
*MODEL CHANGE,REMOVE,TYPE=ELEMENT
EREM, 
*BOUNDARY,FIXED
NMID,11
*END STEP
*STEP
REPLACE RIGHT HAND SIDE ELEMENTS
*COUPLED TEMPERATURE-DISPLACEMENT,STEADY STATE
.25,1.
*BOUNDARY,OP=NEW
LHS,11
BOT, 1, 1
PINNED, 2, 2
REFND,3,5
*MODEL CHANGE,ADD,TYPE=ELEMENT
EREM, 
*FILM
ERHS,F3,200.,1.
*END STEP