| 1 | 1/1 | 返回列表 |
| 查看: 2203 | 回復(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,加熱斑點(diǎn)半徑,95%的熱量落在以Rh為半徑的面積內(nèi) C d,當(dāng)前時刻焊接斑點(diǎn)中心跟焊接初始位置的距離 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 |
| 1 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 材料與化工求調(diào)劑 +3 | 為學(xué)666 2026-03-16 | 3/150 |
|
|---|---|---|---|---|
|
[考研] 材料與化工專碩調(diào)劑 +3 | heming3743 2026-03-16 | 3/150 |
|
|
[考研] 304求調(diào)劑 +6 | 小熊joy 2026-03-14 | 6/300 |
|
|
[考研] 304求調(diào)劑 +4 | 素年祭語 2026-03-15 | 4/200 |
|
|
[考研] 326求調(diào)劑 +4 | 上岸的小葡 2026-03-15 | 5/250 |
|
|
[考研] 一志愿985,本科211,0817化學(xué)工程與技術(shù)319求調(diào)劑 +4 | Liwangman 2026-03-15 | 4/200 |
|
|
[考研] 311求調(diào)劑 +6 | 冬十三 2026-03-15 | 6/300 |
|
|
[考研] 326求調(diào)劑 +3 | mlpqaz03 2026-03-15 | 3/150 |
|
|
[考研] 0856專碩279求調(diào)劑 +5 | 加油加油!? 2026-03-15 | 5/250 |
|
|
[考研] 288求調(diào)劑 +4 | 奇點(diǎn)0314 2026-03-14 | 4/200 |
|
|
[考研] 0703求調(diào)劑 +7 | jtyq001 2026-03-10 | 7/350 |
|
|
[考研] 材料工程專碩,一志愿中國礦業(yè)大學(xué),總分314,求調(diào)劑 +5 | 無懈可擊的巨人 2026-03-10 | 5/250 |
|
|
[考研] 材料專碩288分求調(diào)劑 一志愿211 +4 | 在家想你 2026-03-11 | 4/200 |
|
|
[考研] 材料工程調(diào)劑 +9 | 咪咪空空 2026-03-12 | 9/450 |
|
|
[考研] 一志愿211化學(xué)學(xué)碩310分求調(diào)劑 +8 | 努力奮斗112 2026-03-12 | 9/450 |
|
|
[考研] 0856化工原理 +6 | z2839474511 2026-03-10 | 6/300 |
|
|
[考研] 274求調(diào)劑0856材料化工 +12 | z2839474511 2026-03-11 | 13/650 |
|
|
[考博] 福州大學(xué)楊黃浩課題組招收2026年專業(yè)學(xué)位博士研究生,2026.03.20截止 +3 | Xiangyu_ou 2026-03-12 | 3/150 |
|
|
[考研] 085600 材料與化工 295 求調(diào)劑 +10 | dream…… 2026-03-10 | 12/600 |
|
|
[考研] 一志愿:武漢理工,材料工程,英二數(shù)二 總分314 +3 | 2202020125 2026-03-10 | 4/200 |
|