 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 2 | 1/1 | 返回列表 |
| 查看: 617 | 回復(fù): 1 | |||
Emanonvvv新蟲 (初入文壇)
|
[交流]
我這個(gè)移動高斯柱體熱源子程序哪里出問題了，求指正 已有1人參與
|
|
SUBROUTINE DFLUX(FLUX,SOL,KSTEP,KINC,TIME,NOEL,NPT,COORDS, 1 JLTYP,TEMP,PRESS,SNAME) INCLUDE 'ABA_PARAM.INC' parameter(one=1.d0) DIMENSION COORDS(3),FLUX(2),TIME(2) CHARACTER*80 SNAME C 熱源功率（熱源瞬時(shí)給焊件的熱能）Q,熱效率n；熱源半徑Rh，單位m ;熱源穿透深度80微米，0.00008m Q=170 n=1 Rh=0.0001 PI=3.1415 h=0.00008 C 移動速度v=0.05m/s v=0.05 x=COORDS(1) y=COORDS(2) z=COORDS(3) C 定義移動熱源起始點(diǎn)。 x0=-0.001 y0=0 z0=0 d=v*TIME(1)C JLTYP＝1，表示為體熱源 JLTYP=1 C 計(jì)算熱源熱流密度，F(xiàn)LUX,單位J/(m^2*s) R=sqrt((x-x0-d)**2+(z-z0)**2) heat=3*Q*n/(h*PI*Rh**2) shape1=exp(-3*R**2/Rh**2) if (JSTEP.eq.one) then FLUX(1)=heat*shape1 RETURN END 發(fā)自小木蟲Android客戶端 |
回復(fù)此樓» 猜你喜歡
接受26屆調(diào)劑生
已經(jīng)有13人回復(fù)
-
調(diào)劑的同學(xué)，走過路過，不要錯(cuò)過
已經(jīng)有6人回復(fù)
-
276求調(diào)劑 本科天津工業(yè)大學(xué) 一志愿北京化工大學(xué)0855
已經(jīng)有5人回復(fù)
-
售瀆SCI文章，我:8⊙ 55 1⊙ 54。備注【⊙=0】
已經(jīng)有3人回復(fù)
-
售瀆SCI文章，我:8⊙ 55 1⊙ 54。備注【⊙=0】
已經(jīng)有6人回復(fù)
-
求調(diào)劑推薦
已經(jīng)有4人回復(fù)
-
26申博自薦
已經(jīng)有7人回復(fù)
-
進(jìn)入個(gè)人成果庫好難，一下午都沒進(jìn)去
已經(jīng)有5人回復(fù)
-
求調(diào)劑
已經(jīng)有5人回復(fù)
-
求調(diào)劑 一志愿蘇州大學(xué)，0856化工323分 | 本科應(yīng)化 | 有專利/競賽/科研助手經(jīng)歷 |
已經(jīng)有6人回復(fù)
馬明鋒
新蟲 (初入文壇)
- 應(yīng)助: 0 (幼兒園)
- 金幣: 55.2
- 散金: 10
- 帖子: 26
- 在線: 15.7小時(shí)
- 蟲號: 14329752
- 注冊: 2019-02-23
- 專業(yè): 多相流熱物理學(xué)
2樓2020-12-10 07:57:31
相關(guān)版塊跳轉(zhuǎn)
我要訂閱樓主 Emanonvvv 的主題更新
| 2 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 276求調(diào)劑 本科天津工業(yè)大學(xué) 一志愿北京化工大學(xué)0855 +3 | 路lyh123 2026-03-06 | 5/250 |
|
|---|---|---|---|---|
|
|
[考研] 301求調(diào)劑 +7 | 朝天椒的雙馬尾 2026-03-05 | 7/350 |
|
|
|
[考研] 287求調(diào)劑 +3 | 看看我. 2026-03-05 | 6/300 |
|
|
|
[考研] 求調(diào)劑 +5 | danyyyy 2026-03-04 | 5/250 |
|
|
[考研] 沒上岸的看過來 +3 | tangxiaotian 2026-03-01 | 5/250 |
|
|
|
[考研] 281電子信息求調(diào)劑 +5 | jhtfeybgj 2026-03-02 | 9/450 |
|
|
|
[考研] 材料328求調(diào)劑 +10 | 一個(gè)蘿卜02 2026-03-03 | 10/500 |
|
|
|
[考研] 22408-273求調(diào)劑-擔(dān)任3個(gè)項(xiàng)目的負(fù)責(zé)人-1篇國際期刊論文（一作）1篇核心期刊論文在投。 +3 | 沒想好取什么名 2026-03-03 | 3/150 |
|
|
|
[論文投稿]
 主編終審卡者不動
 100+4
|
Stray2021 2026-03-03 | 4/200 |
|
|
|
[考研] 化學(xué)工程求調(diào)劑 +10 | 化工人999 2026-03-04 | 10/500 |
|
|
|
[考研] 一志愿武漢理工大學(xué)-085602-總分296分-求調(diào)劑 +7 | 紫川葡柚 2026-03-04 | 7/350 |
|
|
|
[考研] 085600 材料與化工 298 +14 | 小西笑嘻嘻 2026-03-03 | 14/700 |
|
|
|
[考研] 武理材料工程302調(diào)劑 +3 | Doleres 2026-03-03 | 6/300 |
|
|
|
[考研] 298求調(diào)劑一志愿中海洋 +3 | lour. 2026-03-03 | 3/150 |
|
|
|
[考研] 0703化學(xué)306調(diào)劑 +4 | 26要上岸 2026-03-03 | 4/200 |
|
|
|
[考研] 292求調(diào)劑 +3 | sgbl 2026-03-03 | 3/150 |
|
|
|
[考研] 一志愿東北大學(xué)材料專碩328，求調(diào)劑 +3 | shs1083 2026-03-02 | 3/150 |
|
|
|
[考研] 295求調(diào)劑 +8 | 19171856320 2026-02-28 | 8/400 |
|
|
|
[考研] 一志愿鄭大材料學(xué)碩298分，求調(diào)劑 +6 | wsl111 2026-03-01 | 6/300 |
|
|
|
[考研] 275求調(diào)劑 +3 | L-xin? 2026-03-01 | 6/300 |
|