*HEADING : DLOAD, DFLUX, FILM, AND RADIATION FOR COUPLED TEMP-DISP [COH3D8T] *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=COH3D8T, ELSET=EALL 1, 1,2,3,4,5,6,7,8 *COHESIVE SECTION,ELSET=EALL,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, *STEP *COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE, EXPLICIT 1., 1. *SOLUTION TECHNIQUE,TYPE=SEPARATED *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 *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. *SOLUTION TECHNIQUE,TYPE=SEPARATED *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, 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. *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