| 5 | 1/1 | 返回列表 |
| 查看: 1129 | 回復(fù): 3 | |||
| 當(dāng)前只顯示滿足指定條件的回帖,點擊這里查看本話題的所有回帖 | |||
tuzuoqi銀蟲 (小有名氣)
|
[求助]
ansys焊接命令流解釋
|
||
|
/CLEAR /FILNAME,EXAMPLE30 /PREP7 ET,1,PLANE77 ET,2,SOLID90 V=0.005 LENGTH=0.05 L_NUMBER=LENGTH/V MPTEMP,1,0,300,600,1000,1300,2000 MPDATA,DENS,1,1,7859,7770,7659,7600,6750,6750 MPDATA,DENS,2,1,7859,7770,7659,7600,6750,6750 MPDATA,C,1,1,450,514,967,1370,2800,2000 MPDATA,C,2,1,450,514,967,1370,2800,2000 MPDATA,KXX,1,1,67,53,39,31,20,20 MPDATA,KXX,2,1,67,53,39,31,20,20 RECT,0,0.10,0,0.01 K,5,0.002 K,6,0.002,0.002 K,7,0.00662,0.01 K,8,0.00339,0.01112 K,9,0,0.0115 LARC,7,9,8 A,1,5,6,7,9 AGEN,2,2 ASBA,1,2 AGLUE,ALL K,20,0,-0.00385 CIRCLE,20,0.008,,,90 CIRCLE,20,0.012,,,90 ASBL,3,4 ASBL,2,5 ESIZE,0.00075 SMRTSIZE,7 MSHAPE,1 AMESH,3,5,1 ESIZE,0.003 AMESH,1 EXTOPT,ESIZE,L_NUMBER EXTOPT,ACLEAR,1 MAT,1 VEXT,3,5,1,,,LENGTH MAT,2 VEXT,1,,,,,LENGTH NUMMRG,NODE ALLS FINISH /SOLU AUTOTS,ON OUTPR,NSOL,ALL OUTRES,NSOL,ALL KBC,1 ANTYPE,TRANS TIMINT,OFF NSUBST,4 D,ALL,TEMP,20 TIME,0.01 SOLVE ESEL,S,MAT,,1 EKILL,ALL ESEL,ALL TIME,0.02 SOLVE TIMINT,ON,THER DDELE,ALL,TEMP TIME=0.02 *DIM,QQ,ARRAY,8 *DIM,E_NODE,ARRAY,20 *GET,ELEM_MAX,ELEM,0,NUM,MAX *GET,ELEM_MIN,ELEM,0,NUM,MIN *GET,NODE_MAX,NODE,0,NUM,MAX *GET,NODE_MIN,NODE,0,NUM,MIN *DIM,NODE_AVE,ARRAY,NODE_MAX *DO,J,NODE_MIN,NODE_MAX ALLS *IF,NSEL(J),EQ,1,THEN NSEL,S,,,J ESLN,S *GET,NODE_AVE(J),ELEM,0,COUNT *ENDIF *ENDDO ALLS *DO,KK,1,3 R=0.02 *IF,KK,EQ,1,THEN Q=3200*0.7 QMAX=3*Q/3.1415926/R/R XC=0.11190E-02 YC=0.21451E-02 V_NUM=2 TIME_INC=LENGTH/L_NUMBER/V *ENDIF *IF,KK,EQ,2,THEN Q=4500*0.7 QMAX=3*Q/3.1415926/R/R XC=0.20373E-02 YC=0.60454E-02 V_NUM=1 TIME_INC=LENGTH/L_NUMBER/1.5/V *ENDIF *IF,KK,EQ,3,THEN Q=5800*0.7 QMAX=3*Q/3.1415926/R/R XC=0.29574E-02 YC=0.94733E-02 V_NUM=3 TIME_INC=LENGTH/L_NUMBER/2/V *ENDIF *DO,J,1,L_NUMBER SFEDELE,ALL,ALL,HFLUX VSEL,S,,,V_NUM ESLV,S,1 NSEL,R,LOC,Z,(J-1)*LENGTH/L_NUMBER+0.001,J*LENGTH/L_NUMBER-0.001 ESLN,R EALIVE,ALL ALLS ZC=(J-0.5)*LENGTH/L_NUMBER *DO,I,ELEM_MIN,ELEM_MAX *IF,ESEL(I),EQ,1,THEN ESEL,S,,,I *DO,K,1,8 *GET,E_NODE(K),ELEM,I,NODE,K SS=E_NODE(K) DISP=SQRT((NX(SS)-XC)*(NX(SS)-XC)+(NY(SS)-YC)*(NY(SS)-YC)+(NZ(SS)-ZC)*(NZ(SS)-ZC)) EEE=3*DISP*DISP/R/R *IF,EEE,LT,25,THEN QQ(K)=QMAX*EXP(-EEE)/NODE_AVE(E_NODE(K)) *ELSE QQ(K)=0 *ENDIF *ENDDO *IF,QQ(1)+QQ(2)+QQ(3)+QQ(4),NE,0,THEN SFE,I,1,HFLUX,,QQ(1),QQ(2),QQ(3),QQ(4) *ENDIF *IF,QQ(1)+QQ(2)+QQ(5)+QQ(6),NE,0,THEN SFE,I,2,HFLUX,,QQ(1),QQ(2),QQ(6),QQ(5) *ENDIF *IF,QQ(6)+QQ(2)+QQ(3)+QQ(7),NE,0,THEN SFE,I,3,HFLUX,,QQ(2),QQ(3),QQ(7),QQ(6) *ENDIF *IF,QQ(1)+QQ(4)+QQ(5)+QQ(7),NE,0,THEN SFE,I,5,HFLUX,,QQ(1),QQ(4),QQ(7),QQ(5) *ENDIF *IF,QQ(5)+QQ(6)+QQ(7)+QQ(8),NE,0,THEN SFE,I,6,HFLUX,,QQ(5),QQ(6),QQ(7),QQ(8) *ENDIF ALLS *ENDIF *ENDDO ALLS ASEL,S,LOC,Z,0 ASEL,A,LOC,Z,LENGTH ASEL,A,,,20,22,1 ASEL,A,,,17 SFA,ALL,1,CONV,30,20 ALLS TIME=TIME+TIME_INC NSUBST,5,10,3 LNSRCH,ON TIME,TIME SOLVE *ENDDO TIME=TIME+3600 TIME,TIME SFEDELE,ALL,ALL,HFLUX SOLVE *ENDDO SAVE FINI EEE=3*DISP*DISP/R/R *IF,EEE,LT,25,THEN QQ(K)=QMAX*EXP(-EEE)/NODE_AVE(E_NODE(K)) *ELSE QQ(K)=0 *ENDIF *ENDDO *IF,QQ(1)+QQ(2)+QQ(3)+QQ(4),NE,0,THEN SFE,I,1,HFLUX,,QQ(1),QQ(2),QQ(3),QQ(4) *ENDIF *IF,QQ(1)+QQ(2)+QQ(5)+QQ(6),NE,0,THEN SFE,I,2,HFLUX,,QQ(1),QQ(2),QQ(6),QQ(5) *ENDIF *IF,QQ(6)+QQ(2)+QQ(3)+QQ(7),NE,0,THEN SFE,I,3,HFLUX,,QQ(2),QQ(3),QQ(7),QQ(6) *ENDIF *IF,QQ(1)+QQ(4)+QQ(5)+QQ(7),NE,0,THEN SFE,I,5,HFLUX,,QQ(1),QQ(4),QQ(7),QQ(5) *ENDIF *IF,QQ(5)+QQ(6)+QQ(7)+QQ(8),NE,0,THEN SFE,I,6,HFLUX,,QQ(5),QQ(6),QQ(7),QQ(8) *ENDIF ALLS *ENDIF *ENDDO ALLS ASEL,S,LOC,Z,0 ASEL,A,LOC,Z,LENGTH ASEL,A,,,20,22,1 ASEL,A,,,17 SFA,ALL,1,CONV,30,20 ALLS TIME=TIME+TIME_INC NSUBST,5,10,3 LNSRCH,ON TIME,TIME SOLVE *ENDDO TIME=TIME+3600 TIME,TIME SFEDELE,ALL,ALL,HFLUX 上面第二段代碼,EEE=3*DISP*DISP/R/R 是什么意思 為什么EEE<25 還有后面為什么要給六個面施加熱流 哪位大神能給解釋一下嗎 |
ANSYS命令流 |
銀蟲 (小有名氣)
新蟲 (知名作家)
新蟲 (知名作家)
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 各位老師好,我的一志愿為北京科技大學(xué)085601材料專碩 +11 | Koxui 2026-03-28 | 11/550 |
|
|---|---|---|---|---|
|
[考研] 273求調(diào)劑 +5 | 李芷新1 2026-03-31 | 5/250 |
|
|
[考研] 349求調(diào)劑 +4 | zwjjjjjj 2026-03-31 | 4/200 |
|
|
[考研] 288求調(diào)劑 一志愿哈工大 材料與化工 +17 | 洛神哥哥 2026-03-31 | 17/850 |
|
|
[考研] 086000調(diào)劑 +5 | 7901117076 2026-03-26 | 5/250 |
|
|
[考研] 求調(diào)劑 生物學(xué) 377分 +6 | zzll03 2026-03-31 | 6/300 |
|
|
[考研] 材料專碩調(diào)劑 +13 | 椰椰。 2026-03-29 | 13/650 |
|
|
[考研] 理學(xué)07化學(xué) 303求調(diào)劑 +8 | 睿08 2026-03-27 | 8/400 |
|
|
[考研] 263求調(diào)劑 +3 | DDDDuu 2026-03-27 | 3/150 |
|
|
[考研] 081200-11408-276學(xué)碩求調(diào)劑 +4 | 崔wj 2026-03-31 | 4/200 |
|
|
[考博] 材料專業(yè)申博 +5 | 杜雨婷dyt 2026-03-29 | 5/250 |
|
|
[考研] 0817化工學(xué)碩調(diào)劑 +7 | 努力上岸中! 2026-03-31 | 7/350 |
|
|
[考研] 293分求調(diào)劑,外語為俄語 +5 | 加一一九 2026-03-31 | 5/250 |
|
|
[考研] 08工科求調(diào)劑286 +5 | tgs_001 2026-03-28 | 5/250 |
|
|
[考研] 求調(diào)劑 +7 | 青春裁為三截 2026-03-29 | 7/350 |
|
|
[考研] 343求調(diào)劑085601 +3 | 要努力學(xué)習(xí)x 2026-03-29 | 3/150 |
|
|
[考研] 340求調(diào)劑 +6 | Amber00 2026-03-26 | 6/300 |
|
|
[考研] 材料與化工(0856)304求B區(qū)調(diào)劑 +8 | 邱gl 2026-03-27 | 8/400 |
|
|
[有機交流]
高溫高壓反應(yīng)求助
10+4
|
chibby 2026-03-25 | 4/200 |
|
|
[考研] 化學(xué)調(diào)劑一志愿上海交通大學(xué)336分-本科上海211 +4 | 小魚愛有機 2026-03-25 | 4/200 |
|