【ANSYS命令流】流固耦合—爆炸

FINISH               !退出以前的模块

/CLEAR               !清除系统中的所有数据

!(1)设置工程属性

/FILNAM,EX5-3        !定义工程名称

/UNITS,SI            !采用国际单位制

/PREP7               !进入前处理模块

/VIEW,,1,2,3         !设置图形显示方式

/PLOPTS,INFO,1       !打开全部的图例

!(2)定义变量、单元类型、材料与实常数

L1=1                 !被爆炸结构长度：1m

W1=1                 !被爆炸结构宽度：1m

H1=1                 !被爆炸结构高度：1m

L2=0.05              !炸药长度：0.05m

W2=0.05              !炸药宽度：0.05m

H2=0.05              !炸药高度：0.05m

L3=0.4               !ALE空间(VOID)长度：0.4m

W3=0.4               !ALE空间(VOID)宽度：0.4m

H3=0.4               !ALE空间(VOID)高度：0.4m

Num=12               !定义网格密度参数1：被爆炸结构网格数量

Num1=2               !定义网格密度参数2：炸药空腔划分网格数量

xs=2                 !定义网格密度参数3：网格渐变系数

Num2=2               !定义网格密度参数4：炸药划分网格数量

Num3=8               !定义网格密度参数5：ALE空间划分网格数量

ET,1,SOLID164        !定义被爆炸结构的单元类型：三维体单元

R,1                  !定义被爆炸结构的实常数

MP,EX,1,10e9         !定义被爆炸结构的材料参数：弹性模量为10e9 Pa

MP,DENS,1,960        !定义被爆炸结构的材料参数：密度为960 Kg/m*3

MP,NUXY,1,.3         !定义被爆炸结构的材料参数：泊松比为0.3

TB,PLAW,1,,,1        !定义被爆炸结构的材料参数：塑性性质

TBDATA,1,1.0e6       !定义被爆炸结构的材料参数：屈服应力1.0e6 Pa

TBDATA,2,5.0e6       !定义被爆炸结构的材料参数：切线模量5.0e6 Pa

TBDATA,4,0.0         !定义被爆炸结构的材料参数：参数C

TBDATA,5,0.0         !定义被爆炸结构的材料参数：参数P

TBDATA,6,1.25        !定义被爆炸结构的材料参数：失效应变1.25

ET,2,SOLID164        !定义ALE空间的单元类型：三维体单元,在K文件中将手工修改

R,2                  !定义ALE空间的实常数

EX,2,71000.          !定义ALE空间的材料参数，在K文件中将手工修改

NUXY,2,0.33          !定义ALE空间的材料参数，在K文件中将手工修改      

DENS,2,1631          !定义ALE空间的材料参数，在K文件中将手工修改

ET,3,SOLID164        !定义炸药的单元类型：三维体单元,在K文件中将手工修改

R,3                  !定义炸药的实常数

EX,3,71000.          !定义炸药的材料参数，在K文件中将手工修改

NUXY,3,0.33          !定义炸药的材料参数，在K文件中将手工修改      

DENS,3,1631          !定义炸药的材料参数，在K文件中将手工修改

!(3)建立实体模型

/com,下面的关键点应用于被爆炸结构

K, 1, 0, 0, 0    !定义关键点 1，坐标为（0,0,0）

K, 2,-L2, 0, 0    !定义关键点 2，坐标为（-0.05,0,0）

K, 3,-L1, 0, 0    !定义关键点 3，坐标为（-1,0,0）

K, 4, 0,-H2, 0    !定义关键点 4，坐标为（0,-0.05,0）

K, 5,-L2,-H2, 0    !定义关键点 5，坐标为（-0.05,-0.05,0）

K, 6,-L1,-H2, 0    !定义关键点 6，坐标为（-1,-0.05,0）

K, 7, 0,-H1, 0    !定义关键点 7，坐标为（0,-1,0）

K, 8,-L2,-H1, 0    !定义关键点 8，坐标为（-0.05,-1,0）

K, 9,-L1,-H1, 0    !定义关键点 9，坐标为（-1,-1,0）

K,11, 0, 0,-W2    !定义关键点11，坐标为（0,0,-0.05）

K,12,-L2, 0,-W2    !定义关键点12，坐标为（-0.05,0,-0.05）

K,13,-L1, 0,-W2    !定义关键点13，坐标为（-1,0,-0.05）

K,14, 0,-H2,-W2    !定义关键点14，坐标为（0,-0.05,-0.05）

K,15,-L2,-H2,-W2    !定义关键点15，坐标为（-0.05,-0.05,-0.05）

K,16,-L1,-H2,-W2    !定义关键点16，坐标为（-1,-0.05,-0.05）

K,17, 0,-H1,-W2    !定义关键点17，坐标为（0,-1,-0.05）

K,18,-L2,-H1,-W2    !定义关键点18，坐标为（-0.05,-1,-0.05）

K,19,-L1,-H1,-W2    !定义关键点19，坐标为（-1,-1,-0.05）

K,21, 0, 0,-W1    !定义关键点21，坐标为（0,0,-1）

K,22,-L2, 0,-W1    !定义关键点22，坐标为（-0.05,0,-1）

K,23,-L1, 0,-W1    !定义关键点23，坐标为（-1,0,-1）

K,24, 0,-H2,-W1    !定义关键点24，坐标为（0,-0.05,-1）

K,25,-L2,-H2,-W1    !定义关键点25，坐标为（-0.05,-0.05,-1）

K,26,-L1,-H2,-W1    !定义关键点26，坐标为（-1,-0.05,-1）

K,27, 0,-H1,-W1    !定义关键点27，坐标为（0,-1,-1）

K,28,-L2,-H1,-W1    !定义关键点28，坐标为（-0.05,-1,-1）

K,29,-L1,-H1,-W1    !定义关键点29，坐标为（-1,-1,-1）

V, 1, 2, 5, 4,11,12,15,14    !通过8个关键点定义体

*REPEAT,2,1,1,1,1,1,1,1,1    !重复上一命令操作，共2次

V, 4, 5, 8, 7,14,15,18,17    !通过8个关键点定义体

*REPEAT,2,1,1,1,1,1,1,1,1    !重复上一命令操作，共2次

V,11,12,15,14,21,22,25,24    !通过8个关键点定义体

*REPEAT,2,1,1,1,1,1,1,1,1    !重复上一命令操作，共2次

V,14,15,18,17,24,25,28,27    !通过8个关键点定义体

*REPEAT,2,1,1,1,1,1,1,1,1    !重复上一命令操作，共2次

!(4)划分网格，建立有限元模型

/com,定义网格密度

LESIZE, 1,,,Num1     $*REPEAT,4,1,,, !在线1上将划分Num1个单元，重复4次

LESIZE, 5,,,Num1     $*REPEAT,4,2,,, !在线5上将划分Num1个单元，重复4次

LESIZE,13,,,Num,xs   $LESIZE,15,,,Num,1/xs $LESIZE,17,,,Num,1/xs $LESIZE,43,,,Num,1/xs

LESIZE,46,,,Num,1/xs $LESIZE,54,,,Num,1/xs $LESIZE,33,,,Num,1/xs $LESIZE,30,,,Num,1/xs

LESIZE,21,,,Num,xs   $LESIZE,23,,,Num,1/xs $LESIZE,28,,,Num,1/xs $LESIZE,29,,,Num,xs

LESIZE,51,,,Num,1/xs $LESIZE,47,,,Num,xs   $LESIZE,52,,,Num,xs   $LESIZE,31,,,Num,xs

LESIZE,34,,,Num,xs   $LESIZE,36,,,Num,1/xs $LESIZE,50,,,Num,1/xs $LESIZE,48,,,Num,1/xs

LESIZE,53,,,Num,1/xs $LESIZE,45,,,Num,1/xs $LESIZE,42,,,Num,xs   $LESIZE,40,,,Num,1/xs

TYPE,1               !激活单元类型1

MAT,1                !激活材料类型1

REAL,1               !激活实常数类型1

VMESH,2,8            !网格化被爆炸结构

/com,下面的关键点应用于炸药及ALE空间

K,1001, 0, 0, 0   !定义关键点1001，坐标为（0,0,0）   

K,1002,-L2, 0, 0   !定义关键点1002，坐标为（-0.05,0,0）

K,1003,-L3, 0, 0   !定义关键点1003，坐标为（-0.4,0,0）

K,1004, 0,-H2, 0   !定义关键点1004，坐标为（0,-0.05,0）

K,1005,-L2,-H2, 0   !定义关键点1005，坐标为（-0.05,-0.05,0）

K,1006,-L3,-H2, 0   !定义关键点1006，坐标为（-0.4,-0.05,0）

K,1007, 0,-H3, 0   !定义关键点1007，坐标为（0,-0.4,0）

K,1008,-L2,-H3, 0   !定义关键点1008，坐标为（-0.05,-0.4,0）

K,1009,-L3,-H3, 0   !定义关键点1009，坐标为（-0.4,-0.4,0）

K,1011, 0, 0,-W2   !定义关键点1011，坐标为（0,0,-0.05）

K,1012,-L2, 0,-W2   !定义关键点1012，坐标为（-0.05,0,-0.05）

K,1013,-L3, 0,-W2   !定义关键点1013，坐标为（-0.4,0,-0.05）

K,1014, 0,-H2,-W2   !定义关键点1014，坐标为（0,-0.05,-0.05）

K,1015,-L2,-H2,-W2   !定义关键点1015，坐标为（-0.05,-0.05,-0.05）

K,1016,-L3,-H2,-W2   !定义关键点1016，坐标为（-0.4,-0.05,-0.05）

K,1017, 0,-H3,-W2   !定义关键点1017，坐标为（0,-0.4,-0.05）

K,1018,-L2,-H3,-W2   !定义关键点1018，坐标为（-0.05,-0.4,-0.05）

K,1019,-L3,-H3,-W2   !定义关键点1019，坐标为（-0.4,-0.4,-0.05）

K,1021, 0, 0,-W3   !定义关键点1021，坐标为（0,0,-0.4）

K,1022,-L2, 0,-W3   !定义关键点1022，坐标为（-0.05,0,-0.4）

K,1023,-L3, 0,-W3   !定义关键点1023，坐标为（-0.4,0,-0.4）

K,1024, 0,-H2,-W3   !定义关键点1024，坐标为（0,-0.05,-0.4）

K,1025,-L2,-H2,-W3   !定义关键点1025，坐标为（-0.05,-0.05,-0.4）

K,1026,-L3,-H2,-W3   !定义关键点1026，坐标为（-0.4,-0.05,-0.4）

K,1027, 0,-H3,-W3   !定义关键点1027，坐标为（0,-0.4,-0.4）

K,1028,-L2,-H3,-W3   !定义关键点1028，坐标为（-0.05,-0.4,-0.4）

K,1029,-L3,-H3,-W3   !定义关键点1029，坐标为（-0.4,-0.4,-0.4）

V,1001,1002,1005,1004,1011,1012,1015,1014 !通过8个关键点定义体

*REPEAT,2,1,1,1,1,1,1,1,1                 !重复上一命令操作，共2次          

V,1004,1005,1008,1007,1014,1015,1018,1017 !通过8个关键点定义体

*REPEAT,2,1,1,1,1,1,1,1,1                 !重复上一命令操作，共2次

V,1011,1012,1015,1014,1021,1022,1025,1024 !通过8个关键点定义体

*REPEAT,2,1,1,1,1,1,1,1,1                 !重复上一命令操作，共2次

V,1014,1015,1018,1017,1024,1025,1028,1027 !通过8个关键点定义体

*REPEAT,2,1,1,1,1,1,1,1,1                 !重复上一命令操作，共2次

LESIZE, 55,,,Num2    $*REPEAT,12,1,,,     !在线55上将划分Num2个单元，重复12次

LSEL,S,LINE,, 67 $LSEL,A,LINE,, 69       !选择线段67、69成为激活状态

LSEL,A,LINE,, 71 $LSEL,A,LINE,, 75       !增加选取线段71、75成为激活状态

LSEL,A,LINE,, 77 $LSEL,A,LINE,, 78       !增加选取线段77、78成为激活状态

LSEL,A,LINE,, 82 $LSEL,A,LINE,, 83       !增加选取线段82、83成为激活状态

LSEL,A,LINE,, 84 $LSEL,A,LINE,, 85       !增加选取线段84、85成为激活状态

LSEL,A,LINE,, 87 $LSEL,A,LINE,, 88       !增加选取线段87、88成为激活状态

LSEL,A,LINE,, 90 $LSEL,A,LINE,, 92       !增加选取线段90、92成为激活状态

LSEL,A,LINE,, 94 $LSEL,A,LINE,, 96       !增加选取线段94、96成为激活状态

LSEL,A,LINE,, 97 $LSEL,A,LINE,, 99       !增加选取线段97、99成为激活状态

LSEL,A,LINE,,100 $LSEL,A,LINE,,101       !增加选取线段100、101成为激活状态

LSEL,A,LINE,,102 $LSEL,A,LINE,,104       !增加选取线段102、104成为激活状态

LSEL,A,LINE,,105 $LSEL,A,LINE,,106       !增加选取线段105、106成为激活状态

LSEL,A,LINE,,107 $LSEL,A,LINE,,108       !增加选取线段107、108成为激活状态

LESIZE, ALL,,,Num3                        !在所有激活的线上将划分Num3个单元

TYPE,2               !激活单元类型2

MAT,2                !激活材料类型2

REAL,2               !激活实常数类型2

VMESH,10,16          !网格化ALE空间

TYPE,3               !激活单元类型2

MAT,3                !激活材料类型2

REAL,3               !激活实常数类型2

VMESH,9              !网格化炸药

!(5)定义初始条件与边界条件

NSEL,S,LOC,X,        !选择所有x坐标为0.0的节点成为激活状态

DSYM,SYMM,X,         !定义激活节点的边界条件为x对称

Nsel,s,loc,y,        !选择所有y坐标为0.0的节点成为激活状态

DSYM,SYMM,y,         !定义激活节点的边界条件为y对称

Nsel,s,loc,z,        !选择所有z坐标为0.0的节点成为激活状态

DSYM,SYMM,z,         !定义激活节点的边界条件为z对称

!(6)定义求解参数

time,0.0008          !计算终止时间

edrst,100            !.RST文件的文件输出时间间隔

edhtime,100          !.HIS文件的文件输出时间间隔

EDOUT,MATSUM         !文本文件输出材料能量计算结果

EDOUT,GLSTAT         !文本文件输出模型整体信息

ALLSEL,ALL           !将全部的节点、单元都激活

SAVE                 !保存数据库文件

FINISH               !退出前处理模块

!(7)进入求解器，输出K文件

/SOLU                !进入求解器

EDWRITE,LSDYNA,'EX5-3','K',' '!输出关键字文件

? Copyright Birdol.Com 2006-2014.

继续阅读《【ANSYS命令流】流固耦合---爆炸》的全文内容...

分类: 技术分享 | Tags: | 添加评论(0)

还没有评论，您来说两句？

相关文章:

• 知网检测系统各版本区别详解 (2015-05-16)
• 不用换号，让你的手机号变成QQ号 (2012-12-04)
• 桥梁大师箱梁标注异常解决办法 (2015-08-06)
• 2014最新免费美国VPN账号及教程 (2013-03-08)
• 用win7建立无线局域网，可以共享上网可以局域网游戏 (2012-07-23)