- 积分
- 64
- 注册时间
- 2003-3-10
- 仿真币
-
- 最后登录
- 1970-1-1
|
本帖最后由 iomega 于 2010-7-16 10:21 编辑
看到版上一直有人问如何在同一个面上施加heat flux 和 conv,所以用APDL写了一个例子来demo,以下是带注解的源程序。
用solid70 创建一个3D的block,
在z=4m的表面: (1) 用surf152施加H= 50W/m^-K的conv . (2)施加hflux在solid70 element上.
在z=0m的表面: 施加h=10的conv, 在solid70 element上。
Temperature Contour plot 显示: H=50W/m^2-K 和 H=10W/m^2-K
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
FINISH
/CLEAR
/PREP7
SMRT,OFF
/TITLE, EXAMPLE OF USING SURFACE ELEMENT FOR CONVECTION
ET,1,SOLID70 ! 3-D THERMAL SOLID ELEMENT
ET,2,SURF152,,,,1,1 ! 3-D THERMAL SURFACE EFFECT ELEMENTS
KEYOPT,2,8,4 ! CONVECTION OPTION
KEYOPT,2,9,0 ! NO RADIATION OPTION
MP,KXX,1,10 ! ARBITRARY CONDUCTIVITY
BLOCK,0,2,0,2,0,4 ! DEFINE THE BLOCK GEOMETRY
TYPE,1
ESIZE,0.5
VMESH,all ! MESH WITH A SINGLE SOLID70 ELEMENT
TYPE,2
N,300,1,1,5 !DEFINE AN EXTERNAL NODE
ASEL,S,LOC,z,4,4
NSLA,S,1
ESLN,S,0
ESURF,300 !CREATE SURFACE ELEMENTS ON SURFACE OF Z=4
ALLSEL,ALL
FINISH
/SOLU
SOLCONTROL,0
ANTYPE,STATIC ! STEADY STATE ANALYSIS
ALLSEL,ALL
T_AMB = 20
H= 10 ! HEAT TRANSFER COEFFICIENT H = 50 W/m^2-K
D,300,TEMP,T_AMB ! SPECIFY SURROUNDING BULK TEMPERATURE FOR CONVECTION
ESEL,S,TYPE,,2
SFE,ALL,,CONV,,H
SFE,ALL,,CONV,2,T_AMB !APPLY HEAT CONVECTION ON BLOCK AT Z = 4 USING SURFACE ELEMENTS
NSEL,S,LOC,Z,4,4
ESLN,S
ESEL,R,TYPE,,1
SFE,ALL,6,HFLUX,,1000 !APPLY HEAT FLUX ON BLOCK AT Z = 4 ON SOLID70
NSEL,S,LOC,Z,0,0
ESLN,S
SFE,ALL,1,CONV,,10
SFE,ALL,1,CONV,2,T_AMB !APPLY HEAT CONVECTION ON BLOCK AT Z = 0
ALLSEL,ALL
SOLVE
/POST1
/EFACET,1
PLNSOL, TEMP,, 0
/VIEW,1,1,1,1
/ANG,1
/REP,FAST
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有账号?注册
×
|