复杂岩石爆炸。
岩石及炮泥用wb前处理;
空气炸药几百个,wb输出太多part,无法形成多物质组,因此流体用apdl处理网格。
1)wb建立岩石炮泥及炸药空气模型;

2)Wb进行岩石炮泥网格划分及边界设置;注意pa相关的材料参数需要除以e12,或者k文件修改材料也可以。
*MAT_PLASTIC_KINEMATIC
$ ID ro E pr sigy Etan beta unused1
1 2.3 0.3 0.18 0.0003 0.03 1
$ src srp fs vp unused2
0 0 0 0

3)Apdl进行炸药空气的网格划分及边界设置;

4)分别获得2个k文件;
5)对WB或者apdl的k文件,导入lsprepost,修改part号,重新输出k文件3;

6)直接用lsprepost合并k文件,导入第二个k后,要点击一下偏置,即使不需要偏置,也要点一下,不然有问题。

7)再编辑part,单元,材料,流固耦合,起爆,ale,多物质组等。
*SECTION_SOLID
$ ID elform aet unused1
1 1 0
*MAT_PLASTIC_KINEMATIC
$ ID ro E pr sigy Etan beta unused1
1 2.3 3E+11 0.18 300000000 3E+10 1
$ src srp fs vp unused2
0 0 0 0
*MAT_ADD_EROSION
$ ID excl mxpres mneps effeps voleps numfip ncs
1 0 0 0 0 0 0 0
$ mnpres sigp1 sigvm mxeps epssh sigth impulse failtm
0 210000000 0 0 0 0 0 0
*PART
$ partname
rocky
$ ID secid mid eosid hgid grav adopt tmid
1 1 1 0 0 0 0 0
*SECTION_SOLID_ALE
$# secid elform aet
2 11 0
*CONTROL_ALE
2,1,1,-1
*MAT_NULL
$空气ckgus单位制
2 1.2929e-3
*EOS_LINEAR_POLYNOMIAL
2 -1e-6 0.00 0.00 0.00 0.4 0.4 0.00
2.068e-6 1.0
$$炸药TNT
*MAT_HIGH_EXPLOSIVE_BURN
3 1.63 0.693 0.27 0.00E+0
*EOS_JWL
3 3.71 7.43E-02 4.15 0.950 0.30 7.0E-02 1.00
$
*INITIAL_DETONATION
3,0,0,0,0
*PART
$# title
Part 2 for Mat 2 and Elem Type 1
$# pid secid mid eosid hgid grav adpopt tmid
3 2 3 3 0 0 0 0
*PART
$# title
Part 1 for Mat 1 and Elem Type 1
$# pid secid mid eosid hgid grav adpopt tmid
2 2 2 2 0 0 0 0
$
*ALE_MULTI-MATERIAL_GROUP
2 1
3 1
$
*SET_PART_LIST
1
1
*SET_PART_LIST
2
2,3
*CONSTRAINED_LAGRANGE_IN_SOLID
1 2 0 0 2 5 2 0
0 0 0.15 0.1
2 0.3
9)求解;

上边是几年前的老方法了,现在流固耦合更多的使用sale方法。