/filename,ex5-3                            	!趨
/title,the contact analysis of Bearing          !趨
!************************************
!ǰģ
!************************************
/prep7
*set,roll_r,5.7                              	!
*set,inside_r1,15
*set,inside_r2,18.5
*set,outside_r1,29.8 
*set,outside_r2,33.3
*set,deep,8 
*set,axes_r3,15.5
*set,fillet_r4,1
*set,axes_deep,20
*set,fillet_r5,1
!嵥Ԫͺ
et,1,solid45                                	!嵥Ԫsolid45
MP,EX,1,2.06e5                            	!嵯ģ
MP,PRXY,1,0.3                            	!岴ɱ 
MP,MU,1,0.3                              	!Ħϵ
!ģ
sph4,,-inside_r2-roll_r,roll_r+0.9              !й
cyl4,,,inside_r1,-120,inside_r2,-60,deep        !+zȦ
cyl4,,,outside_r1,-120,outside_r2,-60,deep      !+zȦ
cyl4,,,inside_r1,-120,inside_r2,-60,-deep       !-zȦ
cyl4,,,outside_r1,-120,outside_r2,-60,-deep     !-zȦ
wpoff,0,0,-deep                              	!ƫƹƽ
cyl4,,,0,-120,axes_r3,-60,-axes_deep            !װ
lfillt,57,59,fillet_r4,,                        !ɵ 
al,57,62,59,54,61                             	!
vrotat,32,,,,,,42,37,60,1,                      !ת
vdele,6,,,1                                  	!ɾΪ6
!
lfillt,31,39,fillet_r5,,                        !ɵ
al,34,39,53,31,37                             	!
vdrag,27,,,,,,35                               	!
vdele,4,,,1                                   	!ɾΪ4
!
vgen,,7,,,,,0.27,,,1                        	!ƽƱΪ7
!
wpoff,0,0,deep                          	!ƫƹƽ 
csys,1                                 		!ϵ
asel,s,loc,x,inside_r2                     	!ѡx=inside_r2
asel,a,loc,x,outside_r1                    	!ѡx=ouside_r1
vsba,1,all                              	!屻ָ
vdele,4,,,1                              	!ɾΪ4
vdele,8,,,1                              	!ɾΪ8
allsel,all                               	!ѡȫͼԪ
vsel,u,volu,,7                           	!ѡΪ7
vglue,all                               	!ճȫ
!ͨһЩԷ񻮷
wpoff,0,-inside_r2-roll_r,0                 	!ƫƹƽ
vsbw,1                                 		!ùƽָ1
wpro,,-90,                              	!תƽ 
vsbw,2                                 		!ùƽָ2
vsbw,3                                 		!ùƽָ3
wpro,,,-90                               	!תƽ
vsbw,1                                 		!ùƽָ1
vsbw,2                                 		!ùƽָ2
vsbw,5                                 		!ùƽָ5
vsbw,6                                 		!ùƽָ6
!
voffst,2,-4                              		!ķƽ2
voffst,9,-4                              		!ķƽ9
voffst,23,-4                             		!ķƽ23
voffst,53,-4                             		!ķƽ53
!
voffst,3,4                               		!ķƽ3
voffst,25,4                              		!ķƽ25
voffst,38,4                              		!ķƽ38
voffst,58,4                              		!ķƽ58
!
vovlap,all                               		!дӲ
vdele,25,,,1                              !ɾΪ25弰ĵͽͼԪ
vdele,32,,,1                              !ɾΪ32弰ĵͽͼԪ
vdele,33,,,1                              !ɾΪ33弰ĵͽͼԪ
vdele,34,,,1                              !ɾΪ34弰ĵͽͼԪ
! 
vdele,31,,,1                              !ɾΪ31弰ĵͽͼԪ
vdele,35,,,1                              !ɾΪ35弰ĵͽͼԪ
vdele,36,,,1                              !ɾΪ36弰ĵͽͼԪ
vdele,37,,,1                              !ɾΪ37弰ĵͽͼԪ
vglue,all                              		!ճӲ
!
esize,2                               		!趨Ԫߴ
mshape,0,3d                           		!趨״Ϊ嵥Ԫ
mshkey,1                             		!趨Ϊӳ񻮷ַʽ
vsel,s,volu,,1,3                         	!ѡΪ123 
vsel,a,volu,,5                          	!ͬʱѡΪ5
vsel,a,volu,,9                          	!ͬʱѡΪ9 
vsel,a,volu,,12,14                       	!ͬʱѡΪ121314
cm,sphere,volu                         		!sphere
vmesh,all                              		!񻮷
!
esize,1                               		!趨Ԫߴ 
vsel,inve,volu                         		!Եǰѡ񼯽зѡ
vsweep,all                            		!sweep񻮷
esize,1.5                              		!趨Ԫߴ
vsweep,41,50,49                                 !趨ԴĿ沢sweep񻮷
vsweep,7,32,37                                  !趨ԴĿ沢sweep񻮷
!  
!
cmsel,s,sphere,volu                     	!ѡΪsphere
vgen,2,all,,,,,,,0                        	!Ƹ
cmsel,s,sphere,volu                     	!ѡΪsphere
vclear,all                             		!ͼԪ
vdele,all,,,1                           	!ɾͼԪ
!
csys,1                                		!ϵ
asel,s,loc,x,inside_r2                    	!ѡx=inside_r2
asel,a,loc,x,outside_r1                   	!ͬʱѡx=outside_r1
asel,u,loc,y,-90                         	!ӵǰѡвѡy=-90
nsla,s,1                               		!ѡĽڵ
nrotat,all                              	!תڵϵ뵱ǰϵƽ
cpintf,ux                              	!غϽڵɶux
cpintf,uy                              	!غϽڵɶuy
cpintf,uz                              	!غϽڵɶuz
!
!趨Ӵ
/PREP7  
ALLSEL,ALL                          	!ѡȫͼԪ
/COM, CONTACT PAIR CREATION - START     !Ӵÿʼ
/GSAV,cwz,gsav,,temp                    !ǰͼñcwz.gsavļ
!
MP,MU,1,0.3                           		!Ħϵ
MAT,1                                		!1
R,3                                   		!ʵ3
REAL,3                               		!ʵ3
ET,2,170                              		!嵥Ԫ2
ET,3,174                              		!嵥Ԫ3
KEYOPT,3,9,0                         		!趨Ԫ3Ĺؼ9
KEYOPT,3,10,1                        		!趨Ԫ3Ĺؼ10
R,3,,,0.1,                              	!趨ӴնΪ0.1 
!Ŀ
ASEL,S,,,30                            		!ѡΪ30
ASEL,A,,,90                            		!ͬʱѡбΪ90
ASEL,A,,,98                            		!ͬʱѡбΪ98
ASEL,A,,,104                           		!ͬʱѡбΪ104
ASEL,A,,,113                           		!ͬʱѡбΪ113
ASEL,A,,,138                           		!ͬʱѡбΪ138
ASEL,A,,,143                           		!ͬʱѡбΪ143
CM,AREA_TARGET,AREA               		!Ŀtarget
TYPE,2                                		!Ԫ2
NSLA,S,1                               		!ѡĽڵ
ESLN,S,0                               		!ѡڵĵԪ
ESURF                                 		!ڵǰѡĵԪϸɵԪ
ESEL,ALL                              		!ѡеĵԪ
!ɽӴ
ASEL,S,,,35                             	!ѡΪ35
ASEL,A,,,36                             	!ͬʱѡбΪ36
CM,AREA_CONTACT,AREA              		!ɽӴcontact
TYPE,3                                 		!Ԫ3
NSLA,S,1                               		!ѡĽڵ
ESLN,S,0                               		!ѡڵĵԪ
ESURF                                 		!ڵǰѡĵԪϸɵԪ 
ALLSEL                                		!ѡȫͼԪ
ESEL,ALL                              		!ѡȫԪ  
ESEL,S,TYPE,,2                         		!ѡԪΪ2ĵԪ
ESEL,A,TYPE,,3                         		!ͬʱѡеԪΪ3ĵԪ
ESEL,R,REAL,,3                         	!ڵǰѡѡʵΪ3ĵԪ
/PSYMB,ESYS,1                         	!򿪵Ԫϵʾ 
/PNUM,TYPE,1                          	!򿪵Ԫͱ
/NUM,1                                 	!ɫʾ
EPLOT                                  	!ͼʾԪ
ALLSEL,ALL                            	!ѡȫͼԪ
/GRES,cwz,gsav                          !cwz.gsavļлָͼ 
/COM, CONTACT PAIR CREATION - END    	!ӴԽ
!**********************************
!ģ
!**********************************
/solu                                     	!ģ
csys,1                                    	!ϵ 
nsel,s,loc,x,outside_r2                       	!ѡx=outside_r2Ľڵ
d,all,all                                   	!ڽڵʩȫɶԼ
asel,s,loc,y,-60                             	!ѡy=-60
asel,a,loc,y,-120                            	!ͬʱѡy=-120
da,all,symm                                	!ʩӶԳƱ߽
!ʩװƶλ
da,33,uz,2*deep                             	!ڱΪ33ʩλԼ
!
lnsrch,on                                   	!
pred,on                                    	!Ԥ 
autot,on                                    	!Զʱ䲽
nsubst,40,100,10                             	!趨Ӳ
outres,all,all                                 	!Ӳϵȫ
allsel,all                                    	!ѡͼԪ
solve                                       	!ʼ
!**********************************
!ģ
!**********************************
/POST1                                     	!ͨú
PLDISP,2                                   	!ͼʾṹͼ
/DSCALE,1,1.0                              	!趨ʾΪ1.0
/EXPAND,6,POLAR,FULL,0,60,0,,              	!չ360 
/REPLOT                                   	!ػ浱ǰͼ
PLNSOL,S,Z                                	!ͼʾzӦ
PLNSOL,S,EQV                             	!ͼʾƽЧӦ
FINISH                                          !ģ
/EXIT,ALL                                       !˳ȫ
