热点耦合分析出错!急求大家帮忙!
原来是一个热分析,现在的是热电耦合的,不收敛,请大家帮忙看看原因吧!感激不尽!Finish
/clear
/filname,redian,1
/UNITS,MKS
/PREP7
ET,1,solid69
ET,2,solid69
MPTEMP,1,273,2500,5000,7500,10000,12500
MPTEMP,7,15000,17500,20000
MPDATA,RSVX,1,1,1000,100,1,1.3e-3,3.3e-4,1.6e-4
MPDATA,RSVX,1,7,1.2e-4,9.8e-5,8.5e-5
MPDATA,KXX,1,1,0,0.1,0.2,0.3,0.6,1.6
MPDATA,KXX,1,7,2.4,2.0,2.2
MPDATA,C,1,1,500,500,500,600,1250,6000
MPDATA,C,1,7,10000,4000,2500
MPDATA,DENS,1,1,1.1,0.2,0.1,0.07,0.04,0.03
MPDATA,DENS,1,7,0.02,0.015,0.014
!mp,KXX,2,,173
!MP,RSVX,2,,0.0000000528
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,KXX,2,,173
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,RSVX,2,,0.0000000528
!建模
wpro,,-90
CYL4,0,0,0.006,90, , ,0.006
WPAVE,0,0.004,0
CONE,0.00024,0.0014,0,0.002,0,90,
VSBW,all,,dele!分割平面
WPAVE,0,0,0
CYL4,0,0,0.00024,90, , ,0.004
CYL4,0,0,0.0014,90, , ,0.006
CYL4,0,0,0.003,90, , ,0.006
VOVLAP,all
VGLUE,ALL
AGLUE,ALL
LGLUE,ALL
!NUMMRG,NODE
NUMCMP,all
/VIEW,1,1,2,3
WPCSYS,-1,0 !工作平面坐标归位
WPSTYLE,,,,,,,,0
!划分网格
VSEL,,,,2 !分配钨极材料属性
VATT,2,1,2
vsel,inve !选择其他所有的,分配气体材料属性
VATT,1,1,1
allsel,all
AESIZE,7,0.0001,
AESIZE,12,0.0001,
AESIZE,18,0.0001,
AESIZE,22,0.0002,
AESIZE,26,0.0002,
AESIZE,32,0.0002,
AESIZE,34,0.0002,
LESIZE,2, , ,16, , , , ,1
MSHAPE,0,3d
MSHKEY,1
VMESH,all
finish
save
/sol
VSEL,S, , ,1
VSEL,A, , ,4
VSEL,A, , ,7
TUNIF,10000,
ALLSEL,ALL
asel,s,,,2
asel,a,,,9
DA,all,TEMP,3000
asel,s,,,5
asel,a,,,6
asel,a,,,25
asel,a,,,33
DA,all,TEMP,1000
asel,s,loc,y,0
DA,all,TEMP,5000
DA,all,VOLT,0,0
ASEL,S,AREA,,4
NSLA,S,1
CP,next,VOLT,ALL
*GET,NMIN,NODE,,NUM,MIN
F,NMIN,AMPS,-150
ALLSEL,ALL
solve
[ 本帖最后由 lilichunyan 于 2009-6-6 20:47 编辑 ] ALLSEL,ALL
asel,s,,,2
asel,a,,,9
DA,all,TEMP,3000
asel,s,,,5
asel,a,,,6
asel,a,,,25
asel,a,,,33
DA,all,TEMP,1000
asel,s,loc,y,0
DA,all,TEMP,5000
是否应该在每次asel,s,..之前增加一个allsel,all "VSEL,S, , ,1
VSEL,A, , ,4
VSEL,A, , ,7
TUNIF,10000,
ALLSEL,ALL "
1。tunif命令为整个模型施加初始温度,所以选择命令无效
2。你的命令流我执行并收敛了,附件为计算结果。
3。根据ANSYS HELP,SOLID70单元的材料特性为
Material Properties KXX, KYY, KZZ, DENS, C, ENTH, VISC, MU (VISC and MU used only if KEYOPT(7) = 1. Do not use ENTH with KEYOPT(8) = 1).
[ 本帖最后由 jxxansys 于 2009-6-6 15:28 编辑 ]
回复 沙发 16443 的帖子
这个倒是不用,我试过!回复 板凳 jxxansys 的帖子
呵呵,还真收敛了,发帖的时候稍微改了一下,但只是去掉的没用的啊!呵呵,很奇怪!但是这个结果是不对的,那我怎么能为部分区域加上初始温度10000啊?
回复 板凳 jxxansys 的帖子
原来的程序是我把热电部分分开了,现在是整个程序,不收敛的,您看看会不会?
页:
[1]