*HEADING
ECG6TLDK: DSLOAD, DSFLUX, SFILM, AND SRADIATION FOR COUPLED TEMP-DISP [CPEG6MHT]
*PREPRINT,ECHO=YES,HISTORY=NO,MODEL=NO
*RESTART,WRITE
*NODE
 1    , 0.        , 0.
 3    , 7.        , 0.
 7    , 0.        , 7.
 9    , 7.        , 7.
*NODE,NSET=REFND
 998,0.,0.,
*NGEN,NSET=BOTTOM
 1    , 3
*NGEN,NSET=TOP
 7    , 9
*NGEN,NSET=LEFT
 1    , 7    , 3
*NGEN,NSET=RIGHT
 3    , 9    , 3
*NGEN
 4    , 6
*NSET,NSET=ALL,GENERATE
 1    , 9
*ELEMENT,TYPE=CPEG6MHT,ELSET=ELEMS
 1    , 1    , 3    , 9    , 2    , 6    , 5
 2    , 1    , 9    , 7    , 5    , 8    , 4
*SURFACE, NAME=SIDE_1
 1, S1
*SURFACE, NAME=SIDE_2
 1, S2
*SURFACE, NAME=SIDE_3
 2, S2
*SURFACE, NAME=SIDE_4
 2, S3
*SOLID SECTION,MATERIAL=A1, ELSET=ELEMS, REFNODE=REFND
*PHYSICAL CONSTANTS, ABSOLUTE ZERO=-460., STEFAN BOLTZMANN=5.0E-8
*MATERIAL,NAME=A1
*ELASTIC
 30.E6, .3
*EXPANSION
 0.,
*CONDUCTIVITY
 3.77E-5,
*SPECIFIC HEAT
 .39,
*DENSITY
 82.9,
*BOUNDARY, OP=NEW
 ALL,1,2
 BOTTOM,11,11
 REFND,3,5
*INITIAL CONDITION,TYPE=TEMPERATURE
 ALL  , -10.
*STEP, PERT
*STATIC
*ENERGY FILE
*OUTPUT,HISTORY,FREQUENCY=1
*ENERGY OUTPUT,VARIABLE=PRESELECT
*NODE FILE
 RF, 
*OUTPUT,FIELD,OP=NEW
*NODE OUTPUT
 RF,
*DLOAD, OP=NEW
 ELEMS,BX,1000.
*EL PRINT
 LOADS,
*EL FILE
 LOADS,
*NODE PRINT,TOTALS=YES
 RF, 
*END STEP
*STEP, PERT
*STATIC
*DLOAD, OP=NEW
 ELEMS,BY,2000.
*END STEP
*STEP, PERT
*STATIC
*DLOAD,OP=NEW
 ELEMS,CENT,3000.,0.,0.,0.,0.,1.,0.
*END STEP
*STEP, PERT
*STATIC
*DLOAD, OP=NEW
 ELEMS,CENTRIF,6.E2,0.,0.,0.,0.,1.,0.
*END STEP
*STEP, PERT
*STATIC
*DLOAD, OP=NEW
 ELEMS,GRAV,400.,0.,-1.,0.
*END STEP
*STEP, PERT
*STATIC
*DLOAD, OP=NEW
*DSLOAD, OP=NEW
 SIDE_1,HP,3000.,3.,0.
*END STEP
*STEP, PERT
*STATIC
*DSLOAD, OP=NEW
 SIDE_2,HP,3000.,3.,0.
*END STEP
*STEP, PERT
*STATIC
*DSLOAD, OP=NEW
 SIDE_3,HP,3000.,3.,0.
*END STEP
*STEP, PERT
*STATIC
*DSLOAD, OP=NEW
 SIDE_4,HP,3000.,3.,0.
*END STEP
*STEP, PERT
*STATIC
*DSLOAD, OP=NEW
 SIDE_1,P,1000.
*END STEP
*STEP, PERT
*STATIC
*DSLOAD, OP=NEW
 SIDE_2,P,2000.
*END STEP
*STEP, PERT
*STATIC
*DSLOAD, OP=NEW
 SIDE_3,P,3000.
*END STEP
*STEP, PERT
*STATIC
*DSLOAD, OP=NEW
 SIDE_4,P,3000.
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
*BOUNDARY, OP=NEW
 ALL, 1,2
 BOTTOM, 11
 REFND,3,5
*DSLOAD, OP=NEW
*DFLUX,OP=NEW
 1, BF, .3
 2, BF, .3
*ENERGY FILE
*OUTPUT,HISTORY,FREQUENCY=1
*ENERGY OUTPUT,VARIABLE=PRESELECT
*EL FILE
 LOADS,FLUXS
 FILM,RAD
*OUTPUT,FIELD,OP=NEW
*NODE OUTPUT
 NT,
 RFL,
*NODE FILE
 NT,
 RFL,
*EL PRINT
 FLUXS
 FILM,RAD
*NODE PRINT
 NT,
 RFL,
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
*BOUNDARY, OP=NEW
 All, 1,2
 Top, 11
 REFND,3,5
*DFLUX,OP=NEW
*DSFLUX,OP=NEW
 SIDE_1, S, .3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
*BOUNDARY, OP=NEW
 All, 1,2
 Left, 11
 REFND,3,5
*DSFLUX,OP=NEW
 SIDE_2, S, .3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
*BOUNDARY, OP=NEW
 All, 1,2
 Bottom, 11
 REFND,3,5
*DSFLUX,OP=NEW
 SIDE_3, S, .3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
*BOUNDARY, OP=NEW
 All, 1,2
 Right, 11
 REFND,3,5
*DSFLUX,OP=NEW
 SIDE_4, S, .3
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
*BOUNDARY, OP=NEW
 All, 1,2
 Top, 11
 REFND,3,5
*DSFLUX,OP=NEW
*SFILM
 SIDE_1, F, 75., .103
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
*BOUNDARY,OP=NEW
 All, 1,2
 Left, 11
 REFND,3,5
*SFILM,OP=NEW
 SIDE_2, F, 75., .103
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
*BOUNDARY,OP=NEW
 All, 1,2
 Right, 11
 REFND,3,5
*SFILM,OP=NEW
 SIDE_4, F, 75., .103
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
*BOUNDARY,OP=NEW
 All, 1,2
 Bottom, 11
 REFND,3,5
*SFILM,OP=NEW
 SIDE_3, F, 75., .103
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
 1., 1.
*BOUNDARY,OP=NEW
 All, 1,2
 Top, 11
 REFND,3,5
*SFILM,OP=NEW
*SRADIATE, OP=NEW
 SIDE_1, R, 75., 1.E-06
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
 1., 1.
*BOUNDARY,OP=NEW
 All, 1,2
 Left, 11
 REFND,3,5
*SRADIATE, OP=NEW
 SIDE_2, R, 75., 1.E-06
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
 1., 1.
*BOUNDARY,OP=NEW
 All, 1,2
 Bottom, 11
 REFND,3,5
*SRADIATE, OP=NEW
 SIDE_3, R, 75., 1.E-06
*END STEP
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, STEADY STATE
 1., 1.
*BOUNDARY,OP=NEW
 All, 1,2
 Right, 11
 REFND,3,5
*SRADIATE,OP=NEW
 SIDE_4, R, 75., 1.E-06
*END STEP