24小时热门版块排行榜    

查看: 2300  |  回复: 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的回帖

founderyuan

新虫 (初入文坛)

别沉啊
2楼2014-05-31 13:24:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

founderyuan

新虫 (初入文坛)

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

founderyuan

新虫 (初入文坛)

大神都去哪了
4楼2014-06-02 17:25:38
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

285561706

木虫 (著名写手)


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

一缕轻烟01

金虫 (正式写手)


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

346507037

铁虫 (正式写手)


小木虫: 金币+0.5, 给个红包,谢谢回帖
热应力分析很简单的,只要温度场计算准确,自己就可以多琢磨一下
7楼2019-06-11 18:57:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

曹枣林

金虫 (正式写手)


小木虫: 金币+0.5, 给个红包,谢谢回帖
我看楼主是模拟激光焊的吧,我目前在做这方面的。这个是温度场的命令流,没有涉及应力场的命令流。
8楼2019-06-11 19:51:25
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 founderyuan 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 本人考085602 化学工程 专硕 +15 不知道叫什么! 2026-03-15 17/850 2026-03-17 10:13 by Sammy2
[考研] 材料与化工304求B区调剂 +7 邱gl 2026-03-11 8/400 2026-03-17 09:36 by 努力学习赚彩礼
[考研] 275求调剂 +3 太阳花天天开心 2026-03-16 3/150 2026-03-17 08:01 by 热情沙漠
[考研] 341求调剂 +5 捣蛋猪猪 2026-03-11 5/250 2026-03-17 06:56 by Muziwl
[文学芳草园] 伙伴们,祝我生日快乐吧 +17 myrtle 2026-03-10 26/1300 2026-03-16 18:32 by 青橙Ln
[考研] 085600调剂 +5 漾漾123sun 2026-03-12 6/300 2026-03-16 15:58 by 漾漾123sun
[考研] 0703化学调剂,求各位老师收留 +8 秋有木北 2026-03-14 8/400 2026-03-16 15:21 by 哦哦123
[教师之家] 焦虑 +7 水冰月月野兔 2026-03-13 9/450 2026-03-16 10:00 by Quakerbird
[考研] 085601材料工程315分求调剂 +3 yang_0104 2026-03-15 3/150 2026-03-15 10:58 by peike
[考研] 311求调剂 +5 牛乳糖的卡卡 2026-03-10 5/250 2026-03-14 00:05 by JourneyLucky
[考研] 341求调剂 +3 番茄头--- 2026-03-10 3/150 2026-03-13 23:07 by JourneyLucky
[考研] 一志愿中科院,化学方向,295求调剂 +4 一氧二氮 2026-03-11 4/200 2026-03-13 22:35 by JourneyLucky
[考研] 336求调剂 +6 Iuruoh 2026-03-11 6/300 2026-03-13 22:06 by JourneyLucky
[考研] 0856材料与化工301求调剂 +5 奕束光 2026-03-13 5/250 2026-03-13 22:00 by 星空星月
[考研] 290求调剂 +9 ADT 2026-03-11 9/450 2026-03-13 21:55 by JourneyLucky
[考研] 四川大学085601材料工程专硕 初试294求调剂 +4 祝我们好在冬天 2026-03-11 4/200 2026-03-13 21:39 by peike
[考研] 26考研求调剂 +5 丶宏Sir 2026-03-13 5/250 2026-03-13 13:05 by JourneyLucky
[考研] 290求调剂 +3 ADT 2026-03-13 3/150 2026-03-13 10:19 by peike
[考研] 283求调剂,材料、化工皆可 +8 苏打水7777 2026-03-11 10/500 2026-03-13 09:06 by Linda Hu
[考研] 279求调剂 +3 莫xiao 2026-03-10 4/200 2026-03-11 08:06 by 斩魂滴兔子!
信息提示
请填处理意见