ansys高斯熱源施加行業(yè)資料能源與動(dòng)力工程

,0,lenA,1,3,4,6A,1,2,5,6cyl4,0***************************all,6,thic*tan(arf/2),thic,0K,7,0a1nsla,r,1esln,r,0!!!!!!!!!!!!,0,lenA,1,3,4,6A,1,2,5,6cyl4,0***************************all,6,thic*tan(arf/2),thic,0K,7,0a1nsla,r,1esln,r,0!!!!!!!!!!!!==============================cset,,,1,,tmplnsol,temp*enddo/ot!***************************e,all,,,18,0.8lsel,s,line,,7,2==============================cset,,,1,,tmplnsol,temp*enddo/ot!***************************e,all,,,18,0.8lsel,s,line,,7,2定義高斯表面移動(dòng)熱有效熱半徑，單位為m****************度場(chǎng)結(jié)果圖片esel,s,l0.2!求解溫度場(chǎng)時(shí)子步時(shí)間!***************森方法，激活白適應(yīng)下降****************度場(chǎng)結(jié)果圖片esel,s,l0.2!求解溫度場(chǎng)時(shí)子步時(shí)間!***************森方法，激活白適應(yīng)下降(默認(rèn))pred,on!打開(kāi)預(yù)測(cè)校正t5攝氏度!*************************熱傳導(dǎo)系數(shù)（W/（m*K考慮相變潛熱的比熱容類型為1vmesh,all!*******************************************allf,tm,eq,dt1+lnum/2*tinc,thense******vsel,s,,,v1類型為1vmesh,all!*******************************************allf,tm,eq,dt1+lnum/2*tinc,thense******vsel,s,,,v1選擇焊縫1上表面單元esl2+(z-c)A2,每個(gè)焊縫上表面任一點(diǎn)距熱源中心距離qma******************************aadd,24,32!2+(z-c)A2,每個(gè)焊縫上表面任一點(diǎn)距熱源中心距離qma******************************aadd,24,32!面相加，以便生成映射網(wǎng)格lccat,4******************************!戊U分網(wǎng)格!************************************!邊界條件（暫時(shí)沒(méi)有考慮對(duì)流）!********,all,,,,,,14************************************!邊界條件（暫時(shí)沒(méi)有考慮對(duì)流）!********,all,,,,,,14沿線拖拉面Vptn,all!分割體V========!重新載入有限元模型進(jìn)行加載求解!=====沿厚度y方向劃分1-1.5mm沿x方向劃分1mm度”系統(tǒng)默認(rèn)是弧度）K,1,0,0,0K,2,wweld,0temp!*************************oallsesel,s,liveeplot!查看溫度場(chǎng)度”系統(tǒng)默認(rèn)是弧度）K,1,0,0,0K,2,wweld,0temp!*************************oallsesel,s,liveeplot!查看溫度場(chǎng)savl,a,line,,24,26,2lsel,a,line,,劃分體，生成六面體單元存檔備份有限元模型================================================================!=================================================================im!熱源位置!**********************ns,1,,7800,7800,7800,7800,7800（kg/m3）im!熱源位置!**********************ns,1,,7800,7800,7800,7800,7800（kg/m3）mpdata,dens,1,,7800,780x=0.24*k*eta*I*u/pi!加熱斑點(diǎn)中心熱流(Wmax*get,nemin,elem,,num,min!vsl,a,line,,24,26,2lsel,a,line,,f,tm,eq,dt1+lnum/2*tinc,thensep,,1200,1250,1350,1400,1450,15max*get,nemin,elem,,num,min!vsl,a,line,,24,26,2lsel,a,line,,f,tm,eq,dt1+lnum/2*tinc,thensep,,1200,1250,1350,1400,1450,15!!ne,,6,25,19lsel,a,line,,2,18,1'nothing!定義實(shí)常數(shù)mptemp,1,0,100,2********!ne,,6,25,19lsel,a,line,,2,18,1'nothing!定義實(shí)常數(shù)mptemp,1,0,100,2********!殺死焊縫區(qū)單元I*************oallsesel,s,liveeplot!查看溫度場(chǎng)sav定義瞬態(tài)綜合參數(shù)!*****!************************i,nemin,nemax,1*if,esel(i),eq,******************構(gòu)件尺寸len=100e（kg/m3）mpdata,dens,1,,7800,780*****!************************i,nemin,nemax,1*if,esel(i),eq,******************構(gòu)件尺寸len=100e（kg/m3）mpdata,dens,1,,7800,780在第一類單元中加熱流載荷******************************ns,1,,7800,7800,7800,7800,7800!*****************************,6,thic*tan(arf/2),thic,0K,7,0******************************ns,1,,7800,7800,7800,7800,7800!*****************************,6,thic*tan(arf/2),thic,0K,7,0選擇有效半徑內(nèi)節(jié)點(diǎn)為當(dāng)前節(jié)點(diǎn),thic*tan(arf/2)+wweld,thic,0K/m2)percent=0.99radius=abs(sqrf,tm,eq,dt1+lnum/2*tinc,thensessave,'1.11thermalanalysismesh,thic*tan(arf/2)+wweld,thic,0K/m2)percent=0.99radius=abs(sqrf,tm,eq,dt1+lnum/2*tinc,thensessave,'1.11thermalanalysismesh如果該單元在上面的集合里，貝U亥單元中心距離熱源中心該單元中心在加熱半徑范圍內(nèi)在每個(gè)單元所指定的面上施加熱源載荷-c)))亥單元中心距離熱源中心*if,rr,le,radi==============================,30,30,30,30,30,30mpdata,kxx,1-c)))亥單元中心距離熱源中心*if,rr,le,radi==============================,30,30,30,30,30,30mpdata,kxx,1,6,thic*tan(arf/2),thic,0K,7,0的內(nèi)容進(jìn)行查看刪除每個(gè)單元六個(gè)面上的熱載荷================================================================!=================================================================顯示位移時(shí)，設(shè)置放大系數(shù)******************************t,,,1,,tmplnsol,temp/image,savtemp!*************************1,0.01,0.2!時(shí)間步長(zhǎng)以下為施加熱流密度載荷*do,******************************t,,,1,,tmplnsol,temp/image,savtemp!*************************1,0.01,0.2!時(shí)間步長(zhǎng)以下為施加熱流密度載荷*do,存動(dòng)