请大侠急救附命令流
本帖最后由 西风独自凉 于 2012-3-6 07:56 编辑fini
/cle
/PREP7
/TITLE,Part 1:heat transfer analysis
ET,1,SOLID70
W_col=0.2039 !柱截面宽度
H_col=0.2062 !柱截面高度
tf_col=0.0125 !柱翼缘厚度
tw_col=0.0083 !柱腹板厚度
B_col=(W_col-tw_col)/2 !柱翼缘伸出长度
D_col=H_col-2*tf_col !柱腹板净高
W_beam=0.165 !梁截面宽度
H_beam=0.3038 !梁截面高度
tf_beam=0.0102 !梁翼缘厚度
tw_beam=0.0061 !梁腹板厚度
B_beam=(W_beam-tw_beam)/2 !梁翼缘伸出长度
D_beam=H_beam-2*tf_beam !梁腹板净高
Dis_hor=5.5 !框架水平跨间距
Dis_ver=3.0 !框架竖向层高
pp=(W_col-W_beam)/2
MPTEMP,,20,800,900,1000
MPDATA,KXX,1,,53.334,27.36,27.36,27.36
MPTEMP
MPTEMP,,20,100,180,260,380
MPDATA,C,1,,439.8,487.62,522.33,550.75,596.52
MPTEMP,,500,600,640,720,735
MPDATA,C,1,,666.5,759.92,798.67,1388,5000
MPTEMP,,750,830,900,1000
MPDATA,C,1,,1483,725,650,650
MP,DENS,1,7850
N,1,-H_col/2,,-W_col/2
N,2,-H_col/2,,-W_col/2+pp
NGEN,4,1,2,,,,,(B_col-pp)/3
N,6,-H_col/2,,tw_col/2
NGEN,4,1,6,,,,,(B_col-pp)/3
N,10,-H_col/2,,W_col/2
NGEN,2,10,1,10,1,tf_col
NGEN,10,6,15,16,1,D_col/10
NGEN,2,60,11,20,1,D_col
NGEN,2,10,71,80,1,tf_col
NGEN,2,100,all,,,,(Dis_ver-H_beam/2)/60
E,1,2,12,11,101,102,112,111
EGEN,9,1,1
E,15,16,22,21,115,116,122,121
EGEN,10,6,10
E,71,72,82,81,171,172,182,181
EGEN,9,1,20
egen,60,100,1,28,1,,,,,,,(Dis_ver-H_beam/2)/60
NSEL,S,NODE,,6001,6090,1
NGEN,2,100,ALL,,,,tf_beam
EGEN,2,100,1653,1680,1
NSEL,ALL
NSEL,S,NODE,,6101,6190
NGEN,11,100,ALL,,,,D_beam/10
EGEN,11,100,1681,1708,1
NSEL,ALL
NSEL,S,NODE,,7101,7190
NGEN,2,100,ALL,,,,tf_beam
EGEN,2,100,1961,1988,1
NSEL,ALL
NGEN,2,10000,ALL,,,Dis_hor
EGEN,2,10000,1,2184,1
N,20001,H_col/2,Dis_ver-H_beam/2,-W_beam/2
NGEN,4,1,20001,,,,,B_beam/3
N,20005,H_col/2,Dis_ver-H_beam/2,tw_beam/2
NGEN,4,1,20005,,,,,B_beam/3
NGEN,2,10,20001,20008,1,,tf_beam
NGEN,10,6,20014,20015,1,,D_beam/10
NGEN,2,60,20011,20018,1,,D_beam
NGEN,2,10,20071,20078,1,,tf_beam
NGEN,2,100,20001,20090,,(Dis_hor-H_col)/100
E,20001,20002,20012,20011,20101,20102,20112,20111
EGEN,7,1,4033
E,20014,20015,20021,20020,20114,20115,20121,20120
EGEN,10,6,4040
E,20071,20072,20082,20081,20171,20172,20182,20181
EGEN,7,1,4050
EGEN,100,100,4033,4056,1,,,,,,(Dis_hor-H_col)/100
CPINTF,all,0.002
FINISH
/SOLU
NSEL,S,NODE,,71,6071,100
*DO,i,80,90,1
NSEL,A,NODE,,i,6000+i,100
*ENDDO
CM,HTbound1,NODE
NSEL,S,NODE,,10020,16020,100
*DO,i,10001,10011,1
NSEL,A,NODE,,i,6000+i,100
*ENDDO
CM,HTbound2,NODE
NSEL,S,NODE,,20001,30090,1
*DO,i,20081,20090,1
NSEL,U,NODE,,i,10000+i,100
*ENDDO
CM,HTbound3,NODE
allsel,all
/SOLU
*DO,tm,60,180,60
ANTYPE,TRANS
TUNIF,20
AUTOTS,OFF
DELTIM,20
STEF,5.6696E-8
TOFFST,273
Time,tm
Temp=20+345*LOG10(8*tm/60+1)
SF,HTbound1,CONV,25,Temp
SF,HTbound2,CONV,25,Temp
SF,HTbound3,CONV,25,Temp
SF,HTbound1,RDSF,0.9,1
SF,HTbound2,RDSF,0.9,2
SF,HTbound3,RDSF,0.9,3
SPCTEMP,1,Temp
SPCTEMP,2,Temp
SPCTEMP,3,Temp
SOLVE
*ENDDO
FINISH
/POST1
PLNSOL,TEMP,,0,
FINISH
当我输入egen,60,100,1,28,1,,,,,,,(Dis_ver-H_beam/2)/60 时，ansys崩溃，出现下面提示：
请各位大侠指点，小弟感激不尽！
页:
[1]