*HEADING
EC28DFDJ: *DSFLUX, *SFILM, AND *SRADIATION FOR HEAT TRANSFER ELEMENTS  [DC2D8]
*RESTART,WRITE
*NODE,NSET=ALL
 1, 0.
 2, 7.
 3, 7., 7.
 4, 0., 7.
 5, 3.5, 0.
 6, 7., 3.5
 7, 3.5, 7.
 8, 0., 3.5
*NSET,NSET=FIX1
 1,2,5
*NSET,NSET=FIX2
 2,3,6
*NSET,NSET=FIX3
 3,4,7
*NSET,NSET=FIX4
 1,4,8
*ELEMENT,TYPE=DC2D8, ELSET=EALL
 1,1,2,3,4,5,6,7,8
*surface, NAME=SIDE_1
 1, S1
*surface, NAME=SIDE_2
 1, S2
*surface, NAME=SIDE_3
 1, S3
*surface, NAME=SIDE_4
 1, S4
*SOLID SECTION,MATERIAL=A1, ELSET=EALL
*surface,NAME=SIDE
1,S3
*PHYSICAL CONSTANTS, ABSOLUTE ZERO=-460., STEFAN BOLTZMAN=5E-8
*MATERIAL,NAME=A1
*CONDUCTIVITY
 3.77E-5, 
*SPECIFIC HEAT
 .39, 
*DENSITY
 82.9, 
*BOUNDARY
 FIX1, 11
*STEP
*HEAT TRANSFER,STEADY STATE
*NODE PRINT
 NT,RFL
*OUTPUT,FIELD
*NODE OUTPUT
 NT,RFL
*EL PRINT,FREQ=0
*OUTPUT,FIELD
*ELEMENT OUTPUT
*DFLUX,OP=NEW
 1, BF, .3
*SECTION PRINT, NAME=SID34,SURFACE=SIDE,AXES=LOCAL
 ,3.5,7,0.
 ,0,7.0,
SOH,SOAREA
*SECTION FILE, NAME=SID34,SURFACE=SIDE,AXES=LOCAL
 ,3.5,7,0.
 ,0,7.0,
SOH,SOAREA
*OUTPUT,FIELD
*NODE OUTPUT
 NT,RFL
*OUTPUT,HISTORY
*NODE OUTPUT,NSET=ALL
 NT,RFL
*END STEP
*STEP
*HEAT TRANSFER, STEADY STATE
*BOUNDARY,OP=NEW
 FIX3,11
*SRADIATE,OP=NEW
*DFLUX,OP=NEW
*DSFLUX,OP=NEW
 SIDE_1, S, .3
*END STEP
*STEP
*HEAT TRANSFER, STEADY STATE
*BOUNDARY,OP=NEW
 FIX4,11
*DSFLUX,OP=NEW
 SIDE_2, S, .3
*END STEP
*STEP
*HEAT TRANSFER, STEADY STATE
*BOUNDARY,OP=NEW
 FIX1,11
*DSFLUX,OP=NEW
 SIDE_3, S, .3
*END STEP
*STEP
*HEAT TRANSFER, STEADY STATE
*BOUNDARY,OP=NEW
 FIX2,11
*DSFLUX,OP=NEW
 SIDE_4, S, .3
*END STEP
*STEP
*HEAT TRANSFER,STEADY STATE
*SFILM,OP=NEW
 SIDE_1, F, 75., .103
*BOUNDARY,OP=NEW
 FIX3, 11
*DSFLUX,OP=NEW
*END STEP
*STEP
*HEAT TRANSFER,STEADY STATE
*SFILM,OP=NEW
 SIDE_2, F, 75., .103
*BOUNDARY,OP=NEW
 FIX4, 11
*END STEP
*STEP
*HEAT TRANSFER, STEADY STATE
*DSFLUX,OP=NEW
*SFILM,OP=NEW
 SIDE_3, F, 75., .103
*BOUNDARY,OP=NEW
 FIX1, 11
*END STEP
*STEP
*HEAT TRANSFER,STEADY STATE
*SFILM,OP=NEW
 SIDE_4, F, 75., .103
*BOUNDARY,OP=NEW
 FIX2, 11
*END STEP
*STEP
*HEAT TRANSFER, STEADY STATE
*SRADIATE, OP=NEW
 SIDE_1, R, 75., 1.E-6
*BOUNDARY,OP=NEW
 FIX3, 11
*SFILM,OP=NEW
*END STEP
*STEP
*HEAT TRANSFER, STEADY STATE
*SRADIATE, OP=NEW
 SIDE_2, R, 75., 1.E-6
*BOUNDARY,OP=NEW
 FIX4, 11
*END STEP
*STEP
*HEAT TRANSFER, STEADY STATE
*SRADIATE,OP=NEW
 SIDE_3, R, 75., 1.E-6
*BOUNDARY,OP=NEW
 FIX1, 11
*END STEP
*STEP
*HEAT TRANSFER, STEADY STATE
*SRADIATE,OP=NEW
 SIDE_4, R, 75., 1.E-6
*BOUNDARY,OP=NEW
 FIX2, 11
*END STEP