声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 3502|回复: 5

施加粘弹性边界

[复制链接]
发表于 2008-1-7 09:52 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
大家好,这段时间我研究了下ABAQUS里的无限元,其实质就是一种粘性边界。现在的问题是如果我要实现粘弹性边界(粘性边界精度不高),即在粘性边界上加弹簧,该如何若考虑?  有这方面的研究的可以一起探讨下!  我的QQ: 94658376  
附件为实现无限元的inp文件  
*HEADING
*NODE
1,0.,0.
801,2E-3,0.
17,0.,-2E-3
817,2E-3,-2E-3
*NGEN,NSET=LHS
1,17
*NGEN,NSET=RHS
801,817
*NFILL
LHS,RHS,16,50
*NSET,NSET=INFER1,GEN
17,817,50
*NSET,NSET=INFER2,GEN
801,816
*NSET,NSET=INTER
INFER1,INFER2
*NCOPY,OLD SET=INTER,CHANGE NUMBER=1000,POLE,NEW SET=FAR
1,
*NSET,NSET=FILEN
13,103,601
*ELEMENT,TYPE=CPE4R,ELSET=FE
1,2,52,51,1
*ELGEN,ELSET=FE
1,16,1,1,16,50,16
*SOLID SECTION,ELSET=FE,MATERIAL=MAT1
*ELEMENT,TYPE=CINPE4,ELSET=IE
257,67,17,1017,1067
273,816,817,1817,1816
*ELGEN,ELSET=IE
257,16,50,1
273,16,-1,1
*ELSET,ELSET=LOAD,GEN
1,81,16
*SOLID SECTION,ELSET=IE,MATERIAL=MAT1
*MATERIAL,NAME=MAT1
*ELASTIC
7.3E10,0.33
*DENSITY
2842.0,
*BOUNDARY
LHS,1
*AMPLITUDE,NAME=PULSE
0,0E-7,1,2E-7,0
**
*STEP,INC=400
*DYNAMIC,NOHAF
8E-9,1.5E-6
*DLOAD,AMPLITUDE=PULSE
LOAD,P3,1E9
*OUTPUT,FIELD
*NODE OUTPUT
U,V,A
*OUTPUT,HISTORY
*NODE OUTPUT,NSET=FILEN
U,V,A
*NODE FILE,FREQUENCY=1000,NSET=FILEN
U
回复
分享到:

使用道具 举报

发表于 2008-1-7 16:17 | 显示全部楼层
这个例子我做过,边界元是通过高阶微分方程来模拟的
这点和粘弹性不尽相同。我以前用过beasy和sysnoise,前者是边界元的首个商业软件
abaqus的边界元方法也来源于beasy
边界元不仅可以模拟无限问题,也可以很好的解决有限问题
他的核心是通过高阶微分方程使问题降维
 楼主| 发表于 2008-1-7 16:49 | 显示全部楼层
那么粘弹性边界你做过么?
发表于 2008-1-7 18:57 | 显示全部楼层
你也可以将边界元理解成一种粘弹性边界(当然在无限情况下)
这种粘弹性的衰减函数是阶数很高的
发表于 2008-1-7 18:58 | 显示全部楼层
我只是想提醒你边界元并不是仅仅用在无限问题上
他是与限元一样的另一种数值方法
在裂纹生长等方面,也包括复杂边界都是有限元方法的补充
发表于 2009-3-17 17:02 | 显示全部楼层

回复 沙发 zhangmeng 的帖子

你好,请问你们的beasy是正版的还是下载的?
您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-11-14 13:25 , Processed in 0.065676 second(s), 17 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表