*HEADING
: *DSLOAD, *DSFLUX, *SFILM, AND *SRADIATION FOR COUPLED TEMP-DISP  [S4RT]
*NODE
*NGEN,NSET=BOTTOM
*NGEN,NSET=TOP
*NGEN,NSET=LEFT
*NGEN,NSET=RIGHT
*NSET,NSET=ALL,GENERATE
*NSET,NSET=COR
*ELEMENT,TYPE=S4RT, ELSET=EALL
*surface, NAME=TOP
 1,SPOS
*surface, NAME=BOT
 1,SNEG
*SHELL SECTION,MATERIAL=A1, ELSET=EALL
2.        , 3
*PHYSICAL CONSTANTS, ABSOLUTE ZERO=-460., STEFAN BOLTZMANN=5.E-08
*MATERIAL,NAME=A1
*ELASTIC
3.E6      , 0.3
*CONDUCTIVITY
 3.77E-5,
*SPECIFIC HEAT
 .39,
*DENSITY
 82.9,
*STEP
*COUPLED TEMPERATURE-DISPL, STEADY STATE
*BOUNDARY, OP=NEW
 ALL, 1,6
 COR, 11
*DSFLUX, OP=NEW
 TOP, S, .3
*OUTPUT,HISTORY,FREQUENCY=1
*ENERGY OUTPUT,VARIABLE=PRESELECT
*OUTPUT,FIELD
*ELEMENT OUTPUT
LOADS,
*OUTPUT,FIELD
*NODE OUTPUT
RF,
NT,
RFL,
*EL PRINT
 LOADS,
*NODE PRINT
 RF,
 NT,
 RFL,
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL, STEADY STATE
*BOUNDARY,OP=NEW
 ALL, 1,6
 COR, 13
*DSFLUX, OP=NEW
*SFILM, OP=NEW
 BOT, F, 75., .103
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL, STEADY STATE
*BOUNDARY,OP=NEW
 ALL, 1,6
 COR, 13
*SFILM, OP=NEW
 BOT, F, 75., .103
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL, STEADY STATE
*BOUNDARY, OP=NEW
 ALL,1,1, .0000001
 ALL,2,2, .00000005
 ALL,3,6
 COR, 11
*SFILM, OP=NEW
 TOP, F, 75., .103
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL, STEADY STATE
*BOUNDARY,OP=NEW
 ALL, 1,6
 COR, 13
*SFILM, OP=NEW
*SRADIATE, OP=NEW
 BOT, R, 75., 2.E-07
*DSLOAD, OP=NEW
 BOT,HP,3000.,7.,0.
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL, STEADY STATE
*BOUNDARY, OP=NEW
 ALL, 1,6
 COR, 11
*DSLOAD, OP=NEW
BOT,P,1000.
*SRADIATE, OP=NEW
 TOP, R, 75., 2.E-07
*END STEP