*HEADING
 CONTINUUM ELEMENTS: MODEL CHANGE VERIFICATION, ELASTIC MATERIAL
 WITH ORIENTATION
*RESTART,WRITE
*PREPRINT,MODEL=YES,HISTORY=NO
**
** TEST 23: CPE4H
**
*NODE,NSET=NALL
*NSET,NSET=LEFT
*NSET,NSET=MID
*NSET,NSET=RIGHT
*NSET,NSET=TIP
*ELEMENT,TYPE=CPE4H,ELSET=TEST23
*ELSET,ELSET=REFER
*ELSET,ELSET=TEST
**
**  REMAINDER OF INPUT DECK SAME FOR ALL TESTS
**
*SOLID SECTION,MATERIAL=ELASR,ELSET=REFER,ORIENTATION=ELASR
1.0,
*ORIENTATION,NAME=ELASR,SYSTEM=CYLINDRICAL
*MATERIAL,NAME=ELASR
*ELASTIC,TYPE=ENGINEERING CONSTANTS
 1.e6, 1.1e6, 1.2e6,0.21,0.22,0.25,4.13e5,4.5e5
 4.8e5
*EXPANSION
 1.E-6,
*DENSITY
 1.E-4,
*SOLID SECTION,MATERIAL=ELAST,ELSET=TEST,ORIENTATION=ELAST
 1.0,
*ORIENTATION,NAME=ELAST,SYSTEM=CYLINDRICAL
*MATERIAL,NAME=ELAST
*ELASTIC,TYPE=ENGINEERING CONSTANTS
 1.e6, 1.1e6, 1.2e6,0.21,0.22,0.25,4.13e5,4.5e5
 4.8e5
*EXPANSION
 1.E-6,
*DENSITY
 1.E-4,
*INITIAL CONDITIONS,TYPE=TEMPERATURE
NALL,70.
*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
LEFT,1,2
RIGHT,1,1,-1.0
RIGHT,2,2, 0.2
MID,1,1,-0.5
MID,2,2, 0.1
*NODE PRINT,FREQ=999
RF,
*EL PRINT,FREQ=999
S,E
*OUTPUT,HISTORY,VARIABLE=PRESELECT
*OUTPUT,FIELD,FREQ=999
*ELEMENT OUTPUT
E,S
*NODE OUTPUT
U,
RF,
*END STEP
**
**
*STEP
 STEP #2: REMOVE TEST ELEMENTS
*STATIC
1.,1.
*MODEL CHANGE,REMOVE,TYPE=ELEMENT
TEST,
*END STEP
**
**
*STEP
 STEP #3: ADD TEST ELEMENTS BACK IN STRAIN-FREE
*STATIC
1.,1.
*MODEL CHANGE,ADD=STRAINFREE,TYPE=ELEMENT
TEST,
*BOUNDARY,OP=NEW
LEFT,1,2
*END STEP
**
**
*STEP
 STEP #4: APPLY LOAD TO BOTH ELEMENTS
*STATIC
0.1,1.
*DLOAD
TEST,P4,-0.25
REFER,P4,-0.25
*END STEP
**
**
*STEP
 STEP #5: REMOVE TEST ELEMENT
*STATIC
.1,1.0
*MODEL CHANGE,REMOVE,TYPE=ELEMENT
TEST,
*END STEP
**
**
*STEP
 STEP #6: ADD TEST ELEMENTS BACK IN WITH-STRAIN
*STATIC
.1,1.0
*MODEL CHANGE,ADD=WITHSTRAIN,TYPE=ELEMENT
TEST,
*END STEP
**
**
*STEP
 STEP #7: APPLY THERMAL LOAD
*STATIC
.1,1.0
*BOUNDARY,OP=NEW,FIXED
TIP,1
LEFT,1,2
*TEMPERATURE
NALL,100.
*EL PRINT,FREQ=999
S,THE,TEMP
*OUTPUT,HISTORY,VARIABLE=PRESELECT,FREQ=1
*OUTPUT,FIELD,FREQ=999
*ELEMENT OUTPUT
E,S,THE,TEMP
*NODE OUTPUT
U,
RF,
*END STEP
**
**
*STEP
 STEP #8: FREQUENCY EXTRACTION
*FREQUENCY, eigensolver=lanczos, SIM=NO
32, ,
*BOUNDARY,OP=NEW
LEFT,1,2
*EL PRINT,FREQ=0
*NODE PRINT,FREQ=0
*OUTPUT,FIELD,FREQ=0
*END STEP
**
**
*STEP,PERTURBATION
 STEP #9: MODAL DYNAMIC
*MODAL DYNAMIC
.0004,.004
*CLOAD
TIP,2,0.2
*NODE PRINT,FREQ=999
RF,
*EL PRINT,FREQ=999
S,E
*OUTPUT,FIELD,FREQ=999
*NODE OUTPUT
RF,
*ELEMENT OUTPUT
E,S
*END STEP
**
**
*STEP,PERTURBATION
 STEP #10: STEADY-STATE DYNAMICS, MODAL BASED
*STEADY STATE DYNAMICS,INTERVAL=RANGE
1000., 10000., 5
*CLOAD
TIP,2,0.2
*NODE PRINT,FREQ=999
RF,
*EL PRINT,FREQ=999
S,E
*OUTPUT,HISTORY,VARIABLE=PRESELECT
*OUTPUT,FIELD,FREQ=1
*ELEMENT OUTPUT
E,S,
*NODE OUTPUT
U,
RF,
*END STEP
**
**
*STEP,PERTURBATION
 STEP #11: STEADY-STATE DYNAMICS, DIRECT
*STEADY STATE DYNAMICS,DIRECT
1000., 10000., 5
*BOUNDARY,OP=NEW
LEFT,1,2
*CLOAD
TIP,2,0.2
*NODE PRINT,FREQ=999
RF,
*EL PRINT,FREQ=999
S,E
*OUTPUT,FIELD,FREQ=999
*NODE OUTPUT
RF,
*END STEP
**
**
*STEP,PERTURBATION
 STEP #12: STEADY-STATE DYNAMICS,SUBSPACE PROJECTION
*STEADY STATE DYNAMICS,SUBSPACE PROJECTION,INTERVAL=RANGE
1000., 10000., 5
*CLOAD
TIP,2,0.2
*NODE PRINT,FREQ=999
RF,
*EL PRINT,FREQ=999
S,E
*END STEP
**
**
*STEP
 STEP #13: DYNAMICS
*DYNAMIC
.0004, .004
*BOUNDARY,OP=NEW
LEFT,1,2
*EL PRINT,FREQ=999
S,E
*NODE PRINT,FREQ=999
RF,
*CLOAD,AMP=RAMP
TIP,2,0.2
*END STEP