/title,analysis of a axis contacting a hole in a dise(單位：MPa,m,N,s) !定義標(biāo)題
/prep7
!*數(shù)據(jù)輸入
t=0.43e-3 !過(guò)盈量
d1=0.57807 !外圈內(nèi)徑
da=0.85 !外圈外徑
d2=d1+t !軸徑
dd=0.15 !軸內(nèi)徑
l1=0.44
l2=0.46 !接觸長(zhǎng)度
!*
ET,1,SOLID185 !定義單元類型
!*
MP,EX,1,2.1E11 !定義材料屬性
MP,PRXY,1,0.3
!*
CYL4,0,0,d1/2,0,da/2,60,l1 !創(chuàng)建1/4圓環(huán)
CYL4,0,0,dd/2,0,d2/2,60,l2
VGEN,,2,,,,,-0.01,,,1 !移動(dòng)軸
!*
LESIZE,17,,,10,,,,,1 !定義線的分網(wǎng)尺寸
LESIZE,19,,,10,,,,,1
LESIZE,16,,,10,,,,,1
LESIZE,14,,,10,,,,,1
!*
LESIZE,13,,,10,,,,,1
LESIZE,15,,,10,,,,,1
LESIZE,18,,,10,,,,,1
LESIZE,20,,,10,,,,,1
!*
LESIZE,22,,,6,,,,,1
!*
LESIZE,2,,,10,,,,,1
LESIZE,4,,,10,,,,,1
LESIZE,5,,,10,,,,,1
LESIZE,7,,,10,,,,,1
!*
LESIZE,6,,,8,,,,,1
LESIZE,8,,,8,,,,,1
!*
LESIZE,10,,,6,,,,,1
!*
VSWEEP,ALL !用掃掠方式對(duì)創(chuàng)建的體進(jìn)行網(wǎng)格劃分
!*
/COM,CONTACT PAIR CREATION-START
MP,MU,1,0.11 !定義接觸磨擦系數(shù)
MAT,1
R,3 !定義接觸實(shí)常數(shù)
REAL,3
ET,2,170 !定義接觸單元類型
ET,3,174
R,3,,,0.1,0.1,,
NROPT,UNSYM
!*GENERATE THE TARGET SURFACE 下面創(chuàng)建目標(biāo)面
ASEL,S,,,4
CM,_TARGET,AREA
TYPE,2
NSLA,s,1
esln,s,0
esurf,all
!*GENERATE THE contact SURFACE 下面創(chuàng)建接觸面
asel,s,,,9
cm,_contact,area
type,3
nsla,s,1
esln,s,0
esurf,all
cmdel,_target
cmdel,_contact
allsel,all
eplot
finish
!*
/solu !進(jìn)入求解器
da,5,symm !定義面的對(duì)稱位移邊條
da,6,symm
da,11,symm
da,12,symm
!da,2,all, !定義面的位移約束條件
!*
antype,0 !指定分析類型為靜力分析
nlgeom,1 !考慮大變形影響
autots,0
time,100
solve !求解第一載荷步
/POST1
!*
/EFACET,1
PLNSOL, S,EQV, 0,1.0