Abaqus焊接模拟分析程序(包括应力场和温度场)

合集下载
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

【我的硕士论文的一部分】求解温度场

!上表面上没有对流换热边界条件

!单位制:米、秒、摄氏度

!

/CLEAR,START

/FILNAME,temp,0

/COM,ANSYS RELEASE 10.0 UP20050718 00:09:52 11/26/2007

/CONFIG, NRES, 5000

/PREP7

/VIEW,1,1,2,3

/ANG,1

/REP,FAST

!*

!=============================================================================

==================!指定单元

ET,1,SOLID70

!*

!*

!=============================================================================

==================!材料属性

!=============================================================================

========!316L

MPTEMP,,,,,,,,

MPTEMP,1,0

MPDATA,DENS,1,,7850

MPTEMP,,,,,,,,

MPTEMP,1,20

MPTEMP,2,300

MPTEMP,3,900

MPTEMP,4,1400

MPTEMP,5,2000

MPDATA,KXX,1,,18.6

MPDATA,KXX,1,,21.4

MPDATA,KXX,1,,28.4

MPDATA,KXX,1,,33.9

MPDATA,KXX,1,,48

MPTEMP,,,,,,,,

MPTEMP,1,20

MPTEMP,2,600

MPTEMP,3,800

MPTEMP,4,1400

MPTEMP,5,2000

MPDATA,C,1,,502

MPDATA,C,1,,612

MPDATA,C,1,,635

MPDATA,C,1,,659

MPDATA,C,1,,670

MPTEMP,,,,,,,,

MPTEMP,1,20

MPTEMP,2,1300

MPTEMP,3,1410

MPTEMP,4,1440

MPTEMP,5,1550

MPTEMP,6,2000

MPDATA,ENTH,1,,7.88e7

MPDATA,ENTH,1,,6.131e9

MPDATA,ENTH,1,,7.347e9

MPDATA,ENTH,1,,9.145e9

MPDATA,ENTH,1,,1.03e10

MPDATA,ENTH,1,,1.272e10

!=============================================================================

==================!定义常量

WidthBase=0.025 !宽度HeightBase=0.02 !基底高度Length=0.09 !长度

WidthClad=0.0015 !宽度

HeightDeposition=0.00375 !覆层高度

Layer=15 !层数

HeightClad=HeightDeposition/layer

dt=0.0001 !小量

Temp=20 !环境温度InitTemp=300 !初始温度CoffConv=30 !对流换热系数

!=============================================================================

==================!定义常量

Velocity=0.003 !扫描速度StepDis=0.0015 !每个载荷步位移

LaserPower=700 !激光功率Radius=0.0015 !激光光斑半径Area=3.14159265*(Radius**2) !激光光斑面积

Factor=0.3 !吸收因子

StepTime=StepDis/Velocity !每个载荷步时间TotalTime=(Length+Radius*2)/Velocity !载荷持续时间(扫描一层) StepNum=(Length+Radius*2)/StepDis !载荷步数

!=============================================================================

==================!建模

BLOCK,0,Length,0,-0.0066,0,WidthClad,

BLOCK,0,Length,0,-0.0066,WidthClad,0.0067

BLOCK,0,Length,-0.0066,-HeightBase,0,WidthClad,

K, ,0,0,WidthBase,

K, ,Length,0,WidthBase,

K, ,0,-HeightBase,WidthBase,

K, ,Length,-HeightBase,WidthBase,

V, 16, 13, 27, 25, 15, 1

4, 28, 26

相关文档
最新文档