 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 1 | 1/1 | 返回列表 |
| 查看: 2159 | 回復(fù): 0 | |||
| 【懸賞金幣】回答本帖問題，作者xinxin998899將贈送您 30 個金幣 | |||
xinxin998899新蟲 (初入文壇)
|
[求助]
abqus的二道激光淬火代碼
|
||
|
求助大佬幫忙。軟件：abqus，激光淬火數(shù)值模擬，撰寫激光淬火代碼，一道激光淬火代碼已經(jīng)寫好了，現(xiàn)在差按照原路返回的二道激光淬火代碼，只需要增加按照原路徑返回的代碼，現(xiàn)有代碼： SUBROUTINE DFLUX(FLUX,SOL,KSTEP,KINC,TIME,NOEL,NPT,COORDS,JLTYP, 1 TEMP,PRESS,SNAME) C INCLUDE 'ABA_PARAM.INC' parameter(one=1.d0) DIMENSION COORDS(3),FLUX(2),TIME(2) CHARACTER*80 SNAME C Q,激光有效熱功率W C v,激光移動速度m/s C Rh,加熱斑點半徑，95%的熱量落在以Rh為半徑的面積內(nèi) C d,當(dāng)前時刻焊接斑點中心跟焊接初始位置的距離 Q=1000 v=0.01 Rh=0.003 d=v*TIME(2) x=COORDS(1) y=COORDS(2) z=COORDS(3) C 焊接板厚度為0.01m,焊槍移動從坐標(biāo)-0.1，0，0.01開始，沿著x方向移動 x0=-0.1 y0=0 z0=0.003 C PI=3.1415 C R=sqrt((x-x0-d)**2+(y-y0)**2) C JLTYP＝0，表示為面熱源 JLTYP=0 IF (KSTEP. eq. one) THEN FLUX(1)=3*Q/(PI*Rh**2)*exp(-3*R**2/Rh**2) ENDIF RETURN END |
回復(fù)此樓» 猜你喜歡
0856化工原理
已經(jīng)有5人回復(fù)
-
289求調(diào)劑
已經(jīng)有4人回復(fù)
-
材料與化工085600調(diào)劑求老師收留
已經(jīng)有4人回復(fù)
-
301求調(diào)劑
已經(jīng)有4人回復(fù)
-
（081700）化學(xué)工程與技術(shù)-298分求調(diào)劑
已經(jīng)有5人回復(fù)
-
售SCI一區(qū)T0P文章，我:8.O.5.5.1.O.5.4,科目齊全,可+急
已經(jīng)有8人回復(fù)
-
求調(diào)劑
已經(jīng)有5人回復(fù)
-
一志愿中科大材料與化工。353分能調(diào)劑到哪？
已經(jīng)有7人回復(fù)
-
337一志愿華南理工0805材料求調(diào)劑
已經(jīng)有5人回復(fù)
-
伙伴們，祝我生日快樂吧
已經(jīng)有4人回復(fù)
相關(guān)版塊跳轉(zhuǎn)
我要訂閱樓主 xinxin998899 的主題更新
| 1 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 材料工程,326分，求調(diào)劑 +4 | KRSLSR 2026-03-10 | 4/200 |
|
|---|---|---|---|---|
|
[考研] 0703求調(diào)劑 +4 | jtyq001 2026-03-10 | 4/200 |
|
|
|
[基金申請] 提交后的基金本子，已讓學(xué)校撤回了，可否換口子提交 +3 | dut_pfx 2026-03-10 | 3/150 |
|
|
|
[考研] 306求調(diào)劑 +3 | 唐薏薏 2026-03-09 | 3/150 |
|
|
|
[考研] 調(diào)劑 +5 | 呵唔哦豁 2026-03-10 | 5/250 |
|
|
|
[考研] 086000生物與醫(yī)藥319分求調(diào)劑 +4 | Tolkien 2026-03-07 | 8/400 |
|
|
|
[考研] 332材料求調(diào)劑 +6 | zjy101327 2026-03-05 | 8/400 |
|
|
|
[考研] 材料專碩調(diào)劑 +7 | 慕辰123 2026-03-05 | 10/500 |
|
|
|
[考研] 0817化學(xué)工程319求調(diào)劑 +7 | lv945 2026-03-08 | 9/450 |
|
|
|
[考博] 找博導(dǎo) +4 | 小呆呆熊 2026-03-07 | 4/200 |
|
|
|
[考博] 2026博士申請 +6 | 起泡酒 2026-03-08 | 6/300 |
|
|
|
[考研] 0703化學(xué)調(diào)劑 +7 | 小奶蒼 2026-03-07 | 7/350 |
|
|
|
[考研] 0703求調(diào)劑 +10 | c297914 2026-03-06 | 11/550 |
|
|
|
[考研] 320求調(diào)劑 +4 | 魏zy 2026-03-08 | 4/200 |
|
|
|
[考研] 070300化學(xué)求調(diào)劑 +5 | 撲風(fēng)鈴的貓 2026-03-08 | 10/500 |
|
|
|
[考研] 313求調(diào)劑 +4 | Yyt楊1 2026-03-07 | 5/250 |
|
|
|
[考研] 材料調(diào)劑 +4 | xxxcm 2026-03-08 | 7/350 |
|
|
|
[考研] 理學(xué)287分求調(diào)劑 +4 | 看看我. 2026-03-05 | 4/200 |
|
|
|
[考研] 0701-322 求調(diào)劑 +3 | jiliuxian 2026-03-06 | 8/400 |
|
|
|
[考研] 376求調(diào)劑 +3 | 王浩然sam 2026-03-04 | 3/150 |
|