| 2 | 1/1 | 返回列表 |
| 查看: 732 | 回復(fù): 1 | |||
材料種子新蟲 (初入文壇)
|
[交流]
激光熔覆溫度場模擬
|
| 各位,最近做ansys激光熔覆模擬時(shí),發(fā)現(xiàn)做出來的溫度忽高忽低,比如說第一載荷步后節(jié)點(diǎn)溫度1600,第二個(gè)就降到600多,第三個(gè)又升到1600多,第四個(gè)又降回600多,一直反復(fù),也不知道什么情況?有哪位遇到過嗎? |
新蟲 (初入文壇)
|
!***********建立熱源數(shù)組***************** QMAX=P/(3.1415*R**2) MAX_TIME=len/LSIZE+1 MAX_X=wid/LSIZE+1 MAX_Y=len/ LSIZE+1 !**********施加對流載荷************* ESEL,S,LIVE ASEL,S,AREA,,9,12,1 sfa,all,1,conv,150,20 ESEL,S,LIVE ASEL,S,AREA,,7,7,1 sfa,all,1,conv,150,20 *do,h,1,road,1 m=mod(h,2) *if,m,eq,1,then !h=1 !熱源數(shù)組 *DIM,FLUX1,TABLE,MAX_X,MAX_Y,MAX_TIME,X,Y,TIME *DO,K,1,MAX_TIME,1 !循環(huán)時(shí)間 *DO,I,1,MAX_X,1 FLUX1(I,0,K)=(I-1)*LSIZE *ENDDO *DO,J,1,MAX_Y,1 FLUX1(0,J,K)=(J-1)*LSIZE *ENDDO *DO,I,1,MAX_X,1 *DO,J,1,MAX_Y,1 XCENTER=(h-1)*weld+weld/2 YCENTER=V*(K-1)*TINC DISTANCE=SQRT(((I-1)*LSIZE-XCENTER)**2+((J-1)*LSIZE-YCENTER)**2) *IF,DISTANCE,LE,R,THEN FLUX1(I,J,K)=2*A*QMAX*EXP(-2*DISTANCE**2/R**2) *ELSE FLUX1(I,J,K)=0 *ENDIF *ENDDO *ENDDO FLUX1(0,0,K)=(K-1)*TINC !激活單元 esel,s,live nsel,s,loc,x,XCENTER-weld/2 ,XCENTER+weld/2 nsel,r,loc,z,0,hth nsel,r,loc,y,YCENTER,YCENTER+LSIZE esln,s,0 ealive,all allsel,all !施加熱流載荷 ESEL,S,LIVE NSEL,S,LOC,Z,hth,hth!選擇上邊界 SF,all,HFLUX,%FLUX1% !熱流加載 ALLSEL,ALL time,(h-1)*(TI+tinc)+(k)*TINC NSUBST,2 SOLVE NSEL,S,LOC,Z,hth,hth!選擇上邊界 SFDELE,ALL,HFLUX !刪除上一步加載的熱源 /REPLOT *ENDDO *else *DIM,FLUX2,TABLE,MAX_X,MAX_Y,MAX_TIME,X,Y,TIME *DO,K,1,MAX_TIME,1 !循環(huán)時(shí)間 *DO,I,1,MAX_X,1 FLUX2(I,0,K)=(I-1)*LSIZE *ENDDO *DO,J,1,MAX_Y,1 FLUX2(0,J,K)=(J-1)*LSIZE *ENDDO *DO,I,1,MAX_X,1 *DO,J,1,MAX_Y,1 XCENTER=(h-1)*weld+weld/2 YCENTER=len-V*(K-1)*TINC DISTANCE=SQRT(((I-1)*LSIZE-XCENTER)**2+((J-1)*LSIZE-YCENTER)**2) *IF,DISTANCE,LE,R,THEN FLUX2(I,J,K)=2*A*QMAX*EXP(-2*DISTANCE**2/R**2) *ELSE FLUX2(I,J,K)=0 *ENDIF *ENDDO *ENDDO FLUX2(0,0,K)=(K-1)*TINC !激活單元 esel,s,live nsel,s,loc,x,XCENTER-weld/2 ,XCENTER+weld/2 nsel,r,loc,z,0,hth nsel,r,loc,y,YCENTER,YCENTER+LSIZE esln,s,0 ealive,all allsel,all !施加熱流載荷 ESEL,S,LIVE NSEL,S,LOC,Z,hth,hth!選擇上邊界 SF,all,HFLUX,%FLUX2% !熱流加載 ALLSEL,ALL time,(K)*TINC+(h-1)*(TI+tinc) NSUBST,2 SOLVE NSEL,S,LOC,Z,hth,hth!選擇上邊界 SFDELE,ALL,HFLUX !刪除上一步加載的熱源 /REPLOT *ENDDO *endif *enddo FINISH 這是求解的部分程序,希望大佬幫我看看哪錯(cuò)了? |
| 2 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 中科大材料299求調(diào)劑 +5 | DAIjiayo 2026-03-05 | 7/350 |
|
|---|---|---|---|---|
|
[考博] 26申博-目前4篇SCI一作 +4 | chen_2024 2026-03-02 | 4/200 |
|
|
[考研] 282求調(diào)劑 +7 | 夕~日 2026-03-05 | 8/400 |
|
|
[考研] 材料277分求調(diào)劑 +11 | 飯飯星球 2026-03-04 | 11/550 |
|
|
[考研] 材料與化工,291,求調(diào)劑 +7 | 咕嚕咕嚕123123 2026-03-05 | 8/400 |
|
|
[考研] 0703 東華大學(xué) 理學(xué)化學(xué)均過 a 線,總分 281 求調(diào)劑 +4 | 香香 Lu 2026-03-03 | 8/400 |
|
|
[考研] 一志愿南京大學(xué)資源與環(huán)境專業(yè)283分求調(diào)劑 +3 | 追云?? 2026-03-04 | 3/150 |
|
|
[考研] 材料085600 303求調(diào)劑 +7 | 1bygone 2026-03-04 | 7/350 |
|
|
[考研] 0703化學(xué) 學(xué)碩 理工科均可 不區(qū)分研究方向 總分279求調(diào)劑 +7 | 1一11 2026-03-03 | 7/350 |
|
|
[考研] 070300調(diào)劑一志愿南京大學(xué)化學(xué)專業(yè),初試273分,有論文有專利有競賽,求調(diào)劑B區(qū)211 +3 | 82206202 2026-02-28 | 8/400 |
|
|
[考研] 一志愿中科大080500總分324求調(diào)劑 +3 | jorna 2026-03-03 | 6/300 |
|
|
[考研] 281求調(diào)劑 +3 | 我是小小蔥蔥 2026-03-03 | 5/250 |
|
|
[考研] 289求調(diào)劑 +7 | BrightLL 2026-03-02 | 9/450 |
|
|
[考研] 26考研報(bào)考西工大材料308分求調(diào)劑 +4 | weizhong123 2026-03-01 | 5/250 |
|
|
[考研] 307求調(diào)劑 +6 | wyyyqx 2026-03-01 | 6/300 |
|
|
[考研] 清華大學(xué) 材料與化工 353分求調(diào)劑 +5 | awaystay 2026-03-02 | 6/300 |
|
|
[考研] 化學(xué),材料,環(huán)境類求調(diào)劑 +7 | 考研版棒棒 2026-03-02 | 7/350 |
|
|
[考研] 261求調(diào)劑 +3 | 陸lh 2026-03-01 | 3/150 |
|
|
[考研] 一志愿東北大學(xué)材料專碩328,求調(diào)劑 +3 | shs1083 2026-03-02 | 3/150 |
|
|
[考研]
|
LYidhsjabdj 2026-02-28 | 4/200 |
|