*HEADING
EXPLICIT RIGID BODY ISOTHERMAL / HEAT CAP TEST [CPE4RT ]
**
** 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=CPE4RT, ELSET=EALL
1,10,20,30,40
*SOLID SECTION,MATERIAL=A1, ELSET=EALL
*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
*STEP
 COOL DOWN BY CONVECTION
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT, DIRECT
0.01,10.0
*FILM
1,F2,20,1.0
***************************
*FILE OUTPUT, NUM=1
*NODE FILE
 NT
***************************
*OUTPUT,FIELD,NUM=1
*NODE OUTPUT
NT,
***************************
***OUTPUT, HISTORY,FREQ=25
***NODE OUTPUT, NSET=ALL
**NT,RFL
***NODE OUTPUT, NSET=REFNODE
**NT,RFL
*OUTPUT, HISTORY,TIME INTERVAL=10.0
*ENERGY OUTPUT
ETOTAL,ALLIHE,ALLHF
*ENDSTEP
*****************************************
*STEP
HEATED UP BY PRESCRIBED FLUX
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT, DIRECT
0.1,10.0
*FILM,OP=NEW
1,F2,20,0.0
*DFLUX,OP=NEW
1,S1,24,1.0
*ENDSTEP