*HEADING
DSLOAD, DSFLUX, SFILM, AND SRADIATE FOR COUPLED TEMP-DISP  [CPE6MT]
**
** See ch. 1.4.8 of ABAQUS/Verification Manual
**
*PREPRINT,ECHO=YES,HISTORY=NO,MODEL=NO
*NODE
 1    , 1.        , 0.
 3    , 8.        , 0.
 7    , 1.        , 7.
 9    , 8.        , 7.
*NGEN,NSET=BOTTOM
 1    , 3
*NGEN,NSET=TOP
 7    , 9
*NGEN,NSET=LEFT
 1    , 7    , 3
*NGEN,NSET=RIGHT
 3    , 9    , 3
*NGEN,NSET=MID
 4    , 6
*NSET,NSET=ALL,GENERATE
 1    , 9
*NSET,NSET=QA_TEST
ALL
*ELEMENT, TYPE=CPE6MT, ELSET=EALL
 1    , 1    , 3    , 9    , 2    , 6    , 5
 2    , 1    , 9    , 7    , 5    , 8    , 4
*SOLID SECTION,MATERIAL=A1, ELSET=EALL
*PHYSICAL CONSTANTS, ABSOLUTE ZERO=-460.,STEFAN BOLTZMANN=.1714E-8
*MATERIAL,NAME=A1
*ELASTIC
 30.E6, .3
*EXPANSION
 0., 
*CONDUCTIVITY
 3.77E-5, 
*SPECIFIC HEAT
 .39, 
*DENSITY
 82.9, 
**
**
*SURFACE,TYPE=ELEMENT,NAME=SIDE11
1,S1
*SURFACE,TYPE=ELEMENT,NAME=SIDE21
2,S1
*SURFACE,TYPE=ELEMENT,NAME=SIDE12
1,S2
*SURFACE,TYPE=ELEMENT,NAME=SIDE22
2,S2
*SURFACE,TYPE=ELEMENT,NAME=SIDE13
1,S3
*SURFACE,TYPE=ELEMENT,NAME=SIDE23
2,S3
*STEP
step 1
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*************************
*FILE OUTPUT, NUM=1
*NODE FILE,NSET=ALL 
U,NT,RFL
*OUTPUT,FIELD, NUMBER=1
*NODE OUTPUT,NSET=QA_TEST
U,NT,RFL
*ELEMENT OUTPUT
S,TEMP,HFL
**************************
***OUTPUT, HISTORY, FREQ=500
***NODE OUTPUT, NSET=ALL
**RF, NT 
*************************
*OUTPUT, HISTORY, FREQ=9999
*ENERGY OUTPUT,VAR=ALL
*************************
*BOUNDARY, OP=NEW
 ALL, 1,2
 BOTTOM, 11
*DLOAD, OP=NEW
 1, BX, 100.
 1, BY, 100.
 2, BX, 100.
 2, BY, 100.
*DFLUX, OP=NEW
 1, BF, .3
 2, BF, .3
*END STEP
**
**
*STEP
step 2
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 ALL ,11
 ALL, 1,2
*DLOAD, OP=NEW
*DFLUX, OP=NEW
*END STEP
*STEP
step 3
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 ALL, 1,2
 BOTTOM, 11
*DLOAD, OP=NEW
 1, GRAV, 2.4125,0., -1., 0.
 2, GRAV, 2.4125,0., -1., 0.
*DFLUX,OP=NEW
 1, BF, .3
 2, BF, .3
*END STEP
**
**
*STEP
step 4
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 ALL ,11
 ALL , 1, 2
*DFLUX,OP=NEW
*DLOAD, OP=NEW
*END STEP
*STEP
step 5
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 TOP, 11
 ALL, 1,2
*DSFLUX,OP=NEW
 SIDE11, S, .3
*END STEP
**
**
*STEP
step 6
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 ALL ,11
 ALL, 1,2
*DSFLUX,OP=NEW
*END STEP
*STEP
step 7
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 LEFT, 11
 ALL, 1,2
*DSFLUX,OP=NEW
 SIDE12, S, .3
*END STEP
**
**
*STEP
step 8
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 ALL ,11
 ALL , 1, 2
*DSFLUX,OP=NEW
*END STEP
*STEP
step 9
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 BOTTOM, 11
 ALL, 1,2
*DSLOAD, OP=NEW
 SIDE11, P, 100.
 SIDE12, P, 200.
 SIDE22, P, 300.
 SIDE23, P, 400.
*DSFLUX,OP=NEW
 SIDE22, S, .3
*END STEP
**
**
*STEP
step 10
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 ALL ,11
 ALL, 1,2
*DSLOAD, OP=NEW
*DSFLUX,OP=NEW
*END STEP
*STEP
step 11
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 ALL, 1,2
 RIGHT, 11
*DSLOAD, OP=NEW
 SIDE11, P, 100.
 SIDE12, P, 200.
 SIDE22, P, 300.
 SIDE23, P, 400.
*DSFLUX,OP=NEW
 SIDE23, S, .3
*END STEP
**
**
*STEP
step 12
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 ALL, 1,2
 ALL ,11
*DSLOAD, OP=NEW
*DSFLUX,OP=NEW
*END STEP
*STEP
step 13
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+6
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 ALL, 1,2
 TOP, 11
*SFILM
 SIDE11, F, 75., .103
*END STEP
**
**
*STEP
step 14
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+6
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 ALL, 1,2
 ALL ,11
*SFILM, OP=NEW
*END STEP
*STEP
step 15
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+6
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*SFILM,OP=NEW
 SIDE12, F, 75., .103
*BOUNDARY, OP=NEW
 ALL, 1,2
 LEFT, 11
*END STEP
**
**
*STEP
step 16
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+6
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 ALL, 1,2
 ALL ,11
*SFILM, OP=NEW
*END STEP
*STEP
step 17
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+6
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*SFILM,OP=NEW
 SIDE22, F, 75., .103
*BOUNDARY, OP=NEW
 ALL, 1,2
 BOTTOM, 11
*END STEP
**
**
*STEP
step 18
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+6
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 ALL, 1,2
 ALL ,11
*SFILM,OP=NEW
*END STEP
*STEP
step 19
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+6
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*DSLOAD, OP=NEW
*SFILM,OP=NEW
 SIDE23, F, 75., .103
*BOUNDARY, OP=NEW
 ALL, 1,2
 RIGHT, 11
*END STEP
**
**
*STEP
step 20
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+6
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 ALL, 1,2
 ALL ,11
*SFILM,OP=NEW
*END STEP
*STEP
step 21
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*SRADIATE, OP=NEW
 SIDE11, R, 75., 2.9172E-5
*BOUNDARY, OP=NEW
 ALL, 1,2
 TOP, 11
*END STEP
**
**
*STEP
step 22
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 ALL, 1,2
 ALL ,11
*SRADIATE, OP=NEW
*END STEP
*STEP
step 23
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*SRADIATE, OP=NEW
 SIDE12, R, 75., 2.9172E-5
*BOUNDARY, OP=NEW
 ALL, 1,2
 LEFT, 11
*END STEP
**
**
*STEP
step 24
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 ALL, 1,2
 ALL ,11
*SRADIATE, OP=NEW
*END STEP
*STEP
step 25
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*SRADIATE, OP=NEW
 SIDE22, R, 75., 2.9172E-5
*BOUNDARY, OP=NEW
 ALL, 1,2
 BOTTOM, 11
*END STEP
**
**
*STEP
step 26
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*BOUNDARY, OP=NEW
 ALL, 1,2
 ALL ,11
*SRADIATE, OP=NEW
*END STEP
*STEP
step 27
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.E+8
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E14
*SRADIATE,OP=NEW
 SIDE23, R, 75., 2.9172E-5
*BOUNDARY, OP=NEW
 ALL, 1,2
 RIGHT, 11
*END STEP