*HEADING
C3D8R ELEMENTS: MODEL CHANGE VERIFICATION, ELASTIC MATERIAL
*RESTART,WRITE
*PREPRINT,MODEL=YES,HISTORY=NO
**
**
*NODE,NSET=NALL
1,0,0,0
2,1,0,0
3,1,1,0
4,0,1,0
5,0,0,1
6,1,0,1
7,1,1,1
8,0,1,1
9,2,0,0
10,2,1,0
11,2,0,1
12,2,1,1
**
21,3,0,0
22,4,0,0
23,4,1.03,0
24,3,1.03,0
25,3,0,1
26,4,0,1
27,4,1.03,1
28,3,1.03,1
29,5,0,0
30,5,1.03,0
31,5,0,1
32,5,1.03,1
*NSET,NSET=BOT
1,2,9,5,6,11,21,22,29,25,26,31
*NSET,NSET=TIP
4,3,10,8,7,12,24,23,30,28,27,32
*NSET,NSET=DEFBC
24,23,30,28,27,32
*ELEMENT,TYPE=C3D8R,ELSET=TEST1
1,1,2,3,4,5,6,7,8
2,2,9,10,3,6,11,12,7
3,21,22,23,24,25,26,27,28
4,22,29,30,23,26,31,32,27
*ELSET,ELSET=REFER
1,2
*ELSET,ELSET=TEST
3,4
**
**
**
*ELSET,ELSET=EALL
TEST,REFER
*SOLID SECTION,MATERIAL=ELAS,ELSET=EALL
*MATERIAL,NAME=ELAS
*ELASTIC
1.E10, .25
*EXPANSION
1.E-3, 
*DENSITY
8.E3, 
*INITIAL CONDITIONS,TYPE=TEMPERATURE
NALL,70.,0.
*AMPLITUDE,NAME=RAMP
0.,0.,1.,1.
**
**
*STEP,NLGEOM
 STEP #1: DISPLACE TEST SPECIMEN SO FINAL SHAPE IS
          IDENTICAL TO INITIAL SHAPE OF REFERENCE ELEMENT 
*STATIC
0.25,1.
*PRINT,MODEL CHANGE=YES
*BOUNDARY,OP=NEW
BOT,PINNED
DEFBC,2,2,-0.03
DEFBC,1,1,0.0
DEFBC,3,3,0.0
**MIDSIDE,2,2,-0.015
**MIDSIDE,1,1,0.0
**MIDSIDE,3,3,0.0
*NODE PRINT,FREQ=999
RF, 
*EL PRINT,POSITION=CENTROID,FREQ=999
S, 
E, 
*NODE FILE,FREQ=999
RF, 
*EL FILE,POSITION=CENTROID,FREQ=999
E, 
S, 
*END STEP
**
**
*STEP,NLGEOM
 STEP #2: REMOVE TEST ELEMENTS
*STATIC
1.,1.
*MODEL CHANGE,REMOVE,TYPE=ELEMENT
TEST,
*END STEP
**
**
*STEP,NLGEOM
 STEP #3: ADD TEST ELEMENTS BACK IN STRAIN-FREE
*STATIC
1.,1.
*MODEL CHANGE,ADD=STRAINFREE,TYPE=ELEMENT
TEST, 
*BOUNDARY,OP=NEW
BOT,PINNED
*END STEP
**
**
*STEP,NLGEOM
 STEP #4: APPLY LOAD TO BOTH ELEMENTS 
*STATIC
0.25,1.
*DLOAD
TEST, GRAV,150.,0.,1.,0.
REFER,GRAV,150.,0.,1.,0.
*END STEP
**
**
*STEP,NLGEOM
 STEP #5: APPLY DLOAD TYPE BX
*STATIC
.25,1.0
*DLOAD, OP=NEW
TEST, BX, 150.
REFER, BX, 150. 
*END STEP
**
**
*STEP,NLGEOM
 STEP #6: APPLY DLOAD TYPE BY
*STATIC
.25,1.0
*DLOAD, OP=NEW
TEST, BY, 150.
REFER,BY, 150.
*END STEP
**
**
*STEP,NLGEOM
 STEP #7: APPLY DLOAD TYPE BZ
*STATIC
.25,1.0
*DLOAD, OP=NEW
TEST, BZ, 150.
REFER,BZ, 150.
*END STEP
**
**
*STEP,NLGEOM
 STEP #8: APPLY DLOAD TYPE HP1
*STATIC
.25,1.0
*DLOAD, OP=NEW
TEST, HP1, 1.E3, 2., 0. 
REFER, HP1, 1.E3, 2., 0.
*END STEP
**
**
*STEP,NLGEOM
 STEP #8: APPLY DLOAD TYPE HP2
*STATIC
.25,1.0
*DLOAD, OP=NEW
TEST, HP2, 1.E3, 2., 0. 
REFER, HP2, 1.E3, 2., 0.
*END STEP
**
**
*STEP,NLGEOM
 STEP #9: APPLY DLOAD TYPE HP3
*STATIC
.25,1.0
*DLOAD, OP=NEW
TEST, HP3, 1.E3, 2., 0. 
REFER, HP3, 1.E3, 2., 0.
*END STEP
**
**
**
*STEP,NLGEOM
 STEP #10: APPLY DLOAD TYPE HP4
*STATIC
.25,1.0
*DLOAD, OP=NEW
TEST, HP4, 1.E3, 2., 0. 
REFER, HP4, 1.E3, 2., 0.
*END STEP
**
**
*STEP,NLGEOM
 STEP #11: APPLY DLOAD TYPE P1
*STATIC
.25,1.0
*DLOAD, OP=NEW
TEST, P1, 1.E3, 2., 0. 
REFER, P1, 1.E3, 2., 0.
*END STEP
**
**
*STEP,NLGEOM
 STEP #12: APPLY DLOAD TYPE P2
*STATIC
.25,1.0
*DLOAD, OP=NEW
TEST, P2, 1.E3, 2., 0. 
REFER, P2, 1.E3, 2., 0.
*END STEP
**
**
*STEP,NLGEOM
 STEP #13: APPLY DLOAD TYPE P3
*STATIC
.25,1.0
*DLOAD, OP=NEW
TEST, P3, 1.E3, 2., 0. 
REFER, P3, 1.E3, 2., 0.
*END STEP
**
**
**
*STEP,NLGEOM
 STEP #14: APPLY DLOAD TYPE P4
*STATIC
.25,1.0
*DLOAD, OP=NEW
TEST, P4, 1.E3, 2., 0. 
REFER, P4, 1.E3, 2., 0.
*END STEP
**
**
*STEP,NLGEOM
 STEP #15: APPLY DLOAD TYPE CENT
*STATIC
.25,1.0
*DLOAD, OP=NEW
TEST, CENT, 8.E3,0.,0.,0.,1.,0.,0. 
REFER, CENT, 8.E3,0.,0.,0.,1.,0.,0. 
*END STEP
**
**
*STEP,NLGEOM
 STEP #15: APPLY DLOAD TYPE CORIO
*STATIC
.25,1.0
*DLOAD, OP=NEW
TEST, CORIO, 8.E3,0.,0.,0.,1.,0.,0. 
REFER, CORIO, 8.E3,0.,0.,0.,1.,0.,0. 
*END STEP