我的问题是:两个矩形面积之间夹一个圆。用plane42单元划分的单元。边界条件是:上面矩形两边加固定约束,上边中间施加100N向下载荷,下面矩形的底边加固定约束。按接触向导建立的接触对。法向方向没有错误。
我是用GUI做的,下面是LOg文件,请高手指点!
/BATCH
/COM,ANSYS RELEASE 9.0 UP20041104 14:16:42 07/12/2006
RESUME,'pianxinhuan','db','D:/'
/COM,ANSYS RELEASE 9.0 UP20041104 14:16:43 07/12/2006
EPLOT
/PREP7
!*
FLST,5,2,4,ORDE,2
FITEM,5,2
FITEM,5,8
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y
!*
LESIZE,_Y1, , ,12, , , , ,1
!*
FLST,5,2,4,ORDE,2
FITEM,5,1
FITEM,5,5
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y
!*
LESIZE,_Y1, , ,6, , , , ,1
!*
MSHAPE,0,2D
MSHKEY,1
!*
/UI,MESH,OFF
MSHKEY,0
FLST,2,4,4
FITEM,2,1
FITEM,2,2
FITEM,2,3
FITEM,2,4
AL,P51X
FLST,2,4,4
FITEM,2,5
FITEM,2,6
FITEM,2,7
FITEM,2,8
AL,P51X
FLST,2,4,4
FITEM,2,10
FITEM,2,9
FITEM,2,12
FITEM,2,11
AL,P51X
MSHKEY,0
FLST,5,2,5,ORDE,2
FITEM,5,1
FITEM,5,-2
CM,_Y,AREA
ASEL, , , ,P51X
CM,_Y1,AREA
CHKMSH,'AREA'
CMSEL,S,_Y
!*
AMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*
MSHKEY,0
aclear,all
APLOT
FLST,5,5,4,ORDE,5
FITEM,5,2
FITEM,5,4
FITEM,5,6
FITEM,5,8
FITEM,5,11
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y
!*
LESIZE,_Y1, , ,12, , , , ,1
!*
MSHKEY,0
FLST,5,2,5,ORDE,2
FITEM,5,1
FITEM,5,-2
CM,_Y,AREA
ASEL, , , ,P51X
CM,_Y1,AREA
CHKMSH,'AREA'
CMSEL,S,_Y
!*
AMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*
MSHKEY,0
aclear,all
APLOT
FLST,5,4,4,ORDE,4
FITEM,5,1
FITEM,5,3
FITEM,5,5
FITEM,5,7
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y
!*
LESIZE,_Y1, , ,6, , , , ,1
!*
MSHKEY,0
FLST,5,2,5,ORDE,2
FITEM,5,1
FITEM,5,-2
CM,_Y,AREA
ASEL, , , ,P51X
CM,_Y1,AREA
CHKMSH,'AREA'
CMSEL,S,_Y
!*
AMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*
MSHKEY,0
TYPE, 2
MAT, 1
REAL, 1
ESYS, 0
SECNUM,
!*
MSHKEY,0
CM,_Y,AREA
ASEL, , , , 3
CM,_Y1,AREA
CHKMSH,'AREA'
CMSEL,S,_Y
!*
AMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*
MSHKEY,0
!*
!*
/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.1
MAT,1
R,3
REAL,3
ET,4,169
ET,5,172
KEYOPT,5,9,0
KEYOPT,5,10,1
R,3,
RMORE,
RMORE,,0
RMORE,0
! Generate the target surface
LSEL,S,,,9
LSEL,A,,,12
CM,_TARGET,LINE
TYPE,4
NSLL,S,1
ESLN,S,0
ESURF
CMSEL,S,_ELEMCM
! Generate the contact surface
LSEL,S,,,8
CM,_CONTACT,LINE
TYPE,5
NSLL,S,1
ESLN,S,0
ESURF
ALLSEL
ESEL,ALL
ESEL,S,TYPE,,4
ESEL,A,TYPE,,5
ESEL,R,REAL,,3
/PSYMB,ESYS,1
/PNUM,TYPE,1
/NUM,1
EPLOT
ESEL,ALL
ESEL,S,TYPE,,4
ESEL,A,TYPE,,5
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
!*
!*
/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.1
MAT,1
R,4
REAL,4
ET,6,169
ET,7,172
KEYOPT,7,9,0
KEYOPT,7,10,1
R,4,
RMORE,
RMORE,,0
RMORE,0
! Generate the target surface
LSEL,S,,,10
LSEL,A,,,11
CM,_TARGET,LINE
TYPE,6
NSLL,S,1
ESLN,S,0
ESURF
CMSEL,S,_ELEMCM
! Generate the contact surface
LSEL,S,,,2
CM,_CONTACT,LINE
TYPE,7
NSLL,S,1
ESLN,S,0
ESURF
ALLSEL
ESEL,ALL
ESEL,S,TYPE,,6
ESEL,A,TYPE,,7
ESEL,R,REAL,,4
/PSYMB,ESYS,1
/PNUM,TYPE,1
/NUM,1
EPLOT
ESEL,ALL
ESEL,S,TYPE,,6
ESEL,A,TYPE,,7
ESEL,R,REAL,,4
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
APLOT
FLST,2,1,4,ORDE,1
FITEM,2,4
!*
/GO
DL,P51X, ,ALL,0
FLST,2,2,4,ORDE,2
FITEM,2,5
FITEM,2,7
!*
/GO
DL,P51X, ,ALL,0
FLST,2,1,1,ORDE,1
FITEM,2,105
!*
/GO
F,P51X,FY,-100
FINISH
/SOL
!*
ANTYPE,0
ANTYPE,0
NLGEOM,1
NSUBST,10,100,10
TIME,100
/STATUS,SOLU
SOLVE
FINISH
/POST1
!*
/EFACET,1
PLNSOL, S,EQV, 0,1.0
FINISH
/PREP7
CWZDELE,3,1,''
CWZDELE,4,1,''
CM,_TARGET,LINE
!*
CM,_CONTACT,LINE
!*
/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.1
MAT,1
R,5
REAL,5
ET,8,169
ET,9,172
KEYOPT,9,9,0
KEYOPT,9,10,1
R,5,
RMORE,
RMORE,,0
RMORE,0
! Generate the target surface
LSEL,S,,,9
LSEL,A,,,10
LSEL,A,,,11
LSEL,A,,,12
CM,_TARGET,LINE
TYPE,8
NSLL,S,1
ESLN,S,0
ESURF
CMSEL,S,_ELEMCM
! Generate the contact surface
LSEL,S,,,5
LSEL,A,,,6
LSEL,A,,,7
LSEL,A,,,8
CM,_CONTACT,LINE
TYPE,9
NSLL,S,1
ESLN,S,0
ESURF
ALLSEL
ESEL,ALL
ESEL,S,TYPE,,8
ESEL,A,TYPE,,9
ESEL,R,REAL,,5
/PSYMB,ESYS,1
/PNUM,TYPE,1
/NUM,1
EPLOT
ESEL,ALL
ESEL,S,TYPE,,8
ESEL,A,TYPE,,9
ESEL,R,REAL,,5
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
CM,_TARGET,LINE
!*
CM,_CONTACT,LINE
!*
/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.1
MAT,1
R,6
REAL,6
ET,10,169
ET,11,172
KEYOPT,11,9,0
KEYOPT,11,10,1
R,6,
RMORE,
RMORE,,0
RMORE,0
! Generate the target surface
LSEL,S,,,9
LSEL,A,,,10
LSEL,A,,,11
LSEL,A,,,12
CM,_TARGET,LINE
TYPE,10
NSLL,S,1
ESLN,S,0
ESURF
CMSEL,S,_ELEMCM
! Generate the contact surface
LSEL,S,,,1
LSEL,A,,,2
LSEL,A,,,3
LSEL,A,,,4
CM,_CONTACT,LINE
TYPE,11
NSLL,S,1
ESLN,S,0
ESURF
ALLSEL
ESEL,ALL
ESEL,S,TYPE,,10
ESEL,A,TYPE,,11
ESEL,R,REAL,,6
/PSYMB,ESYS,1
/PNUM,TYPE,1
/NUM,1
EPLOT
ESEL,ALL
ESEL,S,TYPE,,10
ESEL,A,TYPE,,11
ESEL,R,REAL,,6
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
FINISH
/SOL
FINISH
/POST1
FINISH
/SOL
/STATUS,SOLU
SOLVE
FINISH
/POST1
!*
/EFACET,1
PLNSOL, S,EQV, 0,1.0
FINISH |