| 查看: 2337 | 回复: 7 | |||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | |||
[交流]
ansys模拟残余应力的问题，不会写命令流 已有4人参与
|
|||
|
/FILNAME,EXERCISE1 /TITLE,TRANSIENT THERMAL ANALYSYS TO A SPHERE KEYW,PR_THERM,1 /PreP7 MPTEMP,,,,,,,, MPTEMP,1,0 MPDATA,DENS,1,,1780 MPTEMP,,,,,,,, MPTEMP,1,20 MPTEMP,2,100 MPTEMP,3,200 MPTEMP,4,300 MPTEMP,5,400 MPTEMP,6,700 MPDATA,C,1,,1050 MPDATA,C,1,,1130 MPDATA,C,1,,1170 MPDATA,C,1,,1210 MPDATA,C,1,,1260 MPDATA,C,1,,1300 MPTEMP,,,,,,,, MPTEMP,1,20 MPTEMP,2,100 MPTEMP,3,200 MPTEMP,4,300 MPTEMP,5,400 MPTEMP,6,700 MPDATA,KXX,1,,96.4 MPDATA,KXX,1,,101 MPDATA,KXX,1,,105 MPDATA,KXX,1,,109 MPDATA,KXX,1,,113 MPDATA,KXX,1,,150 /prep7 /units,si rb=0.001*0.1 length=0.001*5 width=0.001*5 height=0.001*1 et,1,solid70 et,2,solid70 block,0,length,-0.5*width,0.5*width,0,height Block,0,length,-3*Rb,3*Rb,0,height Block,0,length,-12*Rb,12*Rb,0,height VOVLAP,ALL !!!!!!!!!!!!!!!!!!!!!!!!!!!!!主要焊接部位 VSEL,S, , , 2 ASLV,S LSLA,S lesize,all,rb ALLSEL,ALL type,1 vsweep,2 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!上下次要区域 VSEL,S, , , 4 ASLV,S LSLA,S lesize,all,3*rb ALLSEL,ALL VSEL,S, , , 5 ASLV,S LSLA,S lesize,all,3*rb ALLSEL,ALL type,1 vsweep,4 vsweep,5 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!焊接部位与次要区域的链接区域 MSHAPE,1,3D MSHKEY,0 type,2 vmesh,6 vmesh,7 /Solu antype,trans,new nlgeom,on timint,1,struct Timint,1,therm timint,0,mag Timint,0,elect Tintp,0.005,-1,0.5,0.2 nropt,auto,, autos,on outres,,all tref,25 !!!!!初始条件，室温，25° SFA,ALL,1,CONV,62.3,25 !!!!!对流换热系数62.3 p=600 !!激光功率 ef=1 !!激光吸收率 r=0.001*0.1 !!激光热源半径 qmax=(p*ef)/(3.14*r*r) v=0.004 !!焊接速度为250mm/min tinc=rb/v VSEL,S, , , 2 !选取焊接部分的节点 ESLV,S *get,nemax,elem,,num,max *get,nemin,elem,,num,min ALLSEL,ALL max_time=length/rb+1 *do,k,1,max_time,1 a=v*(k-1)*tinc c=height *do,i,nemin,nemax,1 xsy=centrx(i) !读取该单元的中心坐标 ysy=centry(i) zsy=centrz(i) rr=abs(sqrt((xsy-a)*(xsy-a)+ysy*ysy+(zsy-c)*(zsy-c))) !该单元中心距离热源中心 *if,rr,le,r,then !该单元中心在加热半径范围内 qr=qmax*exp(-(rr*rr)/(r*r)) !该单元中心处的热流大小 sfe,i,,hflux,,qr,qr,qr,qr !在每个单元所指定的面上施加热源载荷 *endif *enddo time,k*rb/v nsubst,5 !设定每个时间步长内有5个子步 solve !计算 SFEDELE,ALL,1,HFLUX *enddo save 这是找别人写的命令流，但是那哥们儿临时有事儿写不了了，我对这个不太懂模拟了一下 好像是有温度场，找不到应力的结果。有没有哪位大神能帮忙给写下 应力场的命令流。跪谢了。十万火急啊～！！ 285466480这是小弟的QQ号 有什么问题可以联系。必有重谢。 |
回复此楼» 猜你喜欢
一志愿华南师范大学0702物理学305调剂
已经有5人回复
-
求调剂
已经有30人回复
-
266求调剂
已经有10人回复
-
297求调剂
已经有16人回复
-
326分，一志愿沪9，求生物学调剂
已经有4人回复
-
288求调剂，一志愿华南理工大学071005
已经有3人回复
-
304求调剂
已经有13人回复
-
调剂
已经有18人回复
-
293调剂
已经有4人回复
-
338求调剂
已经有7人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- ansys命令流怎么学
已经有6人回复
- ansys热力学温度应力问题
已经有9人回复
- ANSYS中对一组体的选择集，怎么用ADPL命令流获取这组体的编号到一个数组里啊？
已经有3人回复
- ansys命令流汇总
已经有92人回复
- ansys仿真中残余应力影响
已经有2人回复
- ansys焊接热应力分析温度场是对的，残余应力分布是错的
已经有11人回复
- 关于残余热应力中剪切应力和切向应力的区别
已经有6人回复
- [急寻]ANSYS车辆移动荷载的命令流
已经有7人回复
- ansys有时命令不能用
已经有6人回复
- ansys apdl 热-应力耦合算残余应力，材料参数是哪些
已经有19人回复
- 小女子跪求ANSYS高手看命令，只求顺利毕业
已经有11人回复
- abaqus残余应力模拟
已经有7人回复
- ansys热残余应力
已经有14人回复
- ansys残余应力模拟
已经有9人回复
- ANSYS workbench 接触应力的模拟问题
已经有10人回复
- ANSYS模拟传热不收敛，请高手相助。附有命令流
已经有3人回复
- ANSYA 命令流求助
已经有14人回复
- 帮忙看看ANSYS中这个是一什么命令
已经有5人回复
- ansys的命令流看不明白，能不能帮忙翻译一下命令流是怎么操作的？？？
已经有4人回复
- 求助热障涂层的残余应力场模拟ansys命令流！
已经有18人回复
- 【求助】求助--反射式光弹测量残余应力
已经有8人回复
- 【求助】ANSYS分析应力过程中存在的问题
已经有3人回复
- 【求助】ansys进行淬火过程模拟残余应力时比容变化的处理
已经有6人回复
- 【求助】消除残余应力的具体方法
已经有17人回复
7楼2019-06-11 18:57:26
founderyuan
新虫 (初入文坛)
 |
3楼2014-05-31 16:58:22
285561706
木虫 (著名写手)
- 应助: 32 (小学生)
- 金币: 2699.9
- 散金: 14
- 红花: 6
- 帖子: 1999
- 在线: 176.9小时
- 虫号: 2436293
- 注册: 2013-04-25
- 性别: GG
- 专业: 气体放电与放电等离子体技
5楼2014-06-04 09:38:46
6楼2014-08-12 21:11:27
