模拟的一个ansys实例
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
/prep7
ET,1,SOLID164!定义单元类型
MP,DENS,1,0.64!定义材料属性
TB,EOS,1,,,1,2
MP,DENS,2,4.51
TB,EOS,2,,,1,2
MP,DENS,3,1.29e-3
TB,EOS,3,,,2,2
MP,DENS,4,7.83
TB,EOS,4,,,1,2
MP,DENS,5,1.85
TB,PLAW,5,,,1,
BLOCK,-32.5,32.5,-17.5,17.5,6.9,9.6!炸药
BLOCK,-32.5,32.5,-17.5,17.5,6.6,6.9!钛板
BLOCK,-32.5,32.5,-17.5,17.5,6.0,6.6!空气
BLOCK,-32.5,32.5,-17.5,17.5,0.0,6.0!钢板
BLOCK,-32.5,32.5,-17.5,17.5,-24.0,0.0!土壤
NUMCMP,ALL
TYPE, 1 !选取单元类型
MAT, 1 !选取材料属性
LSEL,S,,,1,8,1, !选取1-8号线
LESIZE,ALL,0.5,,,,4,,1 !设置单元尺寸大小
LSEL,S,,,9,12,1, !选取9-12号线
LESIZE,ALL,0.9,,,,4,,1 !设置单元尺寸
MSHAPE,0,3D !划分体
MSHKEY,1 !映射划分
VMESH,1 !划分1号体
TYPE, 1 !选取单元类型
MAT, 2 !选取材料属性
LSEL,S,,,13,20,1, !选取12-20号线
LESIZE,ALL,0.5,,,,4,,1 !设置单元尺寸大小
LSEL,S,,,21,24,1, !选取21-24号线
LESIZE,ALL,0.3,,,,4,,1 !设置单元尺寸大小
MSHAPE,O,3D !选择划分体
MSHKEY,1 !选择映射划分
VMESH,2 !划分2号体
TYPE, 1 !选取单元类型
MAT, 3 !选取材料属性
LSEL,S,,,25,32,1, !选取25-32号线
LESIZE,ALL,0.5,,,,4,,1 !设置单元尺寸大小
LSEL,S,,,33,36,1, !选取33-36号线
LESIZE,ALL,0.3,,,,4,,1 !设置单元尺寸大小
MSHAPE,O,3D !选择划分体
MSHKEY,1 !选择映射划分
VMESH,3 !划分3号体
TYPE, 1 !选取单元类型
MAT, 4 !选取材料属性
LSEL,S,,,37,44,1, !选取37-44号线
LESIZE,ALL,0.5,,,,4,,1 !设置单元尺寸大小
LSEL,S,,,45,48,1, !选取45-48号线
ESIZE,ALL,2.0,,,,4,,1 !设置单元尺寸大小
MSHAPE,O,3D !选择划分体
MSHKEY,1 !选择映射划分
VMESH,4 !划分4号体
TYPE, 1
MAT, 5
LSEL,S,,,49,56,1
LESIZE,ALL,2.5,,,,4,,1
LSEL,S,,,57,60,1
ESIZE,ALL,6.0,,,,4,,1
MSHAPE,0,3D
MSHKEY,1
VMESH,5
EDPART,CREATE
NSEL,S,LOC,Z,-24.0,-24.0,!定义约束
D,ALL,ALL
ALLSEL,ALL
!定义反射面对波的吸收
ASEL,S,LOC,X,-32.5,-32.5
ASEL,A,LOC,X,32.5,32.5
ASEL,A,LOC,Y,-17.5,17.5
ASEL,A,LOC,Y,17.5,17.5
ASEL,A,LOC,z,0,0
ASEL,A,LOC,Z,9.6,9.6,
CM,STRU,NODE!建立一个名为STRU的节点组员
EDNB,ADD,STRU,1,1
ALLSEL,ALL
EDASMP,ADD,6,1!定义part组
EDASMP,ADD,7,2
EDASMP,ADD,8,3
EDASMP,ADD,9,4
EDASMP,ADD,10,5
ASEL,S, , ,1
NSLA,S,1
CM,zhayao,node
ALLSEL,ALL
ASEL,S, , ,8
NSLA,S,1
CM,fuban,node
ALLSEL,ALL
EDCGEN,STS,zhayao,fuban,
EDCGEN,ESTS,1,2
EDCGEN,ESTS,2,4
EDCGEN,ESTS,4,5
EDGCALE,1,1,1
EDALE,ADD,ALL,-1,0,0,0,0,0,1e+020,1
EDENERGY,1,1,1,1!设置能量控制选项
TIME,200,!设置求解的结束时间
EDCPU,1.5E9
EDOPT,ADD,blank,LSDYNA
EDCTS,0,0.50,
EDRST,200,!设置结果文件Jobname.RST的输出步数
EDHTIME,50, !设置结果文件Jobname.HIS的输出步数
EDDUMP,1, !设置重启动文件的输出步数
EDWRITE,ANSYS, , ,
FINISH
/EXIT