声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 1166|回复: 3

[结构分析] 热应力分析结果有错误,求教知情高手

[复制链接]
发表于 2007-6-21 22:17 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
使用生死单元,每一步激活一部分焊缝。但在第一步结束时,系统就提示错误,说部分单元变形严重。问怎么会产生这么奇怪的变形呢。
1.GIF
回复
分享到:

使用道具 举报

 楼主| 发表于 2007-6-23 15:05 | 显示全部楼层
察看了一下帮助文件,可能是生死单元带来的系数矩阵突变造成的。我按帮助说的,减少了步长和激活单元的速度,可是还是不行。要挂了,兄弟们谁有类似经验,可千万要在某有生之年不吝赐教啊。
发表于 2007-6-23 15:17 | 显示全部楼层
单元生死应用实例(命令行格式)
问题描述
等截面杆两端固定,承受均匀的温度载荷时将其中间1/3段移去。过程是将其应变自由化并移去均匀温度。分析其热应力和应变情况。
  
  1.    /PREP7   

  2.    /TITLE, ELEMENT BIRTH/DEATH IN A FIXED BAR WITH THERMAL LOADING

  3.    ET,1,LINK1          !二维杆单元

  4.    MP,EX,1,30E6        !材料特性

  5.    MP,ALPX,1,.00005

  6.    MP,EX,2,30E6

  7.    MP,ALPX,2,.00005    !重新‘出生’单元的特性

  8.    MP,REFT,2,100       !单元出生的参考温度

  9.    R,1,1.0

  10.    N,1  

  11.    N,4,10   

  12.    FILL

  13.    E,1,2     

  14.    EGEN,3,1,-1         !生成三个单元

  15.    FINISH   

  16.    

  17.    /SOLU   

  18.    ANTYPE,STATIC

  19.    D,1,ALL,,,4,3       !固定杆的两端

  20.    TREF,0              !参考温度0度

  21.    TUNIF,100           !均匀温度载荷

  22.    NROPT,FULL

  23.    OUTPR,BASIC,ALL

  24.    SOLVE   

  25.    EKILL,2             !‘杀死’中间的单元

  26.    SOLVE

  27.    EALIVE,2            !重新激活中间单元

  28.    MPCHG,2,2           !将材料特性改为2以生成自由应变单元

  29.    SOLVE

  30.    TUNIF,0             !删除温度载荷

  31.    SOLVE
复制代码

   
48542-01-embed.jpg

评分

1

查看全部评分

发表于 2007-6-23 15:17 | 显示全部楼层
  1. !下面的命令流进行的是一个简单的二维焊接分析, 利用ANSYS单元生死和热-结构耦合分析功能进

  2. !行焊接过程仿真, 计算焊接过程中的温度分布和应力分布以及冷却后的焊缝残余应力。  

  3.   

  4. /title,Weld Analysis by "Element Birth and Death"  

  5. /prep7  

  6. /unit,si ! 采用国际单位制  

  7. !  

  8. et,1,13,4 ! 13号二维耦合单元, 同时具有温度和位移自由度  

  9. et,2,13,4  

  10. !  

  11. ! 1号材料是钢  

  12. ! 2号材料是铝  

  13. ! 3号材料是铜  

  14. ! 铝是本次分析中的焊料, 它将钢结构部分和铜结构部分焊接起来  

  15. ! 下面是在几个温度点下, 各材料的弹性模量  

  16. mptemp,1,20,500,1000,1500,2000  

  17. mpdata,ex,1,1,1.93e11,1.50e11,0.70e11,0.10e11,0.01e11  

  18. mpdata,ex,2,1,1.02e11,0.50e11,0.08e11,0.001e11,0.0001e11  

  19. mpdata,ex,3,1,1.17e11,0.90e11,0.30e11,0.05e11,0.005e11  

  20. !  

  21. ! 假设各材料都是双线性随动硬化弹塑性本构关系  

  22. ! 下面是各材料在各温度点下的屈服应力和屈服后的弹性模量  

  23. tb,bkin,1,5  

  24. tbtemp,20,1  

  25. tbdata,1,1200e6,0.193e11  

  26. tbtemp,500,2  

  27. tbdata,1, 933e6,0.150e11  

  28. tbtemp,1000,3  

  29. tbdata,1, 435e6,0.070e11  

  30. tbtemp,1500,4  

  31. tbdata,1, 70e6,0.010e11  

  32. tbtemp,2000,5  

  33. tbdata,1, 7e6,0.001e11  

  34. !  

  35. tb,bkin,2,5  

  36. tbtemp,20,1  

  37. tbdata,1,800e6,0.102e11  

  38. tbtemp,500,2  

  39. tbdata,1,400e6,0.050e11  

  40. tbtemp,1000,3  

  41. tbdata,1, 70e6,0.008e11  

  42. tbtemp,1500,4  

  43. tbdata,1, 1e6,0.0001e11  

  44. tbtemp,2000,5  

  45. tbdata,1,0.1e6,0.00001e11  

  46. !  

  47. tb,bkin,3,5  

  48. tbtemp,20,1  

  49. tbdata,1,900e6,0.117e11  

  50. tbtemp,500,2  

  51. tbdata,1,700e6,0.090e11  

  52. tbtemp,1000,3  

  53. tbdata,1,230e6,0.030e11  

  54. tbtemp,1500,4  

  55. tbdata,1, 40e6,0.005e11  

  56. tbtemp,2000,5  

  57. tbdata,1, 4e6,0.0005e11  

  58. !  

  59. ! 材料密度(假设为常值)  

  60. mp,dens,1,8030  

  61. mp,dens,2,4850  

  62. mp,dens,3,8900  

  63. ! 热膨胀系数(假设为常值)  

  64. mp,alpx,1,1.78e-5  

  65. mp,alpx,2,9.36e-6  

  66. mp,alpx,3,1.66e-5  

  67. ! 泊松比(假设为常值)  

  68. mp,nuxy,1,0.29  

  69. mp,nuxy,2,0.30  

  70. mp,nuxy,3,0.30  

  71. ! 热传导系数(假设为常值)  

  72. mp,kxx,1,16.3  

  73. mp,kxx,2,7.44  

  74. mp,kxx,3,393  

  75. ! 比热(假设为常值)  

  76. mp,c,1,502  

  77. mp,c,2,544  

  78. mp,c,3,385  

  79. ! 热膨胀系数(假设为常值)  

  80. ! 由于该13号单元还有磁自由度, 此处假设一磁特性, 但并不影响我们所关心的结果  

  81. mp,murx,1,1  

  82. mp,murx,2,1  

  83. mp,murx,3,1  

  84. ! 假设焊料(铝)焊上去后的初始温度是1500℃  

  85. mp,reft,1,20  

  86. mp,reft,2,1500  

  87. mp,reft,3,20  

  88. !  

  89. ! 下面建立几何模型  

  90. csys,0  

  91. k,1,0,0,0  

  92. k,2,0.5,0,0  

  93. k,3,1,0,0  

  94. k,4,0,0.3,0  

  95. k,5,0.35,0.3,0  

  96. k,6,0.65,0.3,0  

  97. k,7,1,0.3,0  

  98. a,1,2,5,4  

  99. a,2,6,5  

  100. a,2,3,7,6  

  101. ! 划分单元  

  102. esize,0.025  

  103. type,2  

  104. mat,2  

  105. amesh,2  

  106. esize,0.05  

  107. type,1  

  108. mat,1  

  109. amesh,1  

  110. mat,3  

  111. amesh,3  

  112. eplot  

  113. !  

  114. /solu  

  115. antype,4 ! 瞬态分析  

  116. trnopt,full  

  117. !  

  118. ! 在模型的左边界加位移约束  

  119. nsel,all  

  120. *get,minx,node,,mnloc,x  

  121. nsel,s,loc,x,minx  

  122. d,all,ux,0  

  123. *get,miny,node,,mnloc,y  

  124. nsel,r,loc,y,miny  

  125. d,all,uy,0  

  126. !  

  127. ! 假设在模型的左右边界处温度始终保持在20℃, 其它边界条件如对流、辐射等都可  

  128. ! 施加,此处因只是示意而已,故只施加恒温边界条件。  

  129. nsel,all  

  130. *get,minx,node,,mnloc,x  

  131. nsel,s,loc,x,minx  

  132. d,all,temp,20  

  133. nsel,all  

  134. *get,maxx,node,,mxloc,x  

  135. nsel,s,loc,x,maxx  

  136. d,all,temp,20  

  137. !  

  138. ! 由于第二个面是焊料所在区域,因此,首先将该区域的单元"死"掉  

  139. nna=2  

  140. esel,all  

  141. *get,emax,elem,,num,max  

  142. asel,s,area,,nna  

  143. esla  

  144. *get,nse,elem,,count  

  145. *dim,ne,,nse  

  146. *dim,nex,,nse  

  147. *dim,ney,,nse  

  148. *dim,neorder,,nse  

  149. mine=0  

  150. ! 下面的DO循环用于将焊料区的单元按其形心Y坐标排序,以便后面  

  151. ! 模拟焊料由下向上逐步"生长"的过程  

  152. *do,i1,1,nse  

  153. esel,u,elem,,mine  

  154. *get,nse1,elem,,count  

  155. ii=0  

  156. *do,i,1,emax  

  157. *if,esel(i),eq,1,then  

  158. ii=ii+1  

  159. ne(ii)=i  

  160. *endif  

  161. *enddo  

  162. *do,i,1,nse1  

  163. *get,ney(i),elem,ne(i),cent,y  

  164. *get,nex(i),elem,ne(i),cent,x  

  165. *enddo  

  166. miny=1e20  

  167. minx=1e20  

  168. *do,i,1,nse1  

  169. *if,ney(i),lt,miny,then  

  170. miny=ney(i)  

  171. minx=nex(i)  

  172. mine=ne(i)  

  173. *else  

  174. *if,ney(i),eq,miny,then  

  175. *if,nex(i),lt,minx,then  

  176. miny=ney(i)  

  177. minx=nex(i)  

  178. mine=ne(i)  

  179. *endif  

  180. *endif  

  181. *endif  

  182. *enddo  

  183. neorder(i1)=mine  

  184. *enddo  

  185. !  

  186. max_tem=1500 ! 按照前面假设,焊料的初始温度为1500℃  

  187. dt1=1e-3 ! 用于建立初始条件的一个很小的时间段  

  188. dt=5 ! 焊接一个单元所需的时间  

  189. t=0 ! 起始时间  

  190. esel,all  

  191. eplot  

  192. /auto,1  

  193. /replot  

  194. *do,i,1,nse  

  195. ekill,neorder(i)  

  196. esel,s,live  

  197. eplot  

  198. *enddo  

  199. allsel,all  

  200. outres,all,all  

  201. ic,all,temp,20  

  202. kbc,1  

  203. timint,0,struct  

  204. timint,1,therm  

  205. timint,0,mag  

  206. tintp,0.005,,,1,0.5,0.2  

  207. !  

  208. !  

  209. nsub1=2  

  210. nsub2=40  

  211. *do,i,1,nse  

  212. ealive,neorder(i)  

  213. esel,s,live  

  214. eplot  

  215. esel,all  

  216. ! 下面的求解用于建立温度的初始条件  

  217. t=t+dt1  

  218. time,t  

  219. nsubst,1  

  220. *do,j,1,4  

  221. d,nelem(neorder(i),j),temp,max_tem  

  222. *enddo  

  223. solve  

  224. ! 下面的求解用于保证初始的升温速度为零  

  225. t=t+dt1  

  226. time,t  

  227. solve  

  228. ! 下面的步骤用于求解温度分布  

  229. *do,j,1,4  

  230. ddele,nelem(neorder(i),j),temp  

  231. *enddo  

  232. t=t+dt-2*dt1  

  233. time,t  

  234. nsubst,nsub1  

  235. solve  

  236. *enddo  

  237. t=t+50000  

  238. time,t  

  239. nsubst,nsub2  

  240. solve  

  241. finish  

  242.   

  243. /post1  

  244.   

  245. ! 下面的一系列命令用于生成应力的动画文件  

  246.   

  247. /seg,dele  

  248. /cont,1,15,0,1200e6/16,1200e6  

  249. /dscale,1,1.0  

  250. avprin,0,0  

  251. avres,1  

  252. /seg,multi,stress,0.1  

  253. esel,all  

  254. *do,i,1,nse  

  255. esel,u,elem,,neorder(i)  

  256. *enddo  

  257. *do,i,1,nse  

  258. esel,a,elem,,neorder(i)  

  259. set,(i-1)*3+1,1  

  260. plnsol,s,eqv  

  261. *do,j,1,nsub1  

  262. set,(i-1)*3+3,j  

  263. plnsol,s,eqv  

  264. *enddo  

  265. *enddo  

  266. *do,i,1,nsub2  

  267. set,(nse-1)*3+4,i  

  268. plnsol,s,eqv  

  269. *enddo  

  270. /seg,off,stress,0.1  

  271. /anfile,save,stress,avi  

  272.   

  273. ! 下面的一系列命令用于生成温度的动画文件  

  274.   

  275. /seg,dele  

  276. /cont,1,15,0,1500/16,1500  

  277. /dscale,1,1.0  

  278. avprin,0,0  

  279. avres,1  

  280. /seg,multi,temp,0.1  

  281. esel,all  

  282. *do,i,1,nse  

  283. esel,u,elem,,neorder(i)  

  284. *enddo  

  285. *do,i,1,nse  

  286. esel,a,elem,,neorder(i)  

  287. set,(i-1)*3+1,1  

  288. plnsol,temp  

  289. *do,j,1,nsub1  

  290. set,(i-1)*3+3,j  

  291. plnsol,temp  

  292. *enddo  

  293. *enddo  

  294. *do,i,1,nsub2  

  295. set,(nse-1)*3+4,i  

  296. plnsol,temp  

  297. *enddo  

  298. /seg,off,temp,0.1  

  299. /anfile,save,temp,avi  

  300.   

  301. finish
复制代码
您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-9-24 01:22 , Processed in 0.065832 second(s), 22 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表