资源描述:
《abaqus焊接模拟分析程序(包括应力场和温度场)》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、Abaqus焊接模拟分析程序(包括应力场和温度场)【我的硕士论文的一部分】求解温度场!上表面上没有对流换热边界条件!单位制:米、秒、摄氏度!/CLEAR,START/FILNAME,temp,0/COM,ANSYSRELEASE10.0UP2005071800:09:5211/26/2007/CONFIG,NRES,5000/PREP7/VIEW,1,1,2,3/ANG,1/REP,FAST!*!===============================================================
2、================================!指定单元ET,1,SOLID70!*!*!===============================================================================================!材料属性!=====================================================================================!316LMPTEMP,,,,,,,,MPTE
3、MP,1,0MPDATA,DENS,1,,7850MPTEMP,,,,,,,,MPTEMP,1,20MPTEMP,2,300MPTEMP,3,900MPTEMP,4,1400MPTEMP,5,2000MPDATA,KXX,1,,18.6MPDATA,KXX,1,,21.4MPDATA,KXX,1,,28.4MPDATA,KXX,1,,33.9MPDATA,KXX,1,,48MPTEMP,,,,,,,,MPTEMP,1,20MPTEMP,2,600MPTEMP,3,800MPTEMP,4,1400MPTEMP,5,2000
4、MPDATA,C,1,,502MPDATA,C,1,,612MPDATA,C,1,,635MPDATA,C,1,,659MPDATA,C,1,,670MPTEMP,,,,,,,,MPTEMP,1,20MPTEMP,2,1300MPTEMP,3,1410MPTEMP,4,1440MPTEMP,5,1550MPTEMP,6,2000MPDATA,ENTH,1,,7.88e7MPDATA,ENTH,1,,6.131e9MPDATA,ENTH,1,,7.347e9MPDATA,ENTH,1,,9.145e9MPDATA,ENTH
5、,1,,1.03e10MPDATA,ENTH,1,,1.272e10!===============================================================================================!定义常量WidthBase=0.025!宽度HeightBase=0.02!基底高度Length=0.09!长度WidthClad=0.0015!宽度HeightDeposition=0.00375!覆层高度Layer=15!层数HeightClad=Height
6、Deposition/layerdt=0.0001!小量Temp=20!环境温度InitTemp=300!初始温度CoffConv=30!对流换热系数!===============================================================================================!定义常量Velocity=0.003!扫描速度StepDis=0.0015!每个载荷步位移LaserPower=700!激光功率Radius=0.0015!激光光斑半径Area=3.
7、14159265*(Radius**2)!激光光斑面积Factor=0.3!吸收因子StepTime=StepDis/Velocity!每个载荷步时间TotalTime=(Length+Radius*2)/Velocity!载荷持续时间(扫描一层)StepNum=(Length+Radius*2)/StepDis!载荷步数!===============================================================================================!建模BL
8、OCK,0,Length,0,-0.0066,0,WidthClad,BLOCK,0,Length,0,-0.0066,WidthClad,0.0067BLOCK,0,Length,-0.0066,-HeightBase,0,WidthClad,K,,0,0,WidthBase,K,,Length,0,WidthBa