*heading
uinterht: Testing UINTER for a simple
heat transfer problem involving gap
conductance
*node
1,0.,0.
2,1.,0.
3,1.,1.
4,0.,1.
5,0.,1.1
6,1.,1.1
7,1.,2.1
8,0.,2.1
*element,type=dc2d4,elset=one
1,1,2,3,4
2,5,6,7,8
*solid section,elset=one,material=mone
*material,name=mone
*conductivity
1., 
*specific heat
1., 
*density
1., 
*nset,nset=bot
1,2,3,4
*nset,nset=top
5,6,7,8
*initial conditions,type=temperature
bot,0.
top,100.
*surface,name=bot
1,s3
*surface,name=top
2,s1
*CONTACT
*CONTACT INCLUSIONS,ALL EXTERIOR
*CONTACT PROPERTY ASSIGNMENT
 , ,ht
*surface interaction,name=ht,user,properties=1

2.0, 
*step,inc=1000
*heat transfer,end=ss,deltmx=0.5
1.e-3,10.0,,,0.05
*el print
hfl, 
*node print
nt, 
*contact print
hfl,
hfla,
*el file,freq=9999
hfl, 
*node file,freq=9999
nt, 
*contact file,freq=9999
hfl,
hfla,
htl,
htla,
*output,history,freq=0
*output,field,freq=300,variable=preselect
*end step