*HEADING
 :  C3D8RHT MODEL CHANGE VERIFICATION
*NODE
   1,0.,0.,0.
  11,0.,5.,0.
 801,2.,0.,0.
 811,2.,5.,0.
1001,0.,0.,1.
1011,0.,5.,1.
1801,2.,0.,1.
1811,2.,5.,1.
*NGEN,NSET=BOT
1,11,1
1001,1011,1
*NGEN,NSET=TOP
801,811,1
1801,1811,1
*NFILL,NSET=NALL
BOT,TOP,8,100
*NSET, NSET=LHS, GEN
1, 801, 100
1001,1801,100
*NSET, NSET=RHS, GEN
11,811,100
1011,1811,100
*NSET,NSET=NMID,GEN
5,805,100
1005,1805,100
*NSET, NSET=PINNED
1, 1001
*ELEMENT,TYPE=C3D8RHT,ELSET=EALL
1,1,201,203,3,1001,1201,1203,1003
*ELGEN,ELSET=EALL
1,5,2,1,4,200,5
*ELSET,ELSET=ERHS
5,10,15,20
1005,1010,1015,1020
*ELSET, ELSET=EREM
3,4,5,8,9,10,13,14,15,18,19,20
*SOLID SECTION,MATERIAL=HEAT,ELSET=EALL
*MATERIAL,NAME=HEAT
*ELASTIC
100.00E4, 0.25
*EXPANSION
1.0E-6, 
*DENSITY
.2829, 
*CONDUCTIVITY
7.872E-4, 
*BOUNDARY
LHS,11
BOT, 1, 1
NALL, 3, 3
PINNED, 2, 2
*STEP
 APPLY FILM CONDITION TO RHS
*COUPLED TEMPERATURE-DISPLACEMENT,STEADY STATE
1.,1.
*FILM
ERHS,F5,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
NALL,3,3
*MODEL CHANGE,ADD,TYPE=ELEMENT
EREM, 
*FILM
ERHS,F5,200.,1.
*END STEP