*HEADING : AXISYMMETRIC JOULE HEATING INTERFACE GAP CONDUCTANCE GAP ELECTRICAL CONDUCTANCE GAP HEAT GENERATION TIED CONTACT WITH ADJUST *NODE 1, 10.0, 0.0 2, 11.0, 0.0 3, 11.0, 0.50 4, 10.0, 0.50 5, 10.0, 0.55 6, 11.0, 0.55 7, 11.0, 1.0 8, 10, 1.0 9, 10, -1.0 10,11,-1.0 11,11,-0.1 12,10,-0.1 *NSET,NSET=SIDE3 7,8 *NSET,NSET=BOT 9,10,11,12 *ELEMENT,TYPE=DCAX4E,ELSET=MID 1, 1,2,3,4 *ELEMENT,TYPE=DCAX4E,ELSET=TOP 2,5,6,7,8 *ELEMENT,TYPE=DCAX4E,ELSET=BOT 3,9,10,11,12 *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, TIED, ADJUST=0.1,INTERACTION=TIED SURF1,SURF2 *CONTACT PAIR,INTERACTION=GAPS SURF3,SURF4 *SURFACE INTERACTION,NAME=TIED *SURFACE INTERACTION,NAME=GAPS *GAP CONDUCTANCE 10.,0. 10.,1. *GAP ELECTRICAL CONDUCTANCE 10.,0. *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 *COUPLED THERMAL-ELECTRICAL,STEADY STATE *OUTPUT,FIELD *NODE OUTPUT NT, RFL, EPOT, *EL PRINT,F=0 ELEN, HFL, ECD, EPG NFLUX, NCURS, *OUTPUT,FIELD,FREQ=0 *ELEMENT OUTPUT ELEN, HFL, ECD,EPG NFLUX,NCURS, *NODE PRINT NT, RFL, EPOT, *BOUNDARY,OP=NEW SIDE3,9,,100. SIDE3,11,,100. BOT,9,,50. BOT,11,,50. *CONTACT PRINT HFL,HFLA,HTL,HTLA,ECD,ECDA,ECDT,ECDTA SJD,SJDA,SJDT,SJDTA,WEIGHT *OUTPUT,FIELD *CONTACT OUTPUT,VARIABLE=PRESELECT HFL,HFLA,HTL,HTLA,ECD,ECDA,ECDT,ECDTA SJD,SJDA,SJDT,SJDTA,WEIGHT *ENDSTEP