*HEADING
: TWO DIMENSIONAL JOULE HEATING INTERFACE 
          GAP RADIATION 
          ELECTRICAL CONDUCTIVITY 
          GAP ELECTRICAL CONDUCTANCE
          TIED CONTACT WITH ADJUST
*PHYSICAL CONSTANTS,ABS=-460.,STEFANB=.1714E-8
*NODE
 1,  10.00,   0.00
 2,  11.00,   0.00
 3,  11.00,   0.50
 4,  10.00,   0.50
 5,  10.50,   0.00
 6,  11.00,   0.25
 7,  10.50,   0.50
 8,  10.00,   0.25
 9,  10.00,   0.55
10,  11.00,   0.55
11,  11.00,   1.00
12,  10.00,   1.00
13,  10.50,   0.55
14,  11.00,   0.775
15,  10.50,    1.0
16,  10.00,   0.775
17,  10.00,  -1.00
18,  11.00,  -1.00
19,  11,      0.0
20,  10,      0.0
21,  10.50,  -1.0
22,  11.00,  -0.50
23,  10.50,  0.0
24,  10.00,  -0.50
*NSET, NSET=SIDE3
11,12,15
*NSET, NSET=GAP1,GENERATE
17,24,1
*ELEMENT,TYPE=DC2D8E,ELSET=MID
1, 1,2,3,4,5,6,7,8
*ELEMENT,TYPE=DC2D8E,ELSET=TOP
2,9,10,11,12,13,14,15,16
*ELEMENT,TYPE=DC2D8E,ELSET=BOT
3,17,18,19,20,21,22,23,24
*ELSET,ELSET=SOLID
1,2,3
*surface,NAME=SURF1
TOP,S1
*surface, NAME=SURF2
MID,S3
*surface, NAME=SURF3
MID,S1
*surface, NAME=SURF4
BOT,S3
*CONTACT PAIR, INTERACTION=TIED, TIED, ADJUST=0.1
SURF1,SURF2
*CONTACT PAIR, INTERACTION=GAPS
SURF3,SURF4
*SURFACE INTERACTION,NAME=TIED
*SURFACE INTERACTION, NAME=GAPS
*GAP ELECTRICAL CONDUCTANCE
10.,0.
*GAP RADIATION
.45167,.45167
1.,0.
1.,1.
** converted from old data: 5.E-10, 5.E-10
*GAP HEAT GENERATION
0.5, 
*SOLID SECTION,ELSET=SOLID,MATERIAL=SOLMAT
*MATERIAL,NAME=SOLMAT
*CONDUCTIVITY
1., 
*ELECTRICAL CONDUCTIVITY
1., 
*JOULE HEAT FRACTION
0.0, 
*STEP, UNSYMM=YES
*COUPLED THERMAL-ELECTRICAL,STEADY STATE
*NODE FILE
 NT,
 RFL,
 EPOT,
*EL PRINT,FREQ=0
 ELEN,
 HFL,
 ECD, EPG
 NFLUX, NCURS,
*EL FILE,FREQ=0
 ELEN,
 HFL,
 ECD, EPG
 NFLUX, NCURS,
*CONTROLS, PARAMETER=FIELD
5.e-4, 
*NODE PRINT
 NT,
 RFL,
 EPOT,
*BOUNDARY,OP=NEW
SIDE3,9,,100.
SIDE3,11,,100.
GAP1,9,,50.
GAP1,11,,50.
*CONTACT PRINT
HFL,HFLA,HTL,HTLA,ECD,ECDA,ECDT,ECDTA
SJD,SJDA,SJDT,SJDTA,WEIGHT
*CONTACT FILE
HFL,HFLA,HTL,HTLA,ECD,ECDA,ECDT,ECDTA
SJD,SJDA,SJDT,SJDTA,WEIGHT
*END STEP