[原创]不同结构单元之间link关系子程序

qh200091 · 发表于 2009-8-7 17:57:19

11111111111111111111111111111111111111

qh200091 · 发表于 2009-8-7 17:57:35

11111111111111111111111111111111111111111111111111111111111111111

qh200091 · 发表于 2009-8-7 17:57:51

提示: 该帖被管理员或版主屏蔽

zhigang.gu · 发表于 2009-8-20 16:06:43

结构单元如beam、liner，起点、终点处共节点，那他们之间有无相互作用，如何作用？
是否不同结构单元之间一定要设置link

xiaolongqdf001 · 发表于 2009-9-28 07:46:42

看不到附件啊

simsky · 发表于 2009-10-19 23:26:47

太感谢了，我正在为这个link发愁了

yazhouqin · 发表于 2009-10-25 11:40:41

下下来试试

skyworth24 · 发表于 2009-10-27 14:13:51

没看到附件

li_2001 · 发表于 2009-11-13 15:47:48

怎么看不到附件啊

li_2001 · 发表于 2009-11-13 17:20:13

new
gen zone brick size 10 10 10 &
p0 0 0 0 p1 10 0 0 p3 0 0 10
model mohr
prop bulk 1e8 shear 0.3e8 fric 35 coh 1e10 ten 1e10
set grav 0 0 -9.81
ini dens 1000
fix x range x 0
fix x range x 10
fix y range y 0
fix y range y 10
fix z range z 0
hist unbal
set hist_rep 10
solve
save 初始平衡.sav

ini xdisp 0 ydisp 0 zdisp 0
ini xvel 0 yvel 0 zvel 0
model null range x 0 2 y 0 2 z 0 2
solve
save 1次开挖.sav

restore 初始平衡.sav
ini xdisp 0 ydisp 0 zdisp 0
ini xvel 0 yvel 0 zvel 0
model null range x 0 2 y 0 2 z 0 2
def place_cables
loop m(1,2)
caseof m
case 1
x_d1=0.5
x_d2=0.5
x_d3=0.5
y_d1=0.5
y_d2=0.5
y_d3=0.5
z_d1=1.5
z_d2=2.0
z_d3=3.5
case 2
x_d1=0.5
x_d2=0.5
x_d3=0.5
y_d1=1.5
y_d2=1.5
y_d3=1.5
z_d1=1.5
z_d2=2.0
z_d3=3.5
endcase
loop n(1,2)
x_d1=x_d1+1
x_d2=x_d2+1
x_d3=x_d3+1
y_d1=y_d1
y_d2=y_d2
y_d3=y_d3
z_d1=z_d1
z_d2=z_d2
z_d3=z_d3
  command
  sel cable beg x_d1 y_d1 z_d1 end x_d2 y_d2 z_d2 nseg 2
  sel cable beg x_d2 y_d2 z_d2 end x_d3 y_d3 z_d3 nseg 4
  sel cable prop emod 2e10 ytension 3.1e5 xcarea 0.0004906 &
gr_coh 1 gr_k 1 gr_per 0.0785 range cid 1,2
  sel cable prop emod 2e10 ytension 3.1e5 xcarea 0.0004906 &
gr_coh 10e5 gr_k 2e7 gr_per 0.0785 range cid 3,6
  sel delete link range id 1
  sel link id=100 1 target zone
  sel link attach xdir=rigid ydir=rigid zdir=rigid xrdir=rigid yrdir=rigid zrdir=rigid range id 1
  sel cable pretension 60e3 range cid 1,6
  endcommand
  end_loop
  end_loop
  end
  place_cables

li_2001 · 发表于 2009-11-13 17:20:33

请高手看看问题在哪里怎么改

laiy55555 · 发表于 2010-3-24 19:03:27

没附件，没真相啊

ycding · 发表于 2010-3-31 14:28:49

附件已经补上，大家可以下载了。

深夜来访电话 · 发表于 2010-4-5 00:49:28

谢谢楼主！楼主真是好人，对你的感激之情如滔滔江水！

laiy55555 · 发表于 2010-4-5 18:16:15

感谢非常楼主太谢谢了~~~~~~

laiy55555 · 发表于 2010-4-5 18:16:34

找了很久的~~~~~~

zhangguangc · 发表于 2010-4-6 15:15:14

高手啊，一定要好好学习！

jiangjwhl · 发表于 2010-5-6 21:06:55

正为结构单元困扰中啊

laiy55555 · 发表于 2010-5-6 21:39:14

谢谢啦~~~~找了很久的

laiy55555 · 发表于 2010-5-6 21:39:40

忘记说了很有用~~一定认真学

账号		自动登录	找回密码
密码			注册

账号		自动登录	找回密码
密码			立即注册

qh200091 qh200091 当前离线积分 -6 注册时间 2009-3-9 仿真币最后登录 1970-1-1 IP卡狗仔卡头像被屏蔽	发表于 2009-8-7 17:57:51 \| 显示全部楼层来自上海提示: 该帖被管理员或版主屏蔽

	回复赞不支持使用道具举报显身卡

[结构单元] [原创]不同结构单元之间link关系子程序