- 积分
- 4
- 注册时间
- 2004-10-6
- 仿真币
-
- 最后登录
- 1970-1-1
|
楼主 |
发表于 2007-9-27 13:16:23
|
显示全部楼层
来自 浙江金华
XXXX !选中边界的棱边,因为棱边AX,AY,AZ都要耦合
YYYY !选择边界面
!XXXX和YYYY需要根据自己的问题写
nsll,s,1
cm,mubdry2n,node
nsla,s,all
norl,all,,1 !这一条是我加上的,因为相对于下面nora的那一指令
cmse,u,mubdry2n
cm,mubdry1n,node
nora,all,1
alls
*get,nmax,node,,num,max
esel,s,mat,,6
nsle
cm,scrap_e,elem
cm,scrap_n,node
ngen,2,nmax,all
egen,2,nmax,all
cmse,s,scrap_n
cmse,s,scrap_e
edel,all
ndel,all
alls
numc,node
alls ! UNSELECT "FLAT SURFACE" NODES, LEAVING CORNER
cmse,u,mubdry2n ! AND EDGE NODES. COUPLE AX/Y/Z ?????这一条为什么不是cmse,s,mubdry2n
cpintf,ax,1e-8
cpintf,ay,1e-8
cpintf,az,1e-8
alls ! UNSELECT EDGE/CORNER NODES, LEAVING ONLY FLAT
cmse,u,mubdry1n ! SURFACE NODES. COUPLE AY/Z ONLY?????这一条为什么不是cmse,s,mubdry1n
cpintf,ay,1e-8
cpintf,az,1e-8
可能我没有说明,bill的mbdryMVP.mac用你的一段程序代替了,我把代替的那段程序补上去了,剩下的步骤就是耦合自由度、复制和删除网格和节点了
但是我看了bill的程序,我不知道这两部是针对那些节点和网格
[ 本帖最后由 ponderadams 于 2007-9-27 15:59 编辑 ] |
|