*HEADING
DSLOAD, DSFLUX, SFILM, AND SRADIATE FOR COUPLED TEMP-DISP  [C3D4T]
**
** See ch. 1.4.8 of ABAQUS/Verification Manual
**
*PREPRINT,ECHO=YES,HISTORY=NO,MODEL=NO
*NODE,NSET=ALL
 1, -1., -1., 0.
 2, 1., -1., 0.
 3, 0., 1.4, 0.
 4, 0., 0., 1.4
*NSET,NSET=FIX1
 1, 
*NSET,NSET=FIX2
 2, 
*NSET,NSET=FIX3
 3, 
*NSET,NSET=FIX4
 4, 
*NSET,NSET=QA_TEST
ALL
*ELEMENT,TYPE=C3D4T, ELSET=ALL
 1, 1,2,3,4
*SOLID SECTION,MATERIAL=A1, ELSET=ALL
*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=.1714E-8
**
**
*SURFACE,TYPE=ELEMENT,NAME=SIDE12
1,S2
*SURFACE,TYPE=ELEMENT,NAME=SIDE13
1,S3
*SURFACE,TYPE=ELEMENT,NAME=SIDE14
1,S4
*SURFACE,TYPE=ELEMENT,NAME=SIDE11
1,S1
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
  , 1.E+7
*FIXED MASS SCALING, ELSET=ALL, FACTOR=1.E+14
*************************
*FILE OUTPUT, NUM=1
*NODE FILE,NSET=ALL 
U,NT, 
*************************
*OUTPUT,FIELD, NUMBER INTERVAL=1
*NODE OUTPUT,NSET=QA_TEST
U,NT
*ELEMENT OUTPUT
S,
**************************
***OUTPUT, HISTORY, FREQ=500
***NODE OUTPUT, NSET=ALL
**RF, NT 
*************************
*OUTPUT, HISTORY, FREQ=99999
*ENERGY OUTPUT,VAR=ALL
*************************
*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
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
  , 1.E+7
*FIXED MASS SCALING, ELSET=ALL, FACTOR=1.E+14
*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
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
  , 1.E+5
*FIXED MASS SCALING, ELSET=ALL, FACTOR=1.E+14
*DLOAD, OP=NEW
*DFLUX,OP=NEW
*SFILM, OP=NEW
 SIDE12, F, 75., .103
*BOUNDARY, OP=NEW
 ALL, 1,3
 FIX3, 11
*END STEP
**
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
  , 1.E+5
*FIXED MASS SCALING, ELSET=ALL, FACTOR=1.E+14
*DSLOAD, OP=NEW
 SIDE11, P, 100.
 SIDE12, P, 200.
 SIDE13, P, 300.
 SIDE14, P, 400.
*SFILM,OP=NEW
 SIDE11, F, 75., .103
*BOUNDARY,OP=NEW
 ALL, 1,3
 FIX4, 11
*END STEP
**
**
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
  , 1.E+5
*FIXED MASS SCALING, ELSET=ALL, FACTOR=1.E+14
*DSLOAD, OP=NEW
*SFILM,OP=NEW
 SIDE13, F, 75., .103
*BOUNDARY,OP=NEW
 ALL, 1,3
 FIX1, 11
*END STEP
**
**
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
  , 1.E+5
*FIXED MASS SCALING, ELSET=ALL, FACTOR=1.E+14
*SFILM,OP=NEW
 SIDE14, F, 75., .103
*BOUNDARY,OP=NEW
 ALL, 1,3
 FIX2, 11
*END STEP
**
**
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
  , 1.E+7
*FIXED MASS SCALING, ELSET=ALL, FACTOR=1.E+14
*SFILM, OP=NEW
*SRADIATE, OP=NEW
 SIDE12, R, 75., 2.9172E-5
*BOUNDARY,OP=NEW
 ALL, 1,3
 FIX3, 11
*END STEP
**
**
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
  , 1.E+7
*FIXED MASS SCALING, ELSET=ALL, FACTOR=1.E+14
*SRADIATE, OP=NEW
 SIDE11, R, 75., 2.9172E-5
*BOUNDARY,OP=NEW
 ALL, 1,3
 FIX4,11
*END STEP
**
**
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
  , 1.E+7
*FIXED MASS SCALING, ELSET=ALL, FACTOR=1.E+14
*SRADIATE, OP=NEW
 SIDE13, R, 75., 2.9172E-5
*BOUNDARY,OP=NEW
 ALL, 1,3
 FIX1,11
*END STEP
**
**
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
  , 1.E+7
*FIXED MASS SCALING, ELSET=ALL, FACTOR=1.E+14
*SRADIATE, OP=NEW
 SIDE14, R, 75., 2.9172E-5
*BOUNDARY, OP=NEW
 ALL, 1,3
 FIX2,11
*END STEP
**
**
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
  , 1.E+7
*FIXED MASS SCALING, ELSET=ALL, FACTOR=1.E+14
*BOUNDARY, OP=NEW
 ALL, 1,3
 FIX4, 11
*SRADIATE, OP=NEW
*DSFLUX, OP=NEW
 SIDE11, S, .3
*END STEP
**
**
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
  , 1.E+7
*FIXED MASS SCALING, ELSET=ALL, FACTOR=1.E+14
*BOUNDARY, OP=NEW
 ALL, 1,3
 FIX3, 11
*DSFLUX,OP=NEW
 SIDE12, S, .3
*END STEP
**
**
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
  , 1.E+7
*FIXED MASS SCALING, ELSET=ALL, FACTOR=1.E+14
*BOUNDARY, OP=NEW
 ALL, 1,3
 FIX1, 11
*DSFLUX,OP=NEW
 SIDE13, S, .3
*END STEP
**
**
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
  , 1.E+7
*FIXED MASS SCALING, ELSET=ALL, FACTOR=1.E+14
*BOUNDARY, OP=NEW
 ALL, 1,3
 FIX2, 11
*DSFLUX,OP=NEW
 SIDE14, S, .3
*END STEP