*HEADING
ECA4TFDD: DLOAD, DFLUX, FILM, AND RADIATION FOR COUPLED TEMP-DISP  [COHAX4T]
*PREPRINT,ECHO=YES,HISTORY=NO,MODEL=NO
*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,5,2
*NSET,NSET=FIX2
2,3
*NSET,NSET=FIX3
3,4,7
*NSET,NSET=FIX4
1,4
*ELEMENT,TYPE=COHAX4T,ELSET=ALL
1,1,5,7,4
2,5,2,3,7
*COHESIVE SECTION,ELSET=ALL,MATERIAL=MAT1,RESPONSE=TRACTION SEPARATION, THICKNESS=GEOMETRY
**
*PHYSICAL CONSTANTS, ABSOLUTE ZERO=-460., STEFAN BOLTZMANN=5.0E-8
*MATERIAL,NAME=MAT1
*ELASTIC,TYPE=TRACTION
1.0E8,1.0E8
*GAP CONDUCTANCE
10.0,0.0
10.0,7.0
*DENSITY
82.9, 
**INITIAL CONDITIONS,TYPE=VELOCITY
**ALL,1,10.
**ALL,2,5.
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT,STEADY STATE
1.,1.
*ENERGY FILE
*EL FILE
 LOADS,FLUXS
 FILM,RAD
*NODE FILE
 RF, 
 NT, 
 RFL, 
*EL PRINT
 LOADS,FLUXS
 FILM,RAD
*NODE PRINT
 RF, 
 NT, 
 RFL, 
*BOUNDARY,OP=NEW
ALL,1,2
FIX1,11
*DLOAD,OP=NEW
ALL,BR,100.
ALL,BZ,200.
*DFLUX,OP=NEW
ALL,BF,.3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT,STEADY STATE
1.,1.
*BOUNDARY,OP=NEW
ALL,1,2
FIX1,11
*DLOAD,OP=NEW
 ALL, GRAV, 2.4125, 0., -1., 0.
*DFLUX,OP=NEW
ALL,BF,.3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL,STEADY STATE
1.,1.
*BOUNDARY,OP=NEW
ALL,1,2
FIX3,11
*DLOAD,OP=NEW
ALL,CENT,20.,0.,0.,0.,0.,1.,0.
*DFLUX,OP=NEW
ALL,S1,.3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL,STEADY STATE
1.,1.
*BOUNDARY,OP=NEW
ALL,1,2
FIX3,11
*DLOAD,OP=NEW
ALL,CENTRIF,.24125,0.,0.,0.,0.,1.,0.
*DFLUX,OP=NEW
ALL,S1,.3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL,STEADY STATE
1.,1.
*BOUNDARY,OP=NEW
ALL,1,2
FIX1,11
*DLOAD,OP=NEW
ALL,HP1,3000.,3.,0.
*DFLUX,OP=NEW
ALL,S3,.3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL,STEADY STATE
1.,1.
*DLOAD,OP=NEW
ALL,HP3,3000.,3.,0.
*DFLUX,OP=NEW
*FILM,OP=NEW
ALL,F1,75.,.103
*BOUNDARY,OP=NEW
ALL,1,2
FIX3,11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL,STEADY STATE
1.,1.
*DLOAD,OP=NEW
*FILM,OP=NEW
ALL,F3,75.,.103
*BOUNDARY,OP=NEW
ALL,1,2
FIX1,11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL,STEADY STATE
1.,1.
*FILM,OP=NEW
*RADIATE,OP=NEW
ALL,R1,75.,1.E-06
*BOUNDARY,OP=NEW
ALL,1,2
FIX3,11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPL,STEADY STATE
1.,1.
*RADIATE, OP=NEW
ALL,R3,75.,1.E-06
*BOUNDARY,OP=NEW
ALL,1,2
FIX1,11
*END STEP