chdenghong 发表于 2008-1-7 09:52

施加粘弹性边界

大家好,这段时间我研究了下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

zhangmeng 发表于 2008-1-7 16:17

这个例子我做过,边界元是通过高阶微分方程来模拟的
这点和粘弹性不尽相同。我以前用过beasy和sysnoise,前者是边界元的首个商业软件
abaqus的边界元方法也来源于beasy
边界元不仅可以模拟无限问题,也可以很好的解决有限问题
他的核心是通过高阶微分方程使问题降维

chdenghong 发表于 2008-1-7 16:49

那么粘弹性边界你做过么?

zhangmeng 发表于 2008-1-7 18:57

你也可以将边界元理解成一种粘弹性边界(当然在无限情况下)
这种粘弹性的衰减函数是阶数很高的

zhangmeng 发表于 2008-1-7 18:58

我只是想提醒你边界元并不是仅仅用在无限问题上
他是与限元一样的另一种数值方法
在裂纹生长等方面,也包括复杂边界都是有限元方法的补充

lxm1025006 发表于 2009-3-17 17:02

回复 沙发 zhangmeng 的帖子

你好,请问你们的beasy是正版的还是下载的?
页: [1]
查看完整版本: 施加粘弹性边界