Contact

FINISH  
/CLEAR,START

/PREP7  
BLOCK,0,10,0,10,0,0.1,

BLOCK,4,6,4,6,0.1,2.1,

ET,1,SOLID186   

MP,EX,1,2E11 
MP,PRXY,1,0.3  

ESIZE,0.5
VMESH,ALL

VSEL,S,,,1
ESLV
CM,PLATE,elem
NSLE
NSEL,R,LOC,Z,0.1
CM,PLATE_CFACE,node

VSEL,S,,,2
ESLV
CM,CUBE,elem
NSLE
NSEL,R,LOC,Z,0.1
CM,CUBE_CFACE,node

allsel

!############## Create contact ###################

MP,MU,1,0.3 
MAT,1   

R,3 
REAL,3  
ET,2,170
ET,3,174

! Generate the target surface   
NSEL,S,,,PLATE_CFACE
TYPE,2  
ESLN,S,0
ESURF   

! Generate the contact surface  
NSEL,S,,,CUBE_CFACE 
TYPE,3  
ESLN,S,0
ESURF   

ALLSEL  
  
!##################################################

/SOLU

NSEL,S,LOC,Z,0
D,ALL,ALL,0

CMSEL,S,CUBE
NSLE
NSEL,R,LOC,X,4
D,ALL,UX,3

NSEL,S,LOC,Z,2.1
F,ALL,FZ,-1000

ALLSEL

NSUBST,10,100,10
OUTRES,ALL,ALL

SOLVE

/POST1

SET,LAST

PLNSOL,CONT,SFRIC