*HEADING
   TIE ELECTRICAL HEAT ELEMENT (DC3D8E)TO A HEAT ELEMENT (DC3D8)
 IN A COUPLED THERMAL-ELECTRICAL ANALYSIS
*preprint,model=yes
*PART, NAME=PART-1
*NODE
1,   10.0,     0.0
2,   11.0,     0.0
5,   10.0,     0.0,   -1.
6,   11.0,     0.0,   -1.
9,   10.0,     0.55
10,  11.0,     0.55
11,  11.0,     1.00
12,  10.0,     1.00
13,   10.0,     0.55,   -1.0
14,   11.0,     0.55,   -1.0
15,   11.0,     1.00,   -1.0
16,   10.0,     1.00,   -1.0
17,   10.,       -1.0
18,   11.,       -1.0
19,   11.,       -0.1
20,   10.,       -0.1
21,   10.0,   -1.0,  -1.
22,  11.0,    -1.0,  -1.0
23,  11.0,    -0.1,  -1.0
24,  10.0,    -0.1,  -1.0
*NSET,NSET=FACE2
12,11,15,16
*ELEMENT,TYPE=DC3D8E,ELSET=MID
1, 1,2,6,5,9,10,14,13
*ELEMENT,TYPE=DC3D8E,ELSET=TOP
2,9,10,14,13,12,11,15,16
*ELEMENT,TYPE=DC3D8,ELSET=BOT
3,17,18,22,21,20,19,23,24
*nset,nset=botnodes
21,22,17,18
*ELSET, ELSET=SOLID
1,2,3
*surface, NAME=SSURF
MID, S1
*surface, NAME=MSURF
BOT,S2
*TIE,NAME=TIE,POSITION TOLERANCE=0.1,adjust=no
SSURF, MSURF
*SOLID SECTION,ELSET=SOLID,MATERIAL=SOLMAT
*END PART
*ASSEMBLY, NAME=ASSEMBLY-1
*INSTANCE,NAME=PART-1-1,PART=PART-1
*END INSTANCE
*END ASSEMBLY
*MATERIAL,NAME=SOLMAT
*CONDUCTIVITY
1., 
*ELECTRICAL CONDUCTIVITY
1., 
*JOULE HEAT FRACTION
0.0, 
*STEP, UNSYMM=YES
*COUPLED THERMAL-ELECTRICAL,STEADY STATE
*NODE PRINT
 NT,
 RFL,
 EPOT,
*BOUNDARY,OP=NEW
part-1-1.FACE2,9,,100.
part-1-1.FACE2,11,,100.
part-1-1.botnodes,11,11,10
*END STEP