 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 2 | 1/1 | 返回列表 |
| 查看: 961 | 回復(fù): 1 | ||
| 【懸賞金幣】回答本帖問題，作者lk12將贈送您 5 個(gè)金幣 | ||
lk12新蟲 (初入文壇)
|
[求助]
ansys中使用表面單元加載對流載荷，求救如何使用
|
|
|
請教大佬表面效應(yīng)單元的問題，我想在這個(gè)程序中增加一個(gè)表面效應(yīng)的對流載荷，顯示單元4未定義，esurf只能應(yīng)用在線或者面上，請問怎么改呢？ 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 !對流換熱系數(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í)間長度(s) TotalTime=(Length_Clad-2*Radius1)/V !總時(shí)長(s) !StepNum=(Length_Clad-2*Radius1)/StepDis !載荷步數(shù) StepNum=76 !載荷步數(shù) !===對流 nsel,s,ext nsel,u,loc,z,Height_Clad*Layer SF,all,CONV,30,20 allsel,all !===對流 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 !指定使用自動步長跟蹤 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ù)此樓» 猜你喜歡
售瀆SCI文章，我:8⊙ 55 1⊙ 54。備注【⊙=0】
已經(jīng)有4人回復(fù)
-
0703求調(diào)劑
已經(jīng)有4人回復(fù)
-
A區(qū)一本交叉課題組，低分調(diào)劑，招收機(jī)械電子信息通信等交叉方向
已經(jīng)有49人回復(fù)
-
調(diào)劑的同學(xué)，走過路過，不要錯(cuò)過
已經(jīng)有9人回復(fù)
-
材料專碩調(diào)劑
已經(jīng)有8人回復(fù)
-
288求調(diào)劑085600材料與化工
已經(jīng)有8人回復(fù)
-
304求調(diào)劑
已經(jīng)有5人回復(fù)
-
289求調(diào)劑
已經(jīng)有11人回復(fù)
-
0817化學(xué)工程與技術(shù)312分求調(diào)劑
已經(jīng)有5人回復(fù)
-
267化工調(diào)劑求助
已經(jīng)有6人回復(fù)
» 本主題相關(guān)商家推薦: (我也要在這里推廣)
lk12
新蟲 (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 90
- 帖子: 32
- 在線: 6.8小時(shí)
- 蟲號: 24619712
- 注冊: 2020-11-22
- 性別: GG
- 專業(yè): 零件成形制造
2樓2020-11-26 18:56:53
相關(guān)版塊跳轉(zhuǎn)
我要訂閱樓主 lk12 的主題更新
| 2 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 我嘗試在小木蟲上招計(jì)算機(jī)專業(yè)的調(diào)劑學(xué)生 +4 | littlehu66 2026-03-04 | 6/300 |
|
|---|---|---|---|---|
|
[考研] 一志愿山東大學(xué)105500藥學(xué)專碩，總分302求調(diào)劑 +4 | 五維天空 2026-03-04 | 9/450 |
|
|
|
[考研] 276求調(diào)劑 本科天津工業(yè)大學(xué) 一志愿北京化工大學(xué)0855 +4 | 路lyh123 2026-03-06 | 6/300 |
|
|
|
[考研] 售瀆SCI文章，我:8⊙ 55 1⊙ 54。備注【⊙=0】 +3 | ipys00zm58 2026-03-06 | 4/200 |
|
|
|
[考研] 求調(diào)劑 一志愿蘇州大學(xué)，0856化工323分 | 本科應(yīng)化 | 有專利/競賽/科研助手經(jīng)歷 | +5 | 橙子cyx 2026-03-06 | 6/300 |
|
|
|
[考研] 306求調(diào)劑 +7 | Bahati 2026-03-05 | 7/350 |
|
|
|
[考研]
 材料工程調(diào)劑
+6
|
zbcm_zbcm 2026-03-05 | 6/300 |
|
|
|
[考研] 材料與化工354調(diào)劑 +4 | Lucy-xiao 2026-03-06 | 7/350 |
|
|
|
[考研] 材料085601一志愿哈工大317 +4 | 壓迫感行 2026-03-04 | 4/200 |
|
|
|
[考研] 材料調(diào)劑 +5 | ws 上岸鴨 2026-03-05 | 5/250 |
|
|
|
[考研] 334求調(diào)劑 +3 | Trying] 2026-03-03 | 4/200 |
|
|
|
[考研] 0703化學(xué) 學(xué)碩 理工科均可 不區(qū)分研究方向 總分279求調(diào)劑 +7 | 1一11 2026-03-03 | 7/350 |
|
|
|
[考研] 316求調(diào)劑 +3 | 林小星發(fā)大財(cái) 2026-03-04 | 3/150 |
|
|
|
[考研] 調(diào)劑材料學(xué)碩 +6 | 詞凝Y 2026-03-02 | 6/300 |
|
|
|
[考研] 0855機(jī)械工程324求調(diào)劑 +3 | 鄭SK 2026-03-02 | 7/350 |
|
|
|
[考研] 一志愿314求調(diào)劑 +7 | 202111120625 2026-03-03 | 7/350 |
|
|
|
[考研] 一志愿中科大能動297求調(diào)劑，本科川大 +3 | 邵11 2026-03-03 | 3/150 |
|
|
|
[考研] 299求調(diào)劑 +5 | kkcoco25 2026-03-02 | 9/450 |
|
|
|
[考研] 11408，學(xué)碩276求調(diào)劑 +3 | 崔wj 2026-03-02 | 5/250 |
|
|
|
[考研] 調(diào)劑 +3 | 13853210211 2026-03-02 | 4/200 |
|