【求助】有关接触分析的问题
浏览:176012 回答:1
我仿真了一个金属塑形变形的过程,但是不知道为什么结果没有变形,有大神可以帮我看一下么?
以下是命令流:
/PREP7
ET,1,PLANE182
!*
KEYOPT,1,1,0
KEYOPT,1,3,1
KEYOPT,1,6,1
MP,EX,1,200E3
MP,PRXY,1,0.3
TB,NLIS,1,1,4,POWER
TBTEMP,0
TBDATA,,385.4,0.13,,,,
R=10E-6
H1=10E-6
H2=15E-6
H3=5E-6
W=15E-6
L=15E-6
K,1,0,0
K,2,R,0
K,3,R,H2
K,4,0,H2
K,5,0,0
K,6,W,0
K,7,W,H1
K,8,W+L,H1
K,9,0,H2
K,10,R,H2
K,11,R,H2+H3
K,12,R,0
A,1,2,3,4
L,5,12
L,12,6
L,6,7
L,7,8
L,9,10
L,10,11
ESIZE,1E-6
AMESH,1
!*
/DIST,1,1.37174211248,1
/REP,FAST
/DIST,1,1.37174211248,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
MP,MU,1,0
MAT,1
R,3
REAL,3
ET,2,169
ET,3,172
KEYOPT,3,9,0
KEYOPT,3,10,2
R,3,
RMORE,
RMORE,,0
RMORE,0
! Generate the target surface
LSEL,S,,,9
LSEL,A,,,10
CM,_TARGET,LINE
TYPE,2
LATT,-1,3,2,-1
TYPE,2
LMESH,ALL
! Create a pilot node
KSEL,S,,,11
KATT,-1,3,2,-1
KMESH,11
! Generate the contact surface
LSEL,S,,,3
CM,_CONTACT,LINE
TYPE,3
NSLL,S,1
ESLN,S,0
ESURF
*SET,_REALID,3
ALLSEL
ESEL,ALL
ESEL,S,TYPE,,2
ESEL,A,TYPE,,3
ESEL,R,REAL,,3
LSEL,S,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
LSEL,S,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
CMDEL,_TARGET
CMDEL,_CONTACT
/COM, CONTACT PAIR CREATION - END
!*
/DIST,1,1.37174211248,1
/REP,FAST
/DIST,1,1.37174211248,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
MP,MU,1,0
MAT,1
R,4
REAL,4
ET,4,169
ET,5,172
KEYOPT,5,9,0
KEYOPT,5,10,2
R,4,
RMORE,
RMORE,,0
RMORE,0
! Generate the target surface
LSEL,S,,,5
LSEL,A,,,6
LSEL,A,,,7
LSEL,A,,,8
CM,_TARGET,LINE
TYPE,4
LATT,-1,4,4,-1
TYPE,4
LMESH,ALL
! Create a pilot node
KSEL,S,,,8
KATT,-1,4,4,-1
KMESH,8
! Generate the contact surface
LSEL,S,,,1
LSEL,A,,,2
CM,_CONTACT,LINE
TYPE,5
NSLL,S,1
ESLN,S,0
ESURF
*SET,_REALID,4
ALLSEL
ESEL,ALL
ESEL,S,TYPE,,4
ESEL,A,TYPE,,5
ESEL,R,REAL,,4
LSEL,S,REAL,,4
/PSYMB,ESYS,1
/PNUM,TYPE,1
/NUM,1
EPLOT
ESEL,ALL
ESEL,S,TYPE,,4
ESEL,A,TYPE,,5
ESEL,R,REAL,,4
LSEL,S,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
CMDEL,_TARGET
CMDEL,_CONTACT
/COM, CONTACT PAIR CREATION - END
/MREP,EPLOT
FINISH
/SOL
ANTYPE,STATIC
NLGEOM,ON
N1=NODE(W+L,H1,0)
D,N1,,,,,,ALL,,,,,
DL,4,,UX,
N2=NODE(R,H2+H3,0)
D,N2,,-5E-6,,,,UY,,,,,
OUTRES,ALL,ALL,
TIME,1
AUTOTS,1
NSUBST,20,2000,10
KBC,0
RESCONTRL,DEFINE,ALL,ALL,-1
SOLVE
以下是命令流:
/PREP7
ET,1,PLANE182
!*
KEYOPT,1,1,0
KEYOPT,1,3,1
KEYOPT,1,6,1
MP,EX,1,200E3
MP,PRXY,1,0.3
TB,NLIS,1,1,4,POWER
TBTEMP,0
TBDATA,,385.4,0.13,,,,
R=10E-6
H1=10E-6
H2=15E-6
H3=5E-6
W=15E-6
L=15E-6
K,1,0,0
K,2,R,0
K,3,R,H2
K,4,0,H2
K,5,0,0
K,6,W,0
K,7,W,H1
K,8,W+L,H1
K,9,0,H2
K,10,R,H2
K,11,R,H2+H3
K,12,R,0
A,1,2,3,4
L,5,12
L,12,6
L,6,7
L,7,8
L,9,10
L,10,11
ESIZE,1E-6
AMESH,1
!*
/DIST,1,1.37174211248,1
/REP,FAST
/DIST,1,1.37174211248,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
MP,MU,1,0
MAT,1
R,3
REAL,3
ET,2,169
ET,3,172
KEYOPT,3,9,0
KEYOPT,3,10,2
R,3,
RMORE,
RMORE,,0
RMORE,0
! Generate the target surface
LSEL,S,,,9
LSEL,A,,,10
CM,_TARGET,LINE
TYPE,2
LATT,-1,3,2,-1
TYPE,2
LMESH,ALL
! Create a pilot node
KSEL,S,,,11
KATT,-1,3,2,-1
KMESH,11
! Generate the contact surface
LSEL,S,,,3
CM,_CONTACT,LINE
TYPE,3
NSLL,S,1
ESLN,S,0
ESURF
*SET,_REALID,3
ALLSEL
ESEL,ALL
ESEL,S,TYPE,,2
ESEL,A,TYPE,,3
ESEL,R,REAL,,3
LSEL,S,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
LSEL,S,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
CMDEL,_TARGET
CMDEL,_CONTACT
/COM, CONTACT PAIR CREATION - END
!*
/DIST,1,1.37174211248,1
/REP,FAST
/DIST,1,1.37174211248,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
MP,MU,1,0
MAT,1
R,4
REAL,4
ET,4,169
ET,5,172
KEYOPT,5,9,0
KEYOPT,5,10,2
R,4,
RMORE,
RMORE,,0
RMORE,0
! Generate the target surface
LSEL,S,,,5
LSEL,A,,,6
LSEL,A,,,7
LSEL,A,,,8
CM,_TARGET,LINE
TYPE,4
LATT,-1,4,4,-1
TYPE,4
LMESH,ALL
! Create a pilot node
KSEL,S,,,8
KATT,-1,4,4,-1
KMESH,8
! Generate the contact surface
LSEL,S,,,1
LSEL,A,,,2
CM,_CONTACT,LINE
TYPE,5
NSLL,S,1
ESLN,S,0
ESURF
*SET,_REALID,4
ALLSEL
ESEL,ALL
ESEL,S,TYPE,,4
ESEL,A,TYPE,,5
ESEL,R,REAL,,4
LSEL,S,REAL,,4
/PSYMB,ESYS,1
/PNUM,TYPE,1
/NUM,1
EPLOT
ESEL,ALL
ESEL,S,TYPE,,4
ESEL,A,TYPE,,5
ESEL,R,REAL,,4
LSEL,S,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
CMDEL,_TARGET
CMDEL,_CONTACT
/COM, CONTACT PAIR CREATION - END
/MREP,EPLOT
FINISH
/SOL
ANTYPE,STATIC
NLGEOM,ON
N1=NODE(W+L,H1,0)
D,N1,,,,,,ALL,,,,,
DL,4,,UX,
N2=NODE(R,H2+H3,0)
D,N2,,-5E-6,,,,UY,,,,,
OUTRES,ALL,ALL,
TIME,1
AUTOTS,1
NSUBST,20,2000,10
KBC,0
RESCONTRL,DEFINE,ALL,ALL,-1
SOLVE