具体问题如下:
有如下一个模型(附上建模命令流),其实就是模拟钻头的情况。
模型图示如下:
模型剖一半:
模型整体效果:
其中一个圆筒:
其中一个圆柱:
模型存在的问题:转速加到1000以上不收敛。实际问题要求转速达到4000。
悬赏要求:
1、可以更改的项目:
(1)建模方式以及网格划分方式
(2)约束可以考虑更改,这个模型主要是模拟钻头。更改约束最好根据钻头的情况更改。
(3)求解器可以选择。弧长法等方法可以选择。求解设置的很多参数都可以更改
(4)接触对方式可以选择。比如说选择刚柔接触
2、不可更改项目:
(1)材料参数
(2)载荷。 集中力和转速不得更改。要求转速4000收敛
(3)几何参数最好不要修改。
3、成果要求
转速4000,收敛(最主要的内容)。给出整理好的命令流。
求出参考命令流里面 关键点8的位置的径向变形量。
参考建模命令流:
finish
/clear
/PREP7
ET,1,SOLID185
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,1,,6.4e5
MPDATA,PRXY,1,,0.22
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,2,,2.0e5
MPDATA,PRXY,2,,0.3
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,DENS,1,,15e-6
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,DENS,2,,7.8e-6
!*
TB,BISO,1,1,2,
TBTEMP,0
TBDATA,,5460,0,,,,
TB,BISO,2,1,2,
TBTEMP,0
TBDATA,,530,135,,,,
K,1,,4,,
K,2,,6.2,,
K,3,,4.5,28,
K,4,,3,28,
K,5,,3,10,
K,6,,4,10,
K,7,,3.004,5,
K,8,,3.004,68,
K,9,,0,68,
K,10,,0,5,
l,1,2
l,2,3
l,3,4
l,4,5
l,5,6
l,6,1
al,all
l,7,8
l,8,9
l,9,10
l,10,7
al,7,8,9,10
aplot
vrotat,1,2,,,,,9,10
!mesh the volume
allsel,all
ESIZE,2,0,
lsel,,,,18,52,17
lsel,a,,,26,60,17
lsel,a,,,63,68,5
lesize,all,,,4
mat,2
VSEL,,,,1,7,2
CM,_Y1,VOLU
CHKMSH,'VOLU'
VSWEEP,_Y1
CMDELE,_Y1
mat,1
VSEL,,,,2,8,2
CM,_Y1,VOLU
CHKMSH,'VOLU'
VSWEEP,_Y1
CMDELE,_Y1
allsel,all
MP,MU,2,0.2
MAT,2
MP,EMIS,2,7.88860905221e-031
R,3
REAL,3
ET,2,170
ET,3,174
KEYOPT,3,9,0
KEYOPT,3,10,2
R,3,
R,3,,,10,0.1,0,
RMORE,
RMORE,,,1.0E20,0.008,1.0,
RMORE,0.0,0,1.0,,1.0,0.5
RMORE,0,1.0,1.0,0.0,,1.0
! Generate the target surface
ASEL,S,,,10,21,11
ASEL,A,,,32,42,10
CM,_TARGET,AREA
TYPE,2
NSLA,S,1
ESLN,S,0
ESURF
! Generate the contact surface
ASEL,S,,,6,39,11
CM,_CONTACT,AREA
TYPE,3
NSLA,S,1
ESLN,S,0
ESURF
cmdele,all
allsel,all
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
施加约束
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
csys,1
allsel,all
nrotat,all
asel,,,,3,36,11
da,all,uz
da,all,ux
allsel,all
allsel,all
dtran
arclen,on,
!eqslv,front
!EQSLV,PCG,1E-8
NLGEOM,1
NSUBST,20,
AUTOTS,1
NEQIT,1000
TIME,1
!LNSRCH,1
PRED,ON,,ON
OMEGA,0,0,4000,0
ksel,,,,8
nslk,s
f,all,fx,-250
allsel,all
/solu
allsel,all
solve
[ 本帖最后由 wishangtian 于 2007-9-18 19:14 编辑 ] |