24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 2331  |  回复: 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 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 22408 调剂材料 +5 我叫ez 2026-04-06 6/300 2026-04-07 01:28 by going home
[考研] 336求调剂,一志愿中科大 +6 墨彧 yuyu 2026-04-06 6/300 2026-04-06 23:19 by zzchen2000
[考研] 08600生物与医药-327 +9 18755400796 2026-04-05 9/450 2026-04-06 22:35 by 52305043001
[考研] 297分083200求助 +9 aekx 2026-04-05 9/450 2026-04-06 20:57 by flysky1234
[考研] 专硕304找调剂,一线城市最好 +3 李lsl李 2026-04-05 3/150 2026-04-06 12:16 by ffffjjjj
[考研] 336材料与化工085600求调剂 +9 水星记infp 2026-04-05 12/600 2026-04-06 11:46 by 水星记infp
[考研] 求调剂,一志愿厦门大学,生物与医药,总分272,本科211 +4 Electron1cc 2026-04-01 5/250 2026-04-06 10:45 by barlinike
[考研] 求调剂 +5 wos666 2026-04-03 5/250 2026-04-06 10:13 by 蓝云思雨
[考研] 调剂 +3 李广火 2026-04-05 3/150 2026-04-05 18:57 by 蓝云思雨
[考研] 材料调剂 +7 dxy调剂 2026-04-04 7/350 2026-04-05 09:15 by 陌秋26
[考研] 本科211 分数293请求调剂 +4 莲菜就是藕吧 2026-04-01 4/200 2026-04-04 22:32 by hemengdong
[考研] 材料调剂 +18 一样YWY 2026-04-02 19/950 2026-04-04 22:14 by hemengdong
[考研] [调剂信息]085408光电信息 求调剂 总分291分数一英一 +3 iz11az 2026-04-02 3/150 2026-04-04 19:09 by 蓝云思雨
[考研] 334求调剂 +9 Trying] 2026-03-31 9/450 2026-04-03 15:18 by 琢珥丶
[考研] 工科 267求调剂 +5 wanwan00 2026-04-02 7/350 2026-04-03 14:14 by zhangdingwa
[考研] 283求调剂 +3 jiouuu 2026-04-03 4/200 2026-04-03 13:28 by jiouuu
[考研] 材料调剂 +4 一样YWY 2026-04-03 4/200 2026-04-03 09:48 by 蓝云思雨
[考研] 0856材料与化工调剂,339 +14 10213207 2026-03-31 14/700 2026-04-02 21:01 by 1104338198
[考研] 322求调剂 +5 熹僖XX 2026-03-31 6/300 2026-04-02 10:08 by 求调剂zz
[考研] 318求调剂 +8 七忆77 2026-04-01 8/400 2026-04-01 10:37 by Jaylen.
信息提示
请填处理意见