*HEADING : DLOAD, DFLUX, FILM, AND RADIATION FOR COUPLED TEMP-DISP [T3D3T] *PREPRINT,ECHO=YES,HISTORY=NO,MODEL=NO *NODE,NSET=ALL 1, 5. 2, 5., 3.5 3, 5., 7. *SOLID SECTION,MATERIAL=A1, ELSET=EALL 3., *ELEMENT,TYPE=T3D3T, ELSET=EALL 1, 1,2,3 *PHYSICAL CONSTANTS,STEFAN BOLTZMANN=5.E-8,ABSOLUTE ZERO=-460. *MATERIAL,NAME=A1 *ELASTIC 30.E6, .3 *EXPANSION 0., *CONDUCTIVITY 3.77E-5, *SPECIFIC HEAT .39, *DENSITY 82.9, *STEP *COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE 1., 1. *OUTPUT,HISTORY,FREQUENCY=1 *ENERGY OUTPUT,VARIABLE=PRESELECT *OUTPUT,FIELD *NODE OUTPUT RF, NT, RFL, *EL PRINT LOADS,FLUXS FILM,RAD *NODE PRINT RF, NT, RFL, *BOUNDARY, OP=NEW ALL, 1,3 1, 11 *DLOAD, OP=NEW 1, BX, 100. 1, BY, 200. 1, BZ, 300. *DFLUX,OP=NEW 1, BF, .3 *END STEP *STEP *COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE 1., 1. *BOUNDARY, OP=NEW ALL, 1,3 1, 11 *DLOAD, OP=NEW 1, GRAV, 2.4125, 0., -1., 0. *DFLUX,OP=NEW 1, BF, .3 *END STEP *STEP *COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE 1., 1. *BOUNDARY, OP=NEW ALL, 1, 3 3, 11 *DLOAD, OP=NEW 1, CENT, 20., 0., 0., 0., 0., 1., 0. *DFLUX,OP=NEW 1, S1, .3 *END STEP *STEP *COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE 1., 1. *BOUNDARY, OP=NEW ALL, 1, 3 3, 11 *DLOAD, OP=NEW 1, CENTRIF, .24125, 0., 0., 0., 0., 1., 0. *DFLUX,OP=NEW 1, S1, .3 *END STEP *STEP *COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE .000001,.000001 *BOUNDARY, OP=NEW ALL,1,1,.000005 ALL,2,2,.000002 ALL, 3, 3 1,11 *DLOAD, OP=NEW 1, CORIO, 5., 0., 0., 0., 0., 1., 0. *DFLUX, OP=NEW 1, S2, .3 *END STEP *STEP *COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE 1., 1. *BOUNDARY, OP=NEW ALL, 1, 3 3, 11 *DLOAD, OP=NEW *DFLUX, OP=NEW *FILM,OP=NEW 1, F1, 75., .103 *END STEP *STEP *COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE 1., 1. *BOUNDARY, OP=NEW ALL, 1, 3 1, 11 *FILM, OP=NEW 1, F2, 75., .103 *END STEP *STEP *COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE 1., 1. *BOUNDARY, OP=NEW ALL, 1, 3 3, 11 *FILM, OP=NEW *RADIATE,OP=NEW 1, R1, 75., 1.E-6 *END STEP *STEP *COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE 1., 1. *BOUNDARY, OP=NEW ALL, 1,3 1, 11 *RADIATE, OP=NEW 1, R2, 75., 1.E-6 *END STEP