24小时热门版块排行榜    

查看: 1117  |  回复: 3

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      还有后面为什么要给六个面施加热流  哪位大神能给解释一下吗
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

123dingyc

新虫 (知名作家)

2楼2017-12-14 11:24:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

tuzuoqi

银虫 (小有名气)

引用回帖:
2楼: Originally posted by 123dingyc at 2017-12-14 11:24:50
怎么算焊接

建立热源的数学模型,施加到有限元模型上进行计算
3楼2017-12-14 14:53:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

123dingyc

新虫 (知名作家)

4楼2017-12-14 15:43:07
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 tuzuoqi 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 被我言中:新模板不强调格式了,假专家开始管格式了 +4 beefly 2026-03-14 4/200 2026-03-17 22:04 by 黄鸟于飞Chao
[考研] 085601材料工程专硕求调剂 +5 慕寒mio 2026-03-16 5/250 2026-03-17 21:31 by hmn_wj
[考研] 材料,纺织,生物(0856、0710),化学招生啦 +3 Eember. 2026-03-17 7/350 2026-03-17 20:20 by 花125533
[考研] 328求调剂,英语六级551,有科研经历 +3 生物工程调剂 2026-03-16 8/400 2026-03-17 19:03 by Wangjingyue
[硕博家园] 湖北工业大学 生命科学与健康学院-课题组招收2026级食品/生物方向硕士 +3 1喜春8 2026-03-17 5/250 2026-03-17 17:18 by ber川cool子
[考研] 本人考085602 化学工程 专硕 +16 不知道叫什么! 2026-03-15 18/900 2026-03-17 17:05 by ruiyingmiao
[考研] 工科材料085601 279求调剂 +3 困于星晨 2026-03-17 3/150 2026-03-17 14:08 by ms629
[考研] 0854可跨调剂,一作一项核心论文五项专利,省、国级证书40+数一英一287 +3 小李0854 2026-03-16 3/150 2026-03-17 13:40 by 热情沙漠
[考研] 321求调剂 +5 大米饭! 2026-03-15 5/250 2026-03-16 16:33 by houyaoxu
[考研] 中科院材料273求调剂 +4 yzydy 2026-03-15 4/200 2026-03-16 15:59 by Gaodh_82
[考研] 复试调剂 +3 呼呼?~+123456 2026-03-14 3/150 2026-03-14 16:53 by WTUChen
[考研] 复试调剂 +4 z1z2z3879 2026-03-14 5/250 2026-03-14 16:30 by JourneyLucky
[考研] 330求调剂 +3 ?酱给调剂跪了 2026-03-13 3/150 2026-03-14 10:13 by JourneyLucky
[考研] 材料与化工求调剂一志愿 985 总分 295 +8 dream…… 2026-03-12 8/400 2026-03-13 22:17 by 星空星月
[考研] 一志愿西南交大,材料专硕317求调剂 +5 lx8568 2026-03-11 5/250 2026-03-13 21:43 by peike
[考研] 315求调剂 +9 小羊小羊_ 2026-03-11 10/500 2026-03-13 21:13 by SXNU李老师
[考研] 329求调剂 +3 miaodesi 2026-03-12 4/200 2026-03-13 20:53 by 18595523086
[考研] 材料与化工085600调剂求老师收留 +9 jiaanl 2026-03-11 9/450 2026-03-13 20:22 by JourneyLucky
[考研] 求调剂 +3 程雨杭 2026-03-12 3/150 2026-03-13 15:06 by JourneyLucky
[考研] 283求调剂,材料、化工皆可 +8 苏打水7777 2026-03-11 10/500 2026-03-13 09:06 by Linda Hu
信息提示
请填处理意见