24小时热门版块排行榜    

Znn3bq.jpeg
查看: 2364  |  回复: 7
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

founderyuan

新虫 (初入文坛)

[交流] 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号 有什么问题可以联系。必有重谢。
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

一缕轻烟01

金虫 (正式写手)


小木虫: 金币+0.5, 给个红包,谢谢回帖
你好,你现在的这个搞得怎么样啦,我现在也在学着做残余应力相关的东西,可否请教一下啊,谢谢!
6楼2014-08-12 21:11:27
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 8 个回答

founderyuan

新虫 (初入文坛)

3楼2014-05-31 16:58:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

285561706

木虫 (著名写手)


小木虫: 金币+0.5, 给个红包,谢谢回帖
单元首先是可以热应力分析单元solid45之类   再参数补充弹性模量  泊松比等物性参数 可以参考下《基于温度和应力场的焊接残余应力数值分析》 或者其他“热应力”相关的例子
、简单就好、
5楼2014-06-04 09:38:46
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

346507037

铁虫 (正式写手)


小木虫: 金币+0.5, 给个红包,谢谢回帖
热应力分析很简单的,只要温度场计算准确,自己就可以多琢磨一下
7楼2019-06-11 18:57:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 260求调剂 +3 Zyt1314520.. 2026-04-17 4/200 2026-04-17 21:06 by Eurekall
[考研] 接受任何调剂 +4 也就是栗子 2026-04-17 4/200 2026-04-17 17:57 by Equinoxhua
[考研] 271求调剂 +37 2261744733 2026-04-11 39/1950 2026-04-17 10:11 by 黑科技矿业
[考研] 收到复试调剂但是去不了 +6 小蜗牛* 2026-04-16 6/300 2026-04-17 10:05 by 涵竹刘
[考研] 300求调剂 +11 橙a777 2026-04-15 11/550 2026-04-16 22:43 by cfdbai
[考研] 327求调剂 +26 Xxjc1107. 2026-04-13 29/1450 2026-04-16 10:52 by Espannnnnol
[考研] 求调剂推荐 +8 小聂爱学习 2026-04-14 8/400 2026-04-16 07:22 by 学员JpLReM
[考研] 0854调剂 +13 长弓傲 2026-04-12 16/800 2026-04-15 13:45 by fenglj492
[考研] 085801电气专硕272求调剂 +19 电气李 2026-04-13 21/1050 2026-04-15 13:37 by 黑科技矿业
[考研] 366求调剂 +11 不知名的小卅 2026-04-11 11/550 2026-04-14 15:50 by zs92450
[考研] 求调剂 +12 何气正 2026-04-13 13/650 2026-04-14 14:47 by zs92450
[考研] 305求调剂 +8 玛卡巴卡boom 2026-04-11 8/400 2026-04-14 09:04 by pengliang8036
[考研] B区0809 ,数一英一,290 求调剂 +3 泠潍1111 2026-04-12 4/200 2026-04-13 20:35 by 学员JpLReM
[考研] 302求调剂 +10 易!? 2026-04-13 10/500 2026-04-13 19:04 by lbsjt
[考研] 材料考研调剂 +29 云木达达 2026-04-11 31/1550 2026-04-13 13:32 by lyh鲁老师
[考研] 一志愿浙大生物325分求调剂 +9 zysheng 2026-04-12 9/450 2026-04-12 22:31 by yuyin1233
[考研] 344 材料专业 求调剂211 无地域要求 +8 hualkop 2026-04-11 8/400 2026-04-12 22:24 by fqwang
[考研] 调剂结束 +6 floriea 2026-04-12 8/400 2026-04-12 18:13 by zhouxiaoyu
[考研] 331求调剂 +5 王国帅 2026-04-11 5/250 2026-04-11 22:56 by 溪涧流水
[考研] 调剂求助 +6 果然有我 2026-04-11 7/350 2026-04-11 16:22 by 明月此时有
信息提示
请填处理意见