 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 2 | 1/1 | 返回列表 |
| 查看: 960 | 回復(fù): 1 | ||
| 【懸賞金幣】回答本帖問(wèn)題，作者lk12將贈(zèng)送您 5 個(gè)金幣 | ||
lk12新蟲 (初入文壇)
|
[求助]
ansys中使用表面單元加載對(duì)流載荷，求救如何使用
|
|
|
請(qǐng)教大佬表面效應(yīng)單元的問(wèn)題，我想在這個(gè)程序中增加一個(gè)表面效應(yīng)的對(duì)流載荷，顯示單元4未定義，esurf只能應(yīng)用在線或者面上，請(qǐng)問(wèn)怎么改呢？ FINISH /CLEAR,START /TITLE,Laser /units,si /VIEW,1,1,1,1 /prep7 !===定義單元 et,1,solid70 et,4,surf151 keyopt,4,4,1 keyopt,4,5,0 keyopt,4,8,4 !===定義材料 !===熔覆層為鋁zl104 mp,dens,1,2630 !密度(kg/m^3) mp,hf,1,100 mptemp,,,,,,,, mptemp,1,25 mptemp,2,100 mptemp,3,200 mptemp,4,300 mptemp,5,400 mptemp,6,500 mptemp,7,600 mptemp,8,700 mptemp,9,800 mptemp,10,900 mptemp,11,1000 mptemp,12,1100 mptemp,13,1200 mptemp,14,1300 mpdata,c,1,,725 !比熱容(J/(kg℃)) mpdata,c,1,,754 mpdata,c,1,,796 mpdata,c,1,,837 mpdata,c,1,,921 mpdata,c,1,,1011 mpdata,c,1,,1100 mpdata,c,1,,1130 mpdata,c,1,,1150 mpdata,c,1,,1170 mpdata,c,1,,1190 mpdata,c,1,,1210 mpdata,c,1,,1250 mpdata,kxx,1,,113 !熱導(dǎo)率(W/(m℃)) mpdata,kxx,1,,144.9 mpdata,kxx,1,,149.1 mpdata,kxx,1,,149.1 mpdata,kxx,1,,144.9 mpdata,kxx,1,,145.1 mpdata,kxx,1,,145.1 mpdata,kxx,1,,145.1 mpdata,kxx,1,,145.1 mpdata,kxx,1,,145.1 mpdata,kxx,1,,145.1 mpdata,kxx,1,,145.1 mpdata,kxx,1,,145.1 mpdata,kxx,1,,145.1 !===熔覆層尺寸(m) Width_Clad=2.5e-3 !熔覆層寬度 Length_Clad=30e-3 Height_Clad=0.35e-3 Layer=5 !==基材尺寸(m) Width_Base=30e-3 Length_Base=50e-3 Height_Base=6e-3 !===建模 block,-Width_Clad/2,Width_Clad/2,0,Length_Clad,0,Height_Clad*Layer block,-Width_Clad/2,Width_Clad/2,-10/1000,Length_Base-10/1000,0,-Height_Base/2 block,-Width_Clad/2,-Width_Base/2,-10/1000,Length_Base-10/1000,0,-Height_Base/2 block,Width_Clad/2,Width_Base/2,-10/1000,Length_Base-10/1000,0,-Height_Base/2 vglue,all nummrg,all numcmp,all !===網(wǎng)格劃分 type,1 mat,1 lesize,9,,,Layer lesize,10,,,Layer lesize,11,,,Layer lesize,12,,,Layer esize,2.2/1000/6 vmesh,1 type,1 mat,1 lesize,21,0.001,,,3 lesize,22,0.001,,,3 lesize,19,0.001,,,3 lesize,20,0.001,,,1/3 lesize,21,0.001,,,1/3 lesize,22,0.001,,,3 vsweep,4 type,1 mat,1 lesize,31,0.001,,,3 lesize,32,0.001,,,3 lesize,33,0.001,,,3 lesize,34,0.001,,,3 lesize,37,0.001,,,3 lesize,38,0.001,,,3 lesize,39,0.001,,,3 lesize,40,0.001,,,3 vsweep,2 vsweep,3 !=========激光參數(shù) LaswerPower=1400 !激光功率(W) Radius1=0.85/1000 !熔覆層半徑(m) Radius2=1.2/1000 !光斑半徑(m) Factor=0.35 !激光利用率 TruePower=LaswerPower*Factor pi=3.14159265358979310 dt=0.00001 !小量 Init_Temp=20!初始溫度 Coff_Conv=100 !對(duì)流換熱系數(shù) AirTemp=20 AirConvection=30 BaseTemp=20 BaseConvection=80 !===求解參數(shù)設(shè)置 StepDis=2.2/1000/6 !每個(gè)載荷步位移(m) V=6/1000 !掃描速度(m/s) StepTime=StepDis/V !單步時(shí)間長(zhǎng)度(s) TotalTime=(Length_Clad-2*Radius1)/V !總時(shí)長(zhǎng)(s) !StepNum=(Length_Clad-2*Radius1)/StepDis !載荷步數(shù) StepNum=76 !載荷步數(shù) !===對(duì)流 nsel,s,ext nsel,u,loc,z,Height_Clad*Layer SF,all,CONV,30,20 allsel,all !===對(duì)流 nsel,s,ext nsel,r,loc,z,Height_Clad*5 asel,s,loc,z,Height_Clad*5 esurf,all ESEL,S,TYPE,,4 SFE,all,1,CONV,1,100 SFE,all,1,CONV,2,20 allsel,all !===求解部分 /solu antype,trans nropt,full tintpr,,,,1.0 trnopt,full !指定瞬態(tài)分析選項(xiàng) timint,on !時(shí)間積分效應(yīng) autots,on !指定使用自動(dòng)步長(zhǎng)跟蹤 deltim,,,, nsubst,1 kbc,1 TUNIF,BaseTemp !初始溫度20度 !toffst,273 !===殺死所有的熔覆層單元 VSEL,S,,,1 !選擇熔覆層體 ESLV,S !選擇依附于所選體上的單元 EKILL,ALL !殺死所選的單元(熔覆層) ESEL,S,LIVE !選擇活著的單元(基體) EPLOT !刷新顯示 LOCAL,11,0,0,0,0 !定義局部坐標(biāo)系 *DEL,_FNCNAME *DEL,_FNCMTID *DEL,_FNCCSYS *SET,_FNCNAME,'huanxing' *SET,_FNCCSYS,11 !將方程坐標(biāo)系設(shè)定為自己定義的局部坐標(biāo)系 ! /INPUT,.\function\huanxing.func,,,1 *DIM,%_FNCNAME%,TABLE,6,22,1,,,,%_FNCCSYS% ! Begin of equation: 1.1E8*EXP(-2*((sqrt({X}^2+{Y}^2)-0.00106)^2)/(0.00000025)) *SET,%_FNCNAME%(0,0,1), 0.0, -999 *SET,%_FNCNAME%(2,0,1), 0.0 *SET,%_FNCNAME%(3,0,1), 0.0 *SET,%_FNCNAME%(4,0,1), 0.0 *SET,%_FNCNAME%(5,0,1), 0.0 *SET,%_FNCNAME%(6,0,1), 0.0 *SET,%_FNCNAME%(0,1,1), 1.0, -1, 0, 0, 0, 0, 0 *SET,%_FNCNAME%(0,2,1), 0.0, -2, 0, 1, 0, 0, -1 *SET,%_FNCNAME%(0,3,1), 0, -3, 0, 1, -1, 2, -2 *SET,%_FNCNAME%(0,4,1), 0.0, -1, 0, 2, 0, 0, -3 *SET,%_FNCNAME%(0,5,1), 0.0, -2, 0, 1, -3, 3, -1 *SET,%_FNCNAME%(0,6,1), 0.0, -1, 0, 2, 0, 0, 2 *SET,%_FNCNAME%(0,7,1), 0.0, -3, 0, 1, 2, 17, -1 *SET,%_FNCNAME%(0,8,1), 0.0, -1, 0, 2, 0, 0, 3 *SET,%_FNCNAME%(0,9,1), 0.0, -4, 0, 1, 3, 17, -1 *SET,%_FNCNAME%(0,10,1), 0.0, -1, 0, 1, -3, 1, -4 *SET,%_FNCNAME%(0,11,1), 0.0, -1, 16, 1, -1, 0, 0 *SET,%_FNCNAME%(0,12,1), 0.0, -3, 0, 0.00106, 0, 0, -1 *SET,%_FNCNAME%(0,13,1), 0.0, -4, 0, 1, -1, 2, -3 *SET,%_FNCNAME%(0,14,1), 0.0, -1, 0, 2, 0, 0, -4 *SET,%_FNCNAME%(0,15,1), 0.0, -3, 0, 1, -4, 17, -1 *SET,%_FNCNAME%(0,16,1), 0.0, -1, 0, 1, -2, 3, -3 *SET,%_FNCNAME%(0,17,1), 0.0, -2, 0, 0.00000025, 0, 0, -1 *SET,%_FNCNAME%(0,18,1), 0.0, -3, 0, 1, -1, 4, -2 *SET,%_FNCNAME%(0,19,1), 0.0, -1, 7, 1, -3, 0, 0 *SET,%_FNCNAME%(0,20,1), 0.0, -2, 0, 1.1E8, 0, 0, -1 *SET,%_FNCNAME%(0,21,1), 0.0, -3, 0, 1, -2, 3, -1 *SET,%_FNCNAME%(0,22,1), 0.0, 99, 0, 1, -3, 0, 0 ! End of equation: 1.1E8*EXP(-2*((sqrt({X}^2+{Y}^2)-0.00106)^2)/(0.00000025)) !--> !===第一層 time=0 XC=0 YC=3*StepDis *DO,K,0,StepNum,1 LOCAL,11,0,XC,YC,0 t=0.45+StepTime*(k+1) time,t !===基于局部坐標(biāo)系下復(fù)活第一層熔覆層 nsel,s,loc,x,-Width_Clad/2,Width_Clad/2 nsel,r,loc,z,0,Height_Clad nsel,r,loc,y,-3*StepDis,3*StepDis esln,s,1 ealive,all allsel,all ESEL,S,LIVE EPLOT !===第一層加載熱源 nsel,s,loc,x,-Width_Clad/2,Width_Clad/2 nsel,r,loc,z,Height_Clad nsel,r,loc,y,-3*StepDis,3*StepDis SF,all,HFLUX,%huanxing% ESEL,S,LIVE /PSF,HFLUX,,2 /REPLOT EPLOT ALLSEL,ALL OUTRES,ALL,ALL SOLVE YC=YC+StepDis *ENDDO !===第二層 CSYS,0 XC=0 YC=3*StepDis *DO,k,0,StepNum,1 LOCAL,11,0,XC,YC,0 t=5.45+StepTime*(k+1) time,t !===基于局部坐標(biāo)系下復(fù)活第二層熔覆層 nsel,s,loc,x,-Width_Clad/2,Width_Clad/2 nsel,r,loc,z,Height_Clad,Height_Clad*2 nsel,r,loc,y,-3*StepDis,3*StepDis esln,s,1 ealive,all allsel,all ESEL,S,LIVE EPLOT !===第二層加載熱源 nsel,s,loc,x,-Width_Clad/2,Width_Clad/2 nsel,r,loc,z,Height_Clad*2 nsel,r,loc,y,-3*StepDis,3*StepDis SF,all,HFLUX,%huanxing% ESEL,S,LIVE /PSF,HFLUX,,2 /REPLOT EPLOT ALLSEL,ALL OUTRES,ALL,ALL SOLVE YC=YC+StepDis *ENDDO !===第三層 CSYS,0 XC=0 YC=3*StepDis *DO,k,0,StepNum,1 LOCAL,11,0,XC,YC,0 t=10.45+StepTime*(k+1) time,t !===基于局部坐標(biāo)系下復(fù)活第三層熔覆層 nsel,s,loc,x,-Width_Clad/2,Width_Clad/2 nsel,r,loc,z,Height_Clad*2,Height_Clad*3 nsel,r,loc,y,-3*StepDis,3*StepDis esln,s,1 ealive,all allsel,all ESEL,S,LIVE EPLOT !===第三層加載熱源 nsel,s,loc,x,-Width_Clad/2,Width_Clad/2 nsel,r,loc,z,Height_Clad*3 nsel,r,loc,y,-3*StepDis,3*StepDis SF,all,HFLUX,%huanxing% ESEL,S,LIVE /PSF,HFLUX,,2 /REPLOT EPLOT ALLSEL,ALL OUTRES,ALL,ALL SOLVE YC=YC+StepDis *ENDDO !===第四層 CSYS,0 XC=0 YC=3*StepDis *DO,k,0,StepNum,1 LOCAL,11,0,XC,YC,0 t=15.45+StepTime*(k+1) time,t !===基于局部坐標(biāo)系下復(fù)活第四層熔覆層 nsel,s,loc,x,-Width_Clad/2,Width_Clad/2 nsel,r,loc,z,Height_Clad*3,Height_Clad*4 nsel,r,loc,y,-3*StepDis,3*StepDis esln,s,1 ealive,all allsel,all ESEL,S,LIVE EPLOT !===第四層加載熱源 nsel,s,loc,x,-Width_Clad/2,Width_Clad/2 nsel,r,loc,z,Height_Clad*4 nsel,r,loc,y,-3*StepDis,3*StepDis SF,all,HFLUX,%huanxing% ESEL,S,LIVE /PSF,HFLUX,,2 /REPLOT EPLOT ALLSEL,ALL OUTRES,ALL,ALL SOLVE YC=YC+StepDis *ENDDO !===第五層 CSYS,0 XC=0 YC=3*StepDis *DO,k,0,StepNum,1 LOCAL,11,0,XC,YC,0 t=20.45+StepTime*(k+1) time,t !===基于局部坐標(biāo)系下復(fù)活第五層熔覆層 nsel,s,loc,x,-Width_Clad/2,Width_Clad/2 nsel,r,loc,z,Height_Clad*4,Height_Clad*5 nsel,r,loc,y,-3*StepDis,3*StepDis esln,s,1 ealive,all allsel,all ESEL,S,LIVE EPLOT !===第五層加載熱源 nsel,s,loc,x,-Width_Clad/2,Width_Clad/2 nsel,r,loc,z,Height_Clad*5 nsel,r,loc,y,-3*StepDis,3*StepDis SF,all,HFLUX,%huanxing% ESEL,S,LIVE /PSF,HFLUX,,2 /REPLOT EPLOT ALLSEL,ALL OUTRES,ALL,ALL SOLVE YC=YC+StepDis *ENDDO FINISH /POST1 PLNSOL,TEMP,,0 |
回復(fù)此樓» 猜你喜歡
材料專碩323求調(diào)劑
已經(jīng)有3人回復(fù)
-
招調(diào)劑
已經(jīng)有15人回復(fù)
-
A區(qū)一本交叉課題組，低分調(diào)劑，招收機(jī)械電子信息通信等交叉方向
已經(jīng)有47人回復(fù)
-
調(diào)劑的同學(xué)，走過(guò)路過(guò)，不要錯(cuò)過(guò)
已經(jīng)有8人回復(fù)
-
26申博自薦
已經(jīng)有8人回復(fù)
-
接受26屆調(diào)劑生
已經(jīng)有15人回復(fù)
-
我嘗試在小木蟲上招計(jì)算機(jī)專業(yè)的調(diào)劑學(xué)生
已經(jīng)有6人回復(fù)
-
售SCI一區(qū)T0P文章，我:8.O.5.5.1.O.5.4,科目齊全,可+急
已經(jīng)有5人回復(fù)
-
售瀆SCI文章，我:8⊙ 55 1⊙ 54。備注【⊙=0】
已經(jīng)有4人回復(fù)
-
售瀆SCI文章，我:8⊙ 55 1⊙ 54。備注【⊙=0】
已經(jīng)有3人回復(fù)
» 本主題相關(guān)商家推薦: (我也要在這里推廣)
lk12
新蟲 (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 90
- 帖子: 32
- 在線: 6.8小時(shí)
- 蟲號(hào): 24619712
- 注冊(cè): 2020-11-22
- 性別: GG
- 專業(yè): 零件成形制造
2樓2020-11-26 18:56:53
相關(guān)版塊跳轉(zhuǎn)
我要訂閱樓主 lk12 的主題更新
| 2 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[教師之家] 售SCI一區(qū)T0P文章，我:8.O.5.5.1.O.5.4,科目齊全,可+急 +3 | 7mzg0e04z2 2026-03-06 | 5/250 |
|
|---|---|---|---|---|
|
|
[考博] 申博 +3 | 添菜了哈 2026-03-04 | 6/300 |
|
|
[考研] 一志愿中石油，化學(xué)工程，301求調(diào)劑 +4 | 豚饅枳枳 2026-03-04 | 4/200 |
|
|
|
[考研]
 化學(xué)工程與技術(shù)316求調(diào)劑
+5
|
Sixuan wang 2026-03-06 | 5/250 |
|
|
|
[考研] 0805總分292，求調(diào)劑 +13 | 幻想之殤 2026-03-01 | 13/650 |
|
|
|
[考研] 085600材料與化工（高分子）290分求調(diào)劑 +9 | wengyujian 2026-03-04 | 9/450 |
|
|
|
[考研] 材料與化工304求B區(qū)調(diào)劑 +4 | 邱gl 2026-03-06 | 4/200 |
|
|
|
[考研] 材料考研339求調(diào)劑 +3 | Karry*^_^* 2026-03-04 | 3/150 |
|
|
|
[考研] 求材料調(diào)劑 +4 | berdmond 2026-03-05 | 4/200 |
|
|
|
[考研] 347求調(diào)劑 +6 | 啊歐歐歐 2026-03-03 | 8/400 |
|
|
|
[考研] 材料類考研調(diào)劑 +7 | gemmgemm 2026-03-01 | 8/400 |
|
|
|
[考研] 環(huán)境工程專碩307 一志愿211 四六級(jí)已過(guò) 求調(diào)劑 +5 | ccc! 2026-03-03 | 6/300 |
|
|
|
[考研] 0703化學(xué) 學(xué)碩 理工科均可 不區(qū)分研究方向 總分279求調(diào)劑 +7 | 1一11 2026-03-03 | 7/350 |
|
|
|
[考研] 266求調(diào)劑 +7 | 哇塞王帥 2026-03-03 | 7/350 |
|
|
|
[考研]
0703化學(xué)學(xué)碩 288分
+4
|
旅行中的紫葡萄 2026-03-03 | 4/200 |
|
|
|
[考研] 085602化學(xué)工程350，調(diào)劑，有沒有211的 +5 | 利好利好. 2026-03-02 | 9/450 |
|
|
|
[考研] 295求調(diào)劑。一志愿報(bào)考鄭州大學(xué)化學(xué)工藝學(xué)碩，總分295分 +8 | yl1 2026-03-02 | 9/450 |
|
|
|
[考研] 284求調(diào)劑 +10 | 天下熯 2026-02-28 | 11/550 |
|
|
|
[考研] 279求調(diào)劑 +3 | dua1 2026-03-01 | 4/200 |
|
|
|
[考研] 291分工科求調(diào)劑 +9 | science餓餓 2026-03-01 | 10/500 |
|