*HEADING
ECA8TYDK: *DSLOAD, *DSFLUXD, *SFILM, AND *SRADIATION FOR COUPLED TEMP-DISP  [CAX8RHT]
*NODE,NSET=ALL
1,1.,0.
2,8.,0.
3,8.,7.
4,1.,7.
5,4.5,0.
6,8.,3.5
7,4.5,7.
8,1.,3.5
*NSET,NSET=FIX1
1,2
*NSET,NSET=FIX2
2,3
*NSET,NSET=FIX3
3,4
*NSET,NSET=FIX4
1,4
*ELEMENT,TYPE=CAX8RHT, 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, ORIENTATION=ORI
*PHYSICAL CONSTANTS, ABSOLUTE ZERO=-460., STEFAN BOLTZMANN=5.E-08
*MATERIAL,NAME=A1
*ELASTIC
30.E6,0.3
*EXPANSION
0., 
*CONDUCTIVITY
3.77E-5, 
*SPECIFIC HEAT
.39, 
*DENSITY
82.9, 
*INITIAL CONDITIONS,TYPE=VELOCITY
ALL,1,10.
ALL,2,5.
*ORIENTATION,NAME=ORI
1.,0.,0.,0.,1.,0.
3,0.
*STEP
*COUPLED TEMPERATURE-DISPL,STEADY STATE
1.,1.
*BOUNDARY,OP=NEW
ALL,1,2
FIX3,11
*DSFLUX,OP=NEW
SIDE_1,S,.3
*ENERGY FILE
*EL FILE
 LOADS,FLUXS
 FILM,RAD
*NODE FILE
 RF, 
 NT, 
 RFL, 
*EL PRINT
 LOADS,FLUXS
 FILM,RAD
*NODE PRINT
 RF, 
 NT, 
 RFL, 
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL,STEADY STATE
1.,1.
*BOUNDARY,OP=NEW
ALL,1,2
FIX3,11
*DSFLUX,OP=NEW
SIDE_1,S,.3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT,STEADY STATE
1.,1.
*BOUNDARY,OP=NEW
ALL,1,2
FIX4,11
*DSLOAD,OP=NEW
SIDE_1,P,100.
SIDE_2,P,200.
SIDE_3,P,300.
SIDE_4,P,400.
*DSFLUX,OP=NEW
SIDE_2,S,.3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL,STEADY STATE
1.,1.
*BOUNDARY,OP=NEW
ALL,1,2
FIX1,11
*DSLOAD,OP=NEW
SIDE_1,HP,3000.,3.,0.
*DSFLUX,OP=NEW
SIDE_3,S,.3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL,STEADY STATE
1.,1.
*BOUNDARY,OP=NEW
ALL,1,2
FIX2,11
*DSLOAD,OP=NEW
SIDE_2,HP,3000.,3.,0.
*DSFLUX,OP=NEW
SIDE_4,S,.3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL,STEADY STATE
1.,1.
*DSLOAD,OP=NEW
SIDE_3,HP,3000.,3.,0.
*DSFLUX,OP=NEW
*SFILM,OP=NEW
SIDE_1,F,75.,.103
*BOUNDARY,OP=NEW
ALL,1,2
FIX3,11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL,STEADY STATE
1.,1.
*DSLOAD,OP=NEW
SIDE_4,HP,3000.,3.,0.
*SFILM,OP=NEW
SIDE_2,F,75.,.103
*BOUNDARY,OP=NEW
ALL,1,2
FIX4,11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL,STEADY STATE
1.,1.
*DSLOAD,OP=NEW
*SFILM,OP=NEW
SIDE_3,F,75.,.103
*BOUNDARY,OP=NEW
ALL,1,2
FIX1,11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL,STEADY STATE
1.,1.
*SFILM,OP=NEW
SIDE_4,F,75.,.103
*BOUNDARY,OP=NEW
ALL,1,2
FIX2,11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL,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
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL,STEADY STATE
1.,1.
*SRADIATE,OP=NEW
SIDE_2,R,75.,1.E-06
*BOUNDARY,OP=NEW
ALL,1,2
FIX4,11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL,STEADY STATE
1.,1.
*SRADIATE,OP=NEW
SIDE_3,R,75.,1.E-06
*BOUNDARY,OP=NEW
ALL,1,2
FIX1,11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL,STEADY STATE
1.,1.
*SRADIATE,OP=NEW
SIDE_4,R,75.,1.E-06
*BOUNDARY,OP=NEW
ALL,1,2
FIX2,11
*END STEP