请教下:圆环与方块间的建立的面面接触对正确吗

hbwzz

1． 合金试件 尺寸为14×10×8mm     为弹性体，单元为plane42，弹性体，为目标面，选用TARGE169
2． 45号钢环形试样 尺寸为Φ40×16×10mm    为弹塑性体，单元为plane182，为接触面，选用CONTA172   另外 F=50N，ω=20rad/s。

对圆环内经径向固定,方块是左右两边给固定死了,在底部作用个力.可以做出来,但结果过侵了,不对呀.

我的命令流文件为:

/PREP7  
ET,1,SOLID45
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,EX,1,,2.1e5  
MPDATA,PRXY,1,,0.29
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,EX,2,,2.1e5  
MPDATA,PRXY,2,,0.29
CYL4, , ,8, ,20, ,10
WPSTYLE,,,,,,,,1
KWPAVE,       1
wpoff,,-4,5
BLOCK,-7,7,-4,4,-5,5,   
CSYS,0  
WPAVE,0,0,0
wpro,,,90.000000
VSBW,       1   
wpro,,-90.000000,   
FLST,2,2,6,ORDE,2   
FITEM,2,3   
FITEM,2,-4  
VSBW,P51X   
FLST,5,4,6,ORDE,3   
FITEM,5,1   
FITEM,5,5   
FITEM,5,-7  
CM,_Y,VOLU  
VSEL, , , ,P51X
CM,_Y1,VOLU
CMSEL,S,_Y  
!*  
CMSEL,S,_Y1
VATT,       1, ,   1,       0   
CMSEL,S,_Y  
CMDELE,_Y   
CMDELE,_Y1  
!*  
CM,_Y,VOLU  
VSEL, , , ,       2
CM,_Y1,VOLU
CMSEL,S,_Y  
!*  
CMSEL,S,_Y1
VATT,       2, ,   1,       0   
CMSEL,S,_Y  
CMDELE,_Y   
CMDELE,_Y1  
!*  
/USER,  1   
/VIEW,  1,  0.442226351099    ,  0.180096391659    ,  0.878635956529
/ANG,   1,   2.73251265896  
/REPLO  
FLST,5,8,4,ORDE,2   
FITEM,5,9   
FITEM,5,-16
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1, , ,12, , , , ,1
!*  
FLST,5,1,4,ORDE,1   
FITEM,5,18  
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1, , ,8, , , , ,1  
!*  
FLST,5,1,4,ORDE,1   
FITEM,5,27  
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1, , ,12, , , , ,1
!*  
FLST,5,2,4,ORDE,2   
FITEM,5,26  
FITEM,5,30  
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1, , ,8, , , , ,1  
!*  
FLST,5,5,6,ORDE,4   
FITEM,5,1   
FITEM,5,-2  
FITEM,5,5   
FITEM,5,-7  
CM,_Y,VOLU  
VSEL, , , ,P51X
CM,_Y1,VOLU
CHKMSH,'VOLU'   
CMSEL,S,_Y  
!*  
VSWEEP,_Y1  
!*  
CMDELE,_Y   
CMDELE,_Y1  
CMDELE,_Y2  
/DIST,1,1.08222638492,1
/REP,FAST   
/DIST,1,0.924021086472,1
/REP,FAST   
!*  
!*  
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.24
MAT,1   
MP,EMIS,1,7.88860905221e-031
R,3
REAL,3  
ET,2,170
ET,3,174
R,3,,,1.0,0.1,0,
RMORE,,,1.0E20,0.0,1.0,
RMORE,0.0,0,1.0,,1.0,0.5
RMORE,0,1.0,1.0,0.0,,1.0
KEYOPT,3,4,0
KEYOPT,3,5,0
KEYOPT,3,7,0
KEYOPT,3,8,0
KEYOPT,3,9,0
KEYOPT,3,10,2   
KEYOPT,3,11,0   
KEYOPT,3,12,0   
KEYOPT,3,2,0
KEYOPT,2,5,0
! Generate the target surface   
ASEL,S,,,13
ASEL,A,,,14
ASEL,A,,,21
ASEL,A,,,22
CM,_TARGET,AREA
TYPE,2  
NSLA,S,1
ESLN,S,0
ESLL,U  
ESEL,U,ENAME,,188,189   
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
ASEL,S,,,10
CM,_CONTACT,AREA
TYPE,3  
NSLA,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,2  
ESEL,A,TYPE,,3  
ESEL,R,REAL,,3  
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,2  
ESEL,A,TYPE,,3  
ESEL,R,REAL,,3  
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
/MREP,EPLOT
/ANG,1,30,XS,1  
/REP,FAST   
/ANG,1,-30,XS,1
/REP,FAST   
SAVE
SAVE
SAVE
SAVE,'sanweimoxing001','db','D:\ANSYSE~1\'  
/ANG,1,-30,XS,1
/REP,FAST   
/ANG,1,30,XS,1  
/REP,FAST   
/ANG,1,30,YS,1  
/REP,FAST   
/ANG,1,-30,YS,1
/REP,FAST   
/ANG,1,30,YS,1  
/REP,FAST   
/ANG,1,-30,XS,1
/REP,FAST   
/ANG,1,30,XS,1  
/REP,FAST   
/ANG,1,30,ZS,1  
/REP,FAST   
/ANG,1,-30,ZS,1
/REP,FAST   
/ANG,1,-30,XS,1
/REP,FAST   
/ANG,1,30,XS,1  
/REP,FAST   
/ANG,1,30,XS,1  
/REP,FAST   
/ANG,1,-30,XS,1
/REP,FAST   
/ANG,1,-30,XS,1
/REP,FAST   
/ANG,1,30,XS,1  
/REP,FAST   
CSYS,1  
FLST,2,434,1,ORDE,71
FITEM,2,1   
FITEM,2,-11
FITEM,2,166
FITEM,2,-169
FITEM,2,302
FITEM,2,-312
FITEM,2,317
FITEM,2,323
FITEM,2,488
FITEM,2,-498
FITEM,2,503
FITEM,2,560
FITEM,2,-570
FITEM,2,575
FITEM,2,632
FITEM,2,-746
FITEM,2,1158
FITEM,2,-1165   
FITEM,2,1168
FITEM,2,-1176   
FITEM,2,1178
FITEM,2,-1238   
FITEM,2,1247
FITEM,2,-1250   
FITEM,2,1379
FITEM,2,-1475   
FITEM,2,1479
FITEM,2,1483
FITEM,2,1487
FITEM,2,1506
FITEM,2,1635
FITEM,2,-1636   
FITEM,2,1646
FITEM,2,-1647   
FITEM,2,1657
FITEM,2,-1658   
FITEM,2,1660
FITEM,2,-1661   
FITEM,2,1668
FITEM,2,-1674   
FITEM,2,1679
FITEM,2,-1686   
FITEM,2,1689
FITEM,2,-1711   
FITEM,2,1722
FITEM,2,2386
FITEM,2,-2388   
FITEM,2,2394
FITEM,2,-2395   
FITEM,2,2401
FITEM,2,-2402   
FITEM,2,2409
FITEM,2,3501
FITEM,2,3507
FITEM,2,-3508   
FITEM,2,3514
FITEM,2,-3515   
FITEM,2,3521
FITEM,2,-3522   
FITEM,2,3528
FITEM,2,-3529   
FITEM,2,3534
FITEM,2,-3536   
FITEM,2,3540
FITEM,2,-3543   
FITEM,2,3547
FITEM,2,-3550   
FITEM,2,3553
FITEM,2,-3557   
FITEM,2,3561
FITEM,2,-3564   
NROTAT,P51X
FINISH  
/SOL
/VIEW,1,,,1
/ANG,1  
/REP,FAST   
FLST,2,432,1,ORDE,18
FITEM,2,302
FITEM,2,-312
FITEM,2,317
FITEM,2,323
FITEM,2,488
FITEM,2,-498
FITEM,2,503
FITEM,2,560
FITEM,2,-570
FITEM,2,575
FITEM,2,632
FITEM,2,-746
FITEM,2,1155
FITEM,2,-1250   
FITEM,2,1379
FITEM,2,-1474   
FITEM,2,1635
FITEM,2,-1722   
!*  
/GO
D,P51X, , , , , ,UX, , , , ,
CSYS,0  
FLST,2,2,4,ORDE,2   
FITEM,2,21  
FITEM,2,23  
!*  
/GO
DL,P51X, ,UX,   
FLST,2,1,4,ORDE,1   
FITEM,2,23  
!*  
/GO
DL,P51X, ,UX,   
FLST,2,1,4,ORDE,1   
FITEM,2,24  
/GO
!*  
SFL,P51X,PRES,50,   
OMEGA,0,0,20,0  
SAVE
ANTYPE,0
NLGEOM,1
NSUBST,20,0,0   
TIME,1  
/STATUS,SOLU
SOLVE   
FINISH  
/POST1  
SET,NEXT
SET,LAST
!*  
/EFACET,1   
PLNSOL, S,X, 0,1.0  
!*  
/EFACET,1   
PLNSOL, S,EQV, 0,1.0
!*  
/EFACET,1   
PLNSOL, S,EQV, 0,1.0
!*  
/EFACET,1   
PLNSOL, CONT,PRES, 0,1.0
/EFACET,1   
PLNSOL, CONT,PRES, 0,1.0
RESUME  
/COM,ANSYS RELEASE 10.0    UP20050718       17:28:23    11/01/2009
FINISH  
/SOL
FLST,2,162,1,ORDE,9
FITEM,2,395
FITEM,2,-409
FITEM,2,420
FITEM,2,-421
FITEM,2,432
FITEM,2,931
FITEM,2,-946
FITEM,2,1027
FITEM,2,-1154   
!*  
/GO
D,P51X, , , , , ,UX, , , , ,
FLST,2,108,1,ORDE,2
FITEM,2,325
FITEM,2,-432
/GO
!*  
SF,P51X,PRES,50
FLST,2,108,1,ORDE,2
FITEM,2,325
FITEM,2,-432
/GO
!*  
SF,P51X,PRES,500/108
/STATUS,SOLU
SOLVE   
RESUME  
/COM,ANSYS RELEASE 10.0    UP20050718       17:32:17    11/01/2009
FLST,2,108,1,ORDE,2
FITEM,2,325
FITEM,2,-432
/GO
FLST,2,1,4,ORDE,1   
FITEM,2,24  
/GO
!*  
SFL,P51X,PRES,500/108,  
FLST,2,108,1,ORDE,2
FITEM,2,325
FITEM,2,-432
/GO
!*  
SF,P51X,PRES,   
FLST,2,108,1,ORDE,2
FITEM,2,325
FITEM,2,-432
/GO
WPSTYL, STAT
/STATUS,SOLU
SOLVE   
FINISH  
/POST1  
!*  
/EFACET,1   
PLNSOL, S,EQV, 0,1.0
RESUME  
/COM,ANSYS RELEASE 10.0    UP20050718       17:38:21    11/01/2009
FINISH  
/POST26
FILE,'sanweimoxing000','rst','.'
/UI,COLL,1  
NUMVAR,200  
SOLU,191,NCMIT  
STORE,MERGE
FILLDATA,191,,,,1,1
REALVAR,191,191
FINISH  
/SOL
FLST,2,162,1,ORDE,9
FITEM,2,395
FITEM,2,-409
FITEM,2,420
FITEM,2,-421
FITEM,2,432
FITEM,2,931
FITEM,2,-946
FITEM,2,1027
FITEM,2,-1154   
!*  
/GO
D,P51X, , , , , ,ALL, , , , ,   
FLST,2,108,1,ORDE,2
FITEM,2,325
FITEM,2,-432
/GO
FLST,2,1,4,ORDE,1   
FITEM,2,24  
/GO
!*  
SFL,P51X,PRES,50,   
/STATUS,SOLU
SOLVE   
FINISH  
/POST1  
!*  
/EFACET,1   
PLNSOL, S,EQV, 0,1.0
!*  
/EFACET,1   
PLNSOL, S,X, 0,1.0  
/EFACET,1   
PLNSOL, S,X, 0,1.0  
!*  
/EFACET,1   
PLNSOL, S,EQV, 0,1.0
!*  
/EFACET,1   
PLNSOL, CONT,SFRIC, 0,1.0   
/EFACET,1   
PLNSOL, CONT,SFRIC, 0,1.0   
!*  
/EFACET,1   
PLNSOL, S,EQV, 0,1.0
/EFACET,1   
PLNSOL, S,EQV, 0,1.0