*HEADING
 Thermal stress analysis with substructures
 Uses substructure generation file psupthm1_gen.inp
*NODE,NSET=NALL
101,0.,0.
201,0.,1.
301,0.,2.
401,0.,3.
501,0.,4.
511,20.,4.
*NSET,NSET=FIXED
101,201,301,401,501
*NSET,NSET=TIP
511, 
*ELEMENT,TYPE=Z100,ELSET=EALL,FILE=psupthm1_gen
1,101,201,301,401,501,511
*SUBSTRUCTURE PROPERTY,ELSET=EALL
*INITIAL CONDITIONS,TYPE=TEMPERATURE
NALL,0.
*AMPLITUDE,NAME=RAMPED
0.0,0.0, 1.0,1.0
*STEP
*STATIC
1.0,1.0
*BOUNDARY
FIXED,1,2
*SLOAD,OP=NEW,AMPLITUDE=RAMPED
EALL,TEMP,100.
*NODE PRINT,SUMMARY=NO,NSET=TIP
U, 
*OUTPUT,FIELD,VAR=PRESELECT
*SUBSTRUCTURE PATH,ENTER ELEMENT=1
*OUTPUT,FIELD,VAR=PRESELECT
*EL FILE
S, 
E, 
TEMP, 
*NODE FILE
U, 
*EL PRINT
S, 
E, 
TEMP, 
*NODE PRINT
U, 
*SUBSTRUCTURE PATH,LEAVE
*END STEP