*HEADING
: *DSLOAD, *DSFLUX, *SFILM, AND *SRADIATION FOR COUPLED TEMP-DISP  [S4RT]
*NODE
1    , 0.        , 0.
3    , 7.        , 0.
7    , 0.        , 7.
9    , 7.        , 7.
*NGEN,NSET=BOTTOM
1    , 3
*NGEN,NSET=TOP
7    , 9
*NGEN,NSET=LEFT
1    , 7    , 3
*NGEN,NSET=RIGHT
3    , 9    , 3
*NSET,NSET=ALL,GENERATE
1    , 9
*NSET,NSET=COR
1,3,9,7
*ELEMENT,TYPE=S4RT, ELSET=EALL
1    , 1    , 3    , 9    , 7
*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
 1., 1
*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
 1., 1.
*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
 1., 1.
*BOUNDARY,OP=NEW
 ALL, 1,6
 COR, 13
*SFILM, OP=NEW
 BOT, F, 75., .103
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL, STEADY STATE
 .00000001, .00000001
*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
 1., 1.
*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
 1., 1.
*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