*HEADING
 FILE NAME: 
 FEATURES TESTED: THREE DIMENTIONAL INTERFACE
                  USER SUBROUTINE GAPCON 
                  CLEARANCE DEPENDENT
*NODE,NSET=PLANEA
1, 
3,,,1.
5,,1.,1.
7,,1.
*NCOPY,CHANGE NUMBER=10,OLD SET=PLANEA,SHIFT,NEW SET=PLANEB
1.,0.,0. 

*NCOPY,CHANGE NUMBER=20,OLD SET=PLANEA,SHIFT,NEW SET=PLANEC
1.01,0.,0.

*NCOPY,CHANGE NUMBER=30,OLD SET=PLANEA,SHIFT,NEW SET=PLANED
2.01,0.,0.

*NSET,NSET=ALL
PLANEA,PLANEB,PLANEC,PLANED
*NSET,NSET=BCPLANE
PLANEB,PLANEC
*NSET,NSET=CDPLANE
PLANEC,PLANED
*ELEMENT,TYPE=C3D8T,ELSET=ONE
1,11,13,15,17,1,3,5,7
*ELEMENT,TYPE=C3D8T,ELSET=TWO
2,31,33,35,37,21,23,25,27
*ELSET,ELSET=EALL
ONE,TWO
*SOLID SECTION,ELSET=EALL,MATERIAL=BLOCK
*MATERIAL,NAME=BLOCK             
*ELASTIC,TYPE=ISO
1.E5, 
*EXPANSION,TYPE=ISO,ZERO=0.0
1.E-5, 
*CONDUCTIVITY,TYPE=ISO
1., 
*surface,NAME=ASURF
ONE,S1
*surface,NAME=BSURF
TWO,S2
*CONTACT PAIR,INTERACTION=GAPC,SMALL SLIDING
ASURF,BSURF
*SURFACE INTERACTION,NAME=GAPC
** tabulated clearance dependent gap conductance not present
*GAP CONDUCTANCE,USER
*BOUNDARY
ALL,2,3
PLANEA,1
PLANEC,1
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT,STEADY STATE
 1., 1.
*BOUNDARY
PLANEA,11,11,400.
CDPLANE,11,11,200.
*NODE FILE,NSET=PLANEB
U, 
NT, 
*OUTPUT,FIELD
*NODE OUTPUT,NSET=PLANEB
U,
NT,
*EL FILE,ELSET=ONE
S, 
TEMP, 
*OUTPUT,FIELD
*ELEMENT OUTPUT,ELSET=ONE
S,
TEMP,
*EL PRINT
S,
E,
*NODE PRINT
U,
RF,
NT11,
*PRINT,CONTACT=YES
*CONTACT PRINT,SECONDARY=ASURF,MAIN=BSURF,SUM=YES,TOT=NO,NSET=BCPLANE,FREQ=1
*CONTACT FILE,SECONDARY=ASURF,MAIN=BSURF,NSET=BCPLANE,FREQ=1
*OUTPUT,FIELD,FREQ=1
*CONTACT OUTPUT,VARIABLE=PRESELECT,SECONDARY=ASURF,MAIN=BSURF,NSET=BCPLANE
*END STEP