*HEADING
EC38THDD: DLOAD, DFLUX, FILM, AND RADIATION FOR COUPLED TEMP-DISP  [C3D8HT]
*PREPRINT,ECHO=YES,HISTORY=NO,MODEL=NO
*NODE,NSET=ALL
 1, 0., 0., 0.
 2, 7., 0., 0.
 3, 7., 0., -7.
 4, 0., 0., -7.
 5, 0., 7., 0.
 6, 7., 7., 0.
 7, 7., 7., -7.
 8, 0., 7., -7.
*NSET,NSET=FIX1
 1,2,3,4
*NSET,NSET=FIX2
 5,6,7,8
*NSET,NSET=FIX3
 1,2,6,5
*NSET,NSET=FIX4
 2,3,7,6
*NSET,NSET=FIX5
 3,4,8,7
*NSET,NSET=FIX6
 1,4,8,5
*ELEMENT,TYPE=C3D8HT, ELSET=EALL
 1, 1,2,3,4,5,6,7,8
*SOLID SECTION,MATERIAL=A1, ELSET=EALL
*MATERIAL,NAME=A1
*ELASTIC
 30.E6, .3
*EXPANSION
 0., 
*CONDUCTIVITY
 3.77E-5, 
*DENSITY
 82.9, 
*SPECIFIC HEAT
 .39, 
*PHYSICAL CONSTANTS, ABSOLUTE ZERO=-460.,STEFAN BOLTZMANN=5.0E-8
*RESTART, WRITE
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE, EXPLICIT
 1., 1.
*EL PRINT
 LOADS,FLUXS
 FILM,RAD
 CE, 
*NODE PRINT
 RF, 
 NT, 
 RFL, 
*DLOAD, OP=NEW
  1,BX,100.
  1,BY,200.
  1,BZ,300.
*DFLUX
 1, BF, .3
*BOUNDARY, OP=NEW
 ALL, 1,3
 FIX1, 11
*OUTPUT,FIELD
*ELEMENT OUTPUT
 HBF,
 S,
 E,
 PE,
 PEEQ,
 PEMAG,
 HFL,
*NODE OUTPUT
 U,
 RF,
 CF,
 NT,
 RFL,
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE, EXPLICIT
 1., 1.
*DLOAD, OP=NEW
1, GRAV, 4.51346, 1.0 , 2.0, 3.0
*DFLUX, OP=NEW
*BOUNDARY, OP=NEW
ALL, 1,3
FIX1, 11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE, EXPLICIT
 1., 1.
*DLOAD, OP=NEW
 1, CENT, 300., -1000., 3.5, -3.5,   0., 1., 0.
*DFLUX,OP=NEW
*FILM, OP=NEW
 1, F2, 75., .103
*BOUNDARY, OP=NEW
 ALL, 1,3
 FIX1, 11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT,STEADY STATE,EXPLICIT
1.,1.
*DLOAD,OP=NEW
1,CENTRIF,3.6188,-1000.,3.5,-3.5,0.,1.,0.
*DFLUX,OP=NEW
*FILM,OP=NEW
1,F2,75.,.103
*BOUNDARY,OP=NEW
ALL,1,3
FIX1,11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT,STEADY STATE, EXPLICIT
 1., 1.
*DLOAD, OP=NEW
 1, P1, 100.
 1, P2, 200.
 1, P3, 300.
 1, P4, 400.
 1, P5, 500.
 1, P6, 600.
*FILM,OP=NEW
 1, F1, 75., .103
*BOUNDARY,OP=NEW
 ALL, 1,3
 FIX2, 11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT,STEADY STATE, EXPLICIT
 1., 1.
*DLOAD, OP=NEW
 1, HP1, 3000., 0., -7.
*FILM,OP=NEW
 1, F3, 75., .103
*BOUNDARY,OP=NEW
 ALL, 1,3
 FIX5, 11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT,STEADY STATE, EXPLICIT
 1., 1.
*DLOAD, OP=NEW
 1, HP2, 3000., 0., -7.
*FILM,OP=NEW
 1, F4, 75., .103
*BOUNDARY,OP=NEW
 ALL, 1,3
 FIX6, 11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT,STEADY STATE, EXPLICIT
 1., 1.
*DLOAD, OP=NEW
 1, HP3, 3000., 0., -7.
*FILM,OP=NEW
 1, F5, 75., .103
*BOUNDARY,OP=NEW
 ALL, 1,3
 FIX3, 11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT,STEADY STATE, EXPLICIT
 1., 1.
*DLOAD, OP=NEW
 1, HP4, 3000., 0., -7.
*FILM,OP=NEW
 1, F6, 75., .103
*BOUNDARY,OP=NEW
 ALL, 1,3
 FIX4, 11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE, EXPLICIT
 1., 1.
*DLOAD, OP=NEW
 1, HP5, 3000., 0., -7.
*FILM, OP=NEW
*RADIATE, OP=NEW
 1, R2, 75., 1.E-6
*BOUNDARY,OP=NEW
 ALL, 1,3
 FIX1, 11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE, EXPLICIT
 1., 1.
*DLOAD, OP=NEW
 1, HP6, 3000., 0., -7.
*RADIATE, OP=NEW
 1, R1, 75., 1.E-6
*BOUNDARY,OP=NEW
 ALL, 1,3
 FIX2,11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE, EXPLICIT
 1., 1.
*DLOAD, OP=NEW
*RADIATE, OP=NEW
 1, R3, 75., 1.E-6
*BOUNDARY,OP=NEW
 ALL, 1,3
 FIX5,11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE, EXPLICIT
 1., 1.
*RADIATE, OP=NEW
 1, R4, 75., 1.E-6
*BOUNDARY, OP=NEW
 ALL, 1,3
 FIX6,11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE, EXPLICIT
 1., 1.
*RADIATE, OP=NEW
 1, R5, 75., 1.E-6
*BOUNDARY,OP=NEW
 ALL, 1,3
 FIX3,11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE, EXPLICIT
 1., 1.
*RADIATE, OP=NEW
 1, R6, 75., 1.E-6
*BOUNDARY, OP=NEW
 ALL, 1,3
 FIX4,11
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE, EXPLICIT
 1., 1.
*BOUNDARY, OP=NEW
 ALL, 1,3
 FIX2, 11
*RADIATE, OP=NEW
*DFLUX, OP=NEW
 1, S1, .3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE, EXPLICIT
 1., 1.
*BOUNDARY, OP=NEW
 ALL, 1,3
 FIX1, 11
*DFLUX,OP=NEW
 1, S2, .3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE, EXPLICIT
 1., 1.
*BOUNDARY, OP=NEW
 ALL, 1,3
 FIX5, 11
*DFLUX,OP=NEW
 1, S3, .3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE, EXPLICIT
 1., 1.
*BOUNDARY, OP=NEW
 ALL, 1,3
 FIX6, 11
*DFLUX,OP=NEW
 1, S4, .3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE, EXPLICIT
 1., 1.
*BOUNDARY, OP=NEW
 ALL, 1,3
 FIX3, 11
*DFLUX,OP=NEW
 1, S5, .3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE, EXPLICIT
 1., 1.
*BOUNDARY, OP=NEW
 ALL, 1,3
 FIX4, 11
*DFLUX,OP=NEW
 1, S6, .3
*END STEP