- 积分
- 0
- 注册时间
- 2008-10-21
- 仿真币
-
- 最后登录
- 1970-1-1
|
楼主 |
发表于 2012-5-21 08:42:02
|
显示全部楼层
来自 湖北武汉
mengjing120 发表于 2012-5-21 00:01
首先,要有粘结
然后,在加压开始的时候,crackini,
粘结破了之后, 才会划线表示裂纹
我按照你说的做了,就是在定义crkini、之前给颗粒加粘结,可是破坏的时候还是没有出现裂纹
- ;fname: biax_8.DAT (friction and contact bonds, case B)
- res bt_init.sav
- plot show
- pause
- set echo off
- call fishcall.fis
- call crk.fis
- call flt.fis
- set echo on
- crk_init
- plo add fish crk_item red red
- set _vfinal= 0.4 _nsteps= 2000 _nchunks= 80
- set _close= 1 ; load
- accel_platens
- cyc 15000
- zero
- set _close= 0 ; unload
- accel_platens
- cyc 4000
- zero
- set _close= 1 ; load
- accel_platens
- cyc 15000
- save biax_8.SAV
- return
复制代码 |
|