*HEADING
**
** ABAQUS INPUT FILE UPGRADE: This input file was upgraded from
** version 5.8 or later to version 6.3 with 0 warning(s) and 1 
** error(s).
** 
** Search the input file for **ERROR.
: REBAR WITH *RESPONSE SPECTRUM [S8R5]
*RESTART,WRITE,FREQ=999
*NODE,NSET=ALL
1, 
2,10.
3,10.,10.
4,0.,10.
5,5.
6,10.,5.
7,5.,10.
8,0.,5.
*NSET,NSET=LEFT
1,4,8
*NSET,NSET=BOT
1,2,5
*ELEMENT,TYPE=S8R5,ELSET=SHELL
1, 1,2,3,4,5,6,7,8
*SHELL SECTION,MATERIAL=ELEMENT_MATERIAL, ELSET=SHELL
10.,3
**     **ERROR: The NAME parameter on *REBAR is now required. This parameter will need
**          to be added manually.
**
**
*REBAR LAYER
REBAR_SET-1,0.1,2.5,-2.5,REBAR_MATERIAL-1,0,1 
*MATERIAL,NAME=ELEMENT_MATERIAL
*ELASTIC
3.E6, 
*DENSITY
7.5E-4, 
*MATERIAL,NAME=REBAR_MATERIAL-1
*ELASTIC
30.E6, 
*DENSITY
7.5E-4, 
*NSET,NSET=RIGHT
2,3,6
*BOUNDARY
LEFT,1,6
RIGHT,4
RIGHT,6
*SPECTRUM,TYPE=DISPLACEMENT,NAME=TEST-SPECTRUM
 0,    0, 0.0
 2, 0.01, 0.0
 2, 1000, 0.0
 0,    0, 0.1
 1, 0.01, 0.1
 1, 1000, 0.1
** THIS ACTIVATES NT OUTPUT, FOR TESTING PURPOSES
*INITIAL CONDITIONS,TYPE=TEMPERATURE
ALL,10.
*STEP
*FREQUENCY,EIGENSOLVER=SUBSPACE
5, 
*EL FILE
 S,
 E,
*EL FILE,REBAR=REBAR_SET-1
 S,E
 ENER,
*EL PRINT
 S,
 E,
*EL PRINT,REBAR=REBAR_SET-1
 S,E
 SENER,
*NODE PRINT
 U,
 RF,
*NODE FILE
 U, RF,
*OUTPUT,FIELD
*ELEMENT OUTPUT,VAR=PRESELECT
** CRITICAL QA: TEST NODAL VARIABLE=ALL IN *FREQUENCY
*NODE OUTPUT,VARIABLE=ALL
*OUTPUT,HISTORY
*END STEP
*STEP
 DISPLACEMENT SPECTRUM
*RESPONSE SPECTRUM
TEST-SPECTRUM,0.,0.,1.,1.
*SELECT EIGENMODES
1,2,3
*modal damping, modal=direct
 1,3,0.02
*ENERGY PRINT
*MODAL PRINT
GU, 
SNE,KE,T
*MODAL FILE
GU, 
SNE,KE,T
*OUTPUT,FIELD,VAR=PRESELECT
*OUTPUT,HISTORY,VAR=PRESELECT
*END STEP