*HEADING
: RADIAL REBAR IN SUBSTRUCTURE [SAX1]
SUBSTRUCTURE GENERATION FILE psupreb2_gen1.inp HAS TO BE RUN FIRST.
*PREPRINT,ECHO=YES,HISTORY=NO,MODEL=NO
*RESTART,WRITE
*NODE,NSET=ALL
1, 
3,10.
*ELEMENT,TYPE=Z1,ELSET=SUPER, FILE=psupreb2_gen1
1,1,3
*SUBSTRUCTURE PROPERTY,ELSET=SUPER
*STEP,PERTURBATION
*STATIC
*SLOAD
SUPER,CLOAD,1.0
*BOUNDARY
ALL,2
1,1
*OUTPUT,FIELD,VAR=PRESELECT
*SUBSTRUCTURE PATH,ENTER ELEMENT=1
*OUTPUT,FIELD,VAR=PRESELECT
*EL FILE,REBAR
 S,E
*NODE FILE
 U,RF,COORD
*EL PRINT,REBAR
 S,E
*NODE PRINT
 U,RF,
 COORD,
*SUBSTRUCTURE PATH,LEAVE
*END STEP