*HEADING
DSLOAD, DSFLUX, SFILM, AND SRADIATE FOR COUPLED TEMP-DISP [CAX4RT]
**
** See ch. 1.4.8 of ABAQUS/Verification Manual
**
*PREPRINT,ECHO=YES,HISTORY=NO,MODEL=NO
*NODE,NSET=ALL
1,1.,0.
2,8.,0.
3,8.,7.
4,1.,7.
5,4.5,0.
6,8.,3.5
7,4.5,7.
8,1.,3.5
*NSET,NSET=FIX1
1,5,2
*NSET,NSET=FIX2
2,3
*NSET,NSET=FIX3
3,4,7
*NSET,NSET=FIX4
1,4
*NSET,NSET=QA_TEST
ALL
*ELEMENT,TYPE=CAX4RT,ELSET=ALL
1,1,5,7,4
2,5,2,3,7
*SOLID SECTION,MATERIAL=A1, ELSET=ALL
*PHYSICAL CONSTANTS, ABSOLUTE ZERO=-460.,STEFAN BOLTZMANN=.1714E-8
*MATERIAL,NAME=A1
*ELASTIC
30.E6,0.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
*SURFACE,TYPE=ELEMENT,NAME=SIDE14
1,S4
*SURFACE,TYPE=ELEMENT,NAME=SIDE24
2,S4
*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
*************************
*BOUNDARY, OP=NEW, TYPE=VELOCITY
ALL,1,10
ALL,2,5
*BOUNDARY,OP=NEW
FIX1,11
*DLOAD,OP=NEW
ALL,BR,100.
ALL,BZ,200.
*DFLUX,OP=NEW
ALL,BF,.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,2
FIX1,11
*DLOAD,OP=NEW
 ALL, GRAV, 2.4125, 0., -1., 0.
*DFLUX,OP=NEW
ALL,BF,.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,2
FIX3,11
*DLOAD,OP=NEW
*DFLUX,OP=NEW
*DSFLUX,OP=NEW
SIDE11,S,.3
SIDE21,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,2
FIX4,11
*DSLOAD,OP=NEW
SIDE11,P,100.
SIDE21,P,100.
SIDE22,P,200.
SIDE13,P,300.
SIDE23,P,300.
SIDE14,P,400.
*DSFLUX,OP=NEW
SIDE22,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,2
FIX1,11
*DSLOAD,OP=NEW
*DSFLUX,OP=NEW
SIDE13,S,.3
SIDE23,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,2
FIX2,11
*DSFLUX,OP=NEW
SIDE14,S,.3
*END STEP
**
**
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
  , 1.E+5
*FIXED MASS SCALING, ELSET=ALL, FACTOR=1.E+14
*DSFLUX,OP=NEW
*SFILM,OP=NEW
SIDE11,F,75.,.103
SIDE21,F,75.,.103
*BOUNDARY,OP=NEW
ALL,1,2
FIX3,11
*END STEP
**
**
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
  , 1.E+5
*FIXED MASS SCALING, ELSET=ALL, FACTOR=1.E+14
*SFILM,OP=NEW
SIDE22,F,75.,.103
*BOUNDARY,OP=NEW
ALL,1,2
FIX4,11
*END STEP
**
**
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
  , 1.E+5
*FIXED MASS SCALING, ELSET=ALL, FACTOR=1.E+14
*SFILM,OP=NEW
SIDE13,F,75.,.103
SIDE23,F,75.,.103
*BOUNDARY,OP=NEW
ALL,1,2
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,2
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
SIDE11,R,75., 2.9172E-5
SIDE21,R,75., 2.9172E-5
*BOUNDARY,OP=NEW
ALL,1,2
FIX3,11
*END STEP
**
**
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
  , 1.E+7
*FIXED MASS SCALING, ELSET=ALL, FACTOR=1.E+14
*SRADIATE,OP=NEW
SIDE22,R,75., 2.9172E-5
*BOUNDARY,OP=NEW
ALL,1,2
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
SIDE23,R,75., 2.9172E-5
*BOUNDARY,OP=NEW
ALL,1,2
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,2
FIX2,11
*END STEP