*HEADING
EXPLICIT RIGID BODY ISOTHERMAL / HEAT CAP TEST [S4RT ]
**
** The temperature varies only in time and the fluxes are zero
** The time increment is specified using Direct User Control
** See ch. 1.11.6 of ABAQUS/Verification Manual
**
*PREPRINT,ECHO=YES,HISTORY=NO,MODEL=NO
*NODE,NSET=ALL
10,0,0
20,1.0,0.
30,1,2.0
40,0.,2.0
*ELEMENT,TYPE=S4RT, ELSET=EALL
1,10,20,30,40
*SHELL SECTION,MATERIAL=A1, ELSET=EALL
1.0,3
*MATERIAL,NAME=A1
*ELASTIC
1.0,0.0
*CONDUCTIVITY
1.0, 
*DENSITY
1.0, 
*SPECIFIC HEAT
1.0, 
*EXPANSION
0.0, 
*NODE,NSET=REFNODE
9999,0.5,1.0
*RIGID BODY,REF NODE=9999,ELSET=EALL,ISOTHERMAL=YES
*ELEMENT,TYPE=HEATCAP,ELSET=CAP
99001,9999
*HEATCAP,ELSET=CAP
1.0
*INITIAL CONDITIONS,TYPE=TEMPERATURE
9999,100
ALL,100,100,100
*STEP
 COOL DOWN BY CONVECTION
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT, DIRECT
0.01,10.0
*FILM
1,FPOS,20,1.0
***************************
*OUTPUT,FIELD,NUM=1
*NODE OUTPUT
NT,
***************************
*OUTPUT, HISTORY, TIME INTERVAL =0.1
*NODE OUTPUT, NSET=ALL
NT,RFL
*NODE OUTPUT, NSET=REFNODE
NT,RFL
*OUTPUT, HISTORY,TIME INTERVAL=1.0
*ENERGY OUTPUT
ETOTAL,ALLIHE,ALLHF
*ENDSTEP
*****************************************
*STEP
HEATED UP BY PRESCRIBED FLUX
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT, DIRECT
0.01,10.0
*FILM,OP=NEW
1,FNEG,20,0.0
*DFLUX,OP=NEW
1,SNEG,12,1.0
*ENDSTEP