 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 5 | 1/1 | 返回列表 |
| 查看: 2583 | 回復: 9 | |||
| 當前只顯示滿足指定條件的回帖，點擊這里查看本話題的所有回帖 | |||
小小鳥人管理員
|
[求助]
ansys焊接溫度場模擬
|
||
|
剛剛接觸ansys，老師就讓做焊接溫度場模擬，現(xiàn)在有一段代碼如下： /UNITS,SI /CONFIG,NRES,10000 /PREP7 ET,1,SOLID70 !單元類型，1表示此單元編號為1 MP,DENS,1,7930 !定義材料密度 MP,C,1,502 !定義材料比熱 mptemp,1,20,100,500 mpdata,kxx,1,1,12.1,16.3,21.4 !kxx熱導系數(shù) /VIEW,1,1,1,1 !*************定義基板尺寸*********** lx=0.1 lz=0.1 ly=0.006 !基板大小 !*************定義焊接參數(shù)*********** layer=7 !總的焊接道數(shù) lap=1/3 !兩道之間搭接量 weld=0.01 !每道焊道寬度 wweld=layer*weld-(layer-1)*lap*weld !焊道的總寬度 wheight=0.004 !焊道的高度 remain=0.01 LSIZE=0.002 V=0.008 !速度 pi=3.1415926 U=25 I=180 Q=U*I !電源有效功率（在此，可以對Q通過UI來調(diào)整） R=0.006 !電源有效熱半徑 effect=0.8 Qmax=effect*Q/(pi*R*R) !中心處最大熱流 tm=(lx-2*remain)/V !一道的總時間 tinc=LSIZE/V !每小段的時間間隔 !*****************建立模型，生成網(wǎng)格************** block,0,lx,0,ly,0,lz !創(chuàng)建一個塊體積，可以根據(jù)基板尺寸調(diào)整坐標 wpoff,remain,ly,(lz-wweld)/2 !隨著坐標系軸的變化平移工作平面 block,0,lx-2*remain,0,wheight,0,wweld vsbw,all,,delete !對block布爾運算 wpoff,,,wweld vsbw,all,,delete wprota,90,90 !轉(zhuǎn)動工作面 vsbw,all,,delete wpoff,,,lx-2*remain vsbw,all,,delete save vglue,all !粘合所有的幾何體 lsel,s,,,9,12,1 lsel,a,,,25,26,1 lsel,a,,,30 lsel,a,,,32 lsel,a,,,38 lsel,a,,,45 lsel,a,,,59 lsel,a,,,73 lesize,all,0.005,,,0.2,,,,1 allsel,all lsel,s,,,13,16,1 lsel,a,,,19,21,1 lsel,a,,,23,24,1 lsel,a,,,34 lsel,a,,,41,44,1 lsel,a,,,63,64,1 lsel,a,,,77,78,1 lsel,a,,,81,82,1 lesize,all,0.001,,,1,,,,1 allsel,all lsel,s,,,1 lsel,a,,,3,6,1 lsel,a,,,8 lsel,a,,,27 lsel,a,,,29 lsel,a,,,31 lsel,a,,,33 lsel,a,,,35 lsel,a,,,37 lsel,a,,,40 lsel,a,,,50 lsel,a,,,53 lsel,a,,,55 lsel,a,,,62 lsel,a,,,67 lsel,a,,,69 lsel,a,,,85 lesize,all,0.002,,,1,,,,1 allsel,all lsel,s,,,46 lsel,a,,,86 lsel,a,,,88 lesize,all,0.001,,,5,,,,1 allsel,all vsweep,all /PNUM,DEFA EPLOT fini !*******************進入后處理器********************* /solu antype,trans,new !nlgeom,on timint,0,struct timint,1,therm timint,0,mag timint,0,elect tref,25 nropt,auto autos,on kbc,0 pred,on lnsrch,on !************殺死焊縫去單元*********** nsel,s,loc,y,ly,ly+wheight esln,s,1 ekill,all allsel,all esel,s,live eplot !**********施加對流載荷************* esel,s,live nsel,s,loc,z,0 nsel,a,loc,z,lz nsel,a,loc,x,0 nsel,a,loc,x,lx sf,all,conv,10,25 !************定義數(shù)組維數(shù)********** MAX_TIME=1+tm/tinc !MAX_X=1+(lx-2*remain)/LSIZE MAX_X=1+lx/LSIZE MAX_Z=1+lz/LSIZE !*************定義table數(shù)組 ****************************************** *DIM,heatflux,TABLE,MAX_X,MAX_Z,MAX_TIME,X,Z,TIME *do,n,1,layer,1 m=mod(n,2) *if,m,eq,1,then !n=1 *DO,K,1,MAX_TIME,1 *DO,I,1,MAX_X,1 heatflux(I,0,K)=(I-1)*LSIZE *ENDDO *DO,J,1,MAX_Z,1 heatflux(0,J,K)=(J-1)*LSIZE *ENDDO *DO,I,1,MAX_X,1 *DO,J,1,MAX_Z,1 XCENTER=remain+V*(K-1)*tinc ZCENTER=2*(n-1)*weld/3+(lz-wweld)/2+weld/2 DISTANCE=SQRT(((I-1)*LSIZE-XCENTER)**2+((J-1)*LSIZE- ZCENTER)**2) *IF,DISTANCE,LE,R,THEN heatflux(I,J,K)=Qmax/EXP(2*DISTANCE**2/(R**2)) *ELSE heatflux(I,J,K)=0 *ENDIF *ENDDO *ENDDO heatflux(0,0,K)=(K-1)*tinc !**********激活單元********* esel,s,live nsel,s,loc,x,xcenter-0.002,xcenter+0.001 nsel,r,loc,z,zcenter-weld/2,zcenter+weld/2 nsel,r,loc,y,ly,ly+wheight esln,s,0 ealive,all allsel,all !**********施加熱流載荷********** esel,s,live nsel,s,loc,Y,ly sf,all,hflux,%heatflux% allsel,all !************求解***************** time,(n-1)*(tm+tinc)+k*lsize/v nsubst,2 SOLVE !*************刪除熱流載荷*********** nsel,s,loc,y,ly sfdele,all,hflux allsel,all esel,s,live eplot OUTRES,ALL,ALL, /PSF,HFLUX,,2 /REPLOT OUTRES,ALL,ALL, *ENDDO *else !n=2 *DO,K,1,MAX_TIME,1 *DO,I,1,MAX_X,1 heatflux(I,0,K)=(I-1)*LSIZE *ENDDO *DO,J,1,MAX_Z,1 heatflux(0,J,K)=(J-1)*LSIZE *ENDDO *DO,I,1,MAX_X,1 *DO,J,1,MAX_Z,1 XCENTER=lx-remain-V*(K-1)*tinc ZCENTER=2*(n-1)*weld/3+(lz-wweld)/2+weld/2 DISTANCE=SQRT(((I-1)*LSIZE-XCENTER)**2+((J-1)*LSIZE- ZCENTER)**2) *IF,DISTANCE,LE,R,THEN heatflux(I,J,K)=Qmax/EXP(2*DISTANCE**2/(R**2)) *ELSE heatflux(I,J,K)=0 *ENDIF *ENDDO *ENDDO heatflux(0,0,K)=(K-1)*tinc !**********激活單元********* esel,s,live nsel,s,loc,x,xcenter-0.001,xcenter+0.002 nsel,r,loc,z,zcenter-weld/2,zcenter+weld/2 nsel,r,loc,y,ly,ly+wheight esln,s,0 ealive,all allsel,all !**********施加熱流載荷********** esel,s,live nsel,s,loc,Y,ly sf,all,hflux,%heatflux% allsel,all !************求解***************** time,(n-1)*(tm+tinc)+k*lsize/v nsubst,2 SOLVE !*************刪除熱流載荷*********** nsel,s,loc,y,ly sfdele,all,hflux allsel,all esel,s,live eplot OUTRES,ALL,ALL, /PSF,HFLUX,,2 /REPLOT OUTRES,ALL,ALL, *ENDDO *endif *enddo FINISH 請問各位高手們，里面lsel命令是在選擇線段嗎？？選線段目的是什么？里面線段的標號是哪里定義的？？？？ 另外，要是手里有可用的模擬焊接溫度場資料，請大家不吝施舍啊�。�！ |
回復此樓» 收錄本帖的淘帖專輯推薦
 焊接有限元分析 |
» 猜你喜歡
材料科學與工程339求調(diào)劑
已經(jīng)有9人回復
-
材料與化工調(diào)劑一志愿大連海事085600，349
已經(jīng)有9人回復
-
292求調(diào)劑
已經(jīng)有8人回復
-
275求調(diào)劑
已經(jīng)有7人回復
-
材料調(diào)劑
已經(jīng)有11人回復
-
288求調(diào)劑 一志愿哈工大 材料與化工
已經(jīng)有25人回復
-
085602化學工程268分蹲調(diào)劑
已經(jīng)有4人回復
-
282求調(diào)劑
已經(jīng)有14人回復
-
301求調(diào)劑
已經(jīng)有3人回復
-
總分343，求生物學調(diào)劑
已經(jīng)有3人回復
» 本主題相關商家推薦: (我也要在這里推廣)
» 本主題相關價值貼推薦，對您同樣有幫助:
- ansys apdl 熱-應力耦合算殘余應力，材料參數(shù)是哪些
已經(jīng)有19人回復
- 在ansys中做齒輪瞬態(tài)溫度場分析，遇到問題，求大神指點
已經(jīng)有9人回復
- ANSYS如何把已做出結構分析的結果倒入溫度場分析中？
已經(jīng)有12人回復
- ANSYS熱模擬高溫拉伸，結構場計算出現(xiàn)問題，麻煩各位幫忙看看，附詳細命令流
已經(jīng)有14人回復
- 求助！Ansys脈沖激光輻照材料的溫度場模擬！
已經(jīng)有12人回復
- 請教各位大俠，關于ABAQUS單位量綱的問題~
已經(jīng)有13人回復
- simufact多道焊模擬（生死單元法）
已經(jīng)有9人回復
- 巖土工程ANSYS經(jīng)典72例（含命令代碼）
已經(jīng)有284人回復
- 請教下各位達人，學習ansys或者abaqus，對焊接溫度場進行模擬，來得及嗎？
已經(jīng)有7人回復
- ANSYS10.0在流體計算中遇到的問題
已經(jīng)有6人回復
- 本人研究生做材料加工ANSYS溫度場，應力場數(shù)值模擬，考上交材料加工什么方向適合？
已經(jīng)有9人回復
- ansys可以模擬溫度場么
已經(jīng)有9人回復
- ansys 焊接溫度場模擬命令流
已經(jīng)有4人回復
小小鳥人
管理員
- 應助: 6 (幼兒園)
- 金幣: 27.8
- 散金: 220
- 紅花: 7
- 帖子: 826
- 在線: 469.6小時
- 蟲號: 1762175
- 注冊: 2012-04-18
- 性別: GG
- 專業(yè): 金屬材料的力學行為
4樓2013-07-25 19:09:14
小小鳥人
專家顧問
- 應助: 6 (幼兒園)
- 金幣: 27.8
- 散金: 220
- 紅花: 7
- 帖子: 826
- 在線: 469.6小時
- 蟲號: 1762175
- 注冊: 2012-04-18
- 性別: GG
- 專業(yè): 金屬材料的力學行為
2樓2013-07-25 17:01:10
3樓2013-07-25 17:35:13
小小鳥人
超級版主
- 應助: 6 (幼兒園)
- 金幣: 27.8
- 散金: 220
- 紅花: 7
- 帖子: 826
- 在線: 469.6小時
- 蟲號: 1762175
- 注冊: 2012-04-18
- 性別: GG
- 專業(yè): 金屬材料的力學行為
5樓2013-07-26 11:31:53
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 070300求調(diào)劑306分 +5 | 26要上岸 2026-03-27 | 5/250 |
|
|---|---|---|---|---|
|
[考研] 環(huán)境工程 085701，267求調(diào)劑 +15 | minht 2026-03-29 | 16/800 |
|
|
|
[考研] 初試301，代碼085701環(huán)境工程，本碩一致，四六級已過，有二區(qū)一作，共發(fā)表5篇論文 +3 | axibli 2026-04-01 | 3/150 |
|
|
|
[考研] 0856材料與化工調(diào)劑，339 +10 | 10213207 2026-03-31 | 10/500 |
|
|
|
[考研] 求調(diào)劑：一志愿：南京大學 專業(yè)：0705 總分320 ，本科985，四六級已過 +3 | lfy760306 2026-03-31 | 3/150 |
|
|
|
[考研] 311（085601）求調(diào)劑 +12 | liziyeyeye 2026-03-28 | 13/650 |
|
|
|
[考博] 26申博 +4 | 加油沖��！ 2026-03-26 | 4/200 |
|
|
|
[考研] 285求調(diào)劑 +3 | FZAC123 2026-03-30 | 3/150 |
|
|
|
[考研] 318求調(diào)劑 +10 | 陳晨79 2026-03-30 | 10/500 |
|
|
|
[考研] 353求調(diào)劑 +3 | 江上楓_26 2026-03-28 | 3/150 |
|
|
|
[考研] 一志愿211，335分，0856，求調(diào)劑院校和導師 +10 | 傾____蕭 2026-03-27 | 11/550 |
|
|
|
[考研] 287求調(diào)劑 +17 | land xuxu 2026-03-26 | 17/850 |
|
|
|
[考研] 083000環(huán)境科學與工程調(diào)劑，總分281 +4 | 橙子（勝意） 2026-03-30 | 4/200 |
|
|
|
[考研] 生物學學碩，一志愿湖南大學，初試成績338 +7 | YYYYYNNNNN 2026-03-26 | 9/450 |
|
|
|
[考研] 材料化工340求調(diào)劑 +3 | jhx777 2026-03-30 | 3/150 |
|
|
|
[考研] 求調(diào)劑 +7 | 青春裁為三截 2026-03-29 | 7/350 |
|
|
|
[考研] 296求調(diào)劑 +10 | 彼岸t 2026-03-29 | 10/500 |
|
|
|
[考研] 一志愿雙一流機械285分求調(diào)劑 +4 | 幸運的三木 2026-03-29 | 5/250 |
|
|
|
[考研] 一志愿北京理工大學本科211材料工程294求調(diào)劑 +8 | mikasa的圍巾 2026-03-28 | 8/400 |
|
|
|
[考研] 0856求調(diào)劑 +13 | zhn03 2026-03-25 | 14/700 |
|