*Heading
: Thermally Coupled Contact, Finite Sliding Contact With Interface Conductivity, Deformable
*Restart,Write,F=2
*Node,Nset=All
*Ngen
*Nset,Nset=Bot,Gen
*Nset,Nset=Top,Gen
**
*Element,Type=Cpe6mht,Elset=Dead
*Solid Section,Elset=Dead,Material=Dead
*Material,Name=Dead
*Elastic
 30.E6,.3
*Conductivity
 10.000,
*Specific Heat
 0.001,
*Density
 1000.,
**
*Element,Type=Cpe6mht,Elset=Active
*Solid Section,Elset=Active,Material=Active
*Material,Name=Active
*Elastic
 30.E6,.3
*Conductivity
 10.,
*Density
 1000.,
*Specific Heat
 .001,
**
*Elset,Elset=Etop
*Elset,Elset=Ebot
*Surface, Name=Asurf
 Etop,S1
*Surface, Name=Bsurf
 Ebot,S1
*Contact Pair,Interaction=Rough,Smooth=0.05
 Asurf,Bsurf
*Surface Interaction,Name=Rough
** Clearance Dependent Gap Conductance Not Present
*Gap Conductance,Pressure
*Gap Heat Generation
**
*Amplitude, Name=Slide, Value=Relative, Time=Step
 0., 0.0,  200., 1.0,  400., 0.0,  600., -1.0
 800., 0.0,  1000., 0.0
**
*Initial Conditions,Type=Temp
 All,0.0
**
*Step,Inc=50,Nlgeom,Amp=Ramp,Unsymm=Yes
 Step 1
*Coupled Temperature,Deltmx=100.
*Controls,Parameters=Field
 1.0e-6,
*Boundary
 Bot,2,2
 1,1,1
 7,1,1
 113,1,1
*Dload
 103,P1,100.
 104,P1,100.
*Dflux
 103,S1,100.
 104,S1,100.
*Film
 2,F1,0.,10.
**
*Contact Print,Slave=Asurf
*Contact File,Slave=Asurf,F=10
*Node Print
 Rf,
 Nt11,
 Rfl,
*El Print
 S,
 E,
 Temp,
 Hfl,
 Nflux,
*El File,F=10
 S,E,Temp
 Nflux,
*Node File,F=10
 Nt,Rfl
*Print,Contact=Yes
*Output, Field,Freq=1
*Node Output
 Rf,U,Nt,Rfl
*Element Output
 S,E
*Contact Output
 Cdisp, Cstress
*End Step
**
*Step,Inc=50,Nlgeom,Amp=Ramp,Unsymm=Yes
 Step 2
*Coupled Temperature,Deltmx=100.
*Boundary,Fixed
 Top,2,2
*Boundary,Amplitude=Slide
 113, 1,1, 1.5
*End Step
**
*Step,Inc=50,Nlgeom,Unsymm=Yes
 Step 3
*Coupled Temperature-Displacement,Steady State
 10000.,10000.
*Boundary,Op=New
 Bot,2,2
 1,1,1
 7,1,1
 113,1,1
*End Step
**
*Step,Inc=50,Nlgeom,Unsymm=Yes
 Step 4
*Coupled Temperature-Displacement,Steady State
 10000.,10000.
*Dload
 103,P1,200.
 104,P1,200.
*Boundary
 113,1,1,0.0
*End Step
**
*Step,Inc=50,Nlgeom,Amp=Ramp,Unsymm=Yes
 Step 5
*Coupled Temperature-Displacement,Deltmx=100.
 10.0, 100.0
*Solution Technique,Type=Separated
*Amplitude, Name=Remove, Value=Relative, Time=Step
 0.0, 1.0,  30.0, 0.0,  100.0, 0.0
*Dflux, Amp=Remove
 103, S1, 100.0
 104, S1, 100.0
*Boundary
 113,1,1,10.0
*Boundary,Fixed
 111,2,2
 112,2,2
 113,2,2
 114,2,2
 115,2,2
*End Step