*HEADING
: *DSLOAD, *DSFLUX, *SFILM, AND *SRADIATION FOR COUPLED TEMP-DISP  [CPEG3HT]
*NODE,NSET=ALL
 1, 1.
 2, 8.
 3, 8.,7.
 4, 1.,7.
*NODE,NSET=CENTER
 5, 4.5,3.5
*NODE,NSET=XTRA
 998,0.,0.
*NSET,NSET=FIX1
 1,2
*NSET,NSET=FIX2
 2,3
*NSET,NSET=FIX3
 3,4
*NSET,NSET=FIX4
 1,4
*NSET,NSET=ALLOUT
 ALL,XTRA
*ELEMENT, TYPE=CPEG3HT, ELSET=EALL
 1, 1,2,5
 2, 2,3,5
 3, 3,4,5
 4, 4,1,5
*surface, NAME=SIDE_1
 1, S1
*surface, NAME=SIDE_2
 2, S1
*surface, NAME=SIDE_3
 3, S1
*surface, NAME=SIDE_4
 4, S1
*SOLID SECTION,MATERIAL=A1, ELSET=EALL, REFNODE=XTRA
*PHYSICAL CONSTANTS, ABSOLUTE ZERO=-460., STEFAN BOLTZMANN=5.E-08
*MATERIAL,NAME=A1
*ELASTIC
 30.E6, .3
*EXPANSION
 0., 
*CONDUCTIVITY
 3.77E-5, 
*SPECIFIC HEAT
 .39, 
*DENSITY
 82.9, 
*EQUATION
 5, 
 5,1,-4.0, 1,1, 1.0, 2,1, 1.0, 3,1, 1.0, 
 4,1, 1.0,
 5, 
 5,2,-4.0, 1,2, 1.0, 2,2, 1.0, 3,2, 1.0, 
 4,2, 1.0,
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
 1., 1.
*BOUNDARY, OP=NEW
 ALL, 1,2
 FIX3, 11
 998,3,5
*DSFLUX,OP=NEW
 SIDE_1, S, .3
*ENERGY FILE
*OUTPUT,HISTORY,FREQUENCY=1
*ENERGY OUTPUT,VARIABLE=PRESELECT
*EL FILE
 LOADS,FLUXS
 FILM,RAD
*NODE FILE,NSET=ALLOUT
 RF, 
 NT, 
 RFL, 
*OUTPUT,FIELD
*NODE OUTPUT
 RF,
 NT,
 RFL,
*EL PRINT
 LOADS,FLUXS
 FILM,RAD
*NODE PRINT
 RF, 
 NT, 
 RFL, 
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
 1., 1.
*BOUNDARY, OP=NEW
 ALL, 1,2
 FIX3, 11 
 998,3,5
*DSFLUX,OP=NEW
 SIDE_1, S, .3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
 .000001, .000001
*BOUNDARY, OP=NEW
 ALL, 1, 1, .00001
 ALL, 2, 2, .000005
 FIX4, 11
 998,3,5
*DFLUX,OP=NEW
 2, S1, .3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
 1., 1.
*BOUNDARY, OP=NEW
 ALL, 1,2
 FIX1, 11
 998,3,5
*DSLOAD,OP=NEW
 SIDE_1, P, 100.
 SIDE_2, P, 200.
 SIDE_3, P, 300.
 SIDE_4, P, 400.
*DSFLUX,OP=NEW
 SIDE_3, S, .3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
 1., 1.
*BOUNDARY, OP=NEW
 ALL, 1,2
 FIX2, 11
 998,3,5
*DSLOAD,OP=NEW
 SIDE_1, HP, 3000., 3., 0.
*DSFLUX,OP=NEW
 SIDE_4, S, .3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
 1., 1.
*BOUNDARY, OP=NEW
 ALL, 1,2
 FIX3, 11
 998,3,5
*DSLOAD, OP=NEW
 SIDE_2, HP, 3000., 3., 0.
*DSFLUX,OP=NEW
*SFILM
 SIDE_1, F, 75., .103
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
 1., 1.
*DSLOAD, OP=NEW
 SIDE_3, HP, 3000., 3., 0.
*SFILM,OP=NEW
 SIDE_2, F, 75., .103
*BOUNDARY,OP=NEW
 ALL, 1,2
 FIX4, 11
 998,3,5
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
 1., 1.
*DSLOAD, OP=NEW
 SIDE_4, HP, 3000., 3., 0.
*SFILM,OP=NEW
 SIDE_3, F, 75., .103
*BOUNDARY,OP=NEW
 ALL, 1,2
 FIX1, 11
 998,3,5
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
 1., 1.
*DSLOAD, OP=NEW
*SFILM,OP=NEW
 SIDE_4, F, 75., .103
*BOUNDARY,OP=NEW
 ALL, 1,2
 FIX2, 11
 998,3,5
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
 1., 1.
*SFILM,OP=NEW
*SRADIATE, OP=NEW
 SIDE_1, R, 75., 1.E-06
*BOUNDARY,OP=NEW
 ALL, 1,2
 FIX3, 11
 998,3,5
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
 1., 1.
*SRADIATE, OP=NEW
 SIDE_2, R, 75., 1.E-06
*BOUNDARY,OP=NEW
 ALL, 1,2
 FIX4, 11
 998,3,5
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
 1., 1.
*SRADIATE, OP=NEW
 SIDE_3, R, 75., 1.E-06
*BOUNDARY,OP=NEW
 ALL, 1,2
 FIX1, 11
 998,3,5
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
 1., 1.
*SRADIATE,OP=NEW
 SIDE_4, R, 75., 1.E-06
*BOUNDARY,OP=NEW
 ALL, 1,2
 FIX2, 11
 998,3,5
*END STEP