Chelsea 发表于 2010-10-22 14:37

9、准备工作结束,保存数据库。单击菜单Run FLOTRAN进行求解。求解的结果如下图所示:

Chelsea 发表于 2010-10-22 14:38

10、下面进行后处理,显示计算结果。
读入结果文件。如下图所示:

Chelsea 发表于 2010-10-22 14:38

显示流场速度:

Chelsea 发表于 2010-10-22 14:39

速度矢量图:

Chelsea 发表于 2010-10-22 14:39

显示流场压强:
(选项)

Chelsea 发表于 2010-10-22 14:40

显示压强结果

Chelsea 发表于 2010-10-22 14:41

显示粒子迹线。
首先定义粒子(需要把工作平面移动到相应平面上):

Chelsea 发表于 2010-10-22 14:41

显示通过粒子的迹线动画:

Chelsea 发表于 2010-10-22 14:42

进一步设置显示内容:

Chelsea 发表于 2010-10-22 14:43

单击OK按钮以后生成的动画如下图所示:

Chelsea 发表于 2010-10-22 14:46

本例中可以看出空气速度在机翼前沿逐渐下降,驻点处减为零,而静压在驻点达到最大值,绕机翼上下表面以后速度上升,静压减小的过程。达到了简单模拟的目的。

迹线动画下载:

Chelsea 发表于 2010-10-22 14:47

以下为作者给出的系统生成的命令流中的前处理部分 !导入几何模型
/input,start80,ans,'d:\Program Files\Ansys

Inc\v80\ANSYS\apdl\',,,,,,,,,,,,,,,,1
/FILNAME,test1,0
~PARAIN,airfoil_cf,x_t,'C:\DOCUMENTS AND SETTINGS\BERRY\MY
DOCUMENTS\ANSYS_TEST\',SOLIDS,0,0
/GO
!设置工作环境
/PMETH,OFF,0
KEYW,PR_SET,1   
KEYW,PR_STRUC,0
KEYW,PR_THERM,0
KEYW,PR_FLUID,0
KEYW,PR_ELMAG,0
KEYW,MAGNOD,0   
KEYW,MAGEDG,0   
KEYW,MAGHFE,0   
KEYW,MAGELC,0   
KEYW,PR_MULTI,0
KEYW,PR_CFD,1
!设置网格尺寸并划分网格   
/PREP7
ET,1,FLUID142   
ESIZE,0.03,0,   
FLST,2,7,5,ORDE,4   
FITEM,2,2   
FITEM,2,-5   
FITEM,2,7   
FITEM,2,-9   
AESIZE,P51X,0.01,   
MSHAPE,1,3D
MSHKEY,0
CM,_Y,VOLU   
VSEL, , , ,1
CM,_Y1,VOLU
CHKMSH,'VOLU'   
CMSEL,S,_Y   
VMESH,_Y1   
CMDELE,_Y   
CMDELE,_Y1   
CMDELE,_Y2
!施加载荷和边界条件   
FLST,5,7,5,ORDE,4   
FITEM,5,2   
FITEM,5,-5   
FITEM,5,7   
FITEM,5,-9   
CM,_Y,AREA   
ASEL,R, , ,P51X
CM,_Y1,AREA
CMSEL,S,_Y   
CMDELE,_Y   
DA,_Y1,VX,0,1   
DA,_Y1,VY,0,1   
DA,_Y1,VZ,0,1   
CMDELE,_Y1   
FLST,5,2,5,ORDE,2   
FITEM,5,3   
FITEM,5,5   
CM,_Y,AREA   
ASEL,R, , ,P51X
CM,_Y1,AREA
CMSEL,S,_Y   
CMDELE,_Y   
DA,_Y1,VX,0,1   
DA,_Y1,VY,0,1   
DA,_Y1,VZ,0,1   
CMDELE,_Y1   
FLST,5,1,5,ORDE,1   
FITEM,5,6   
CM,_Y,AREA   
ASEL,R, , ,P51X
CM,_Y1,AREA
CMSEL,S,_Y   
CMDELE,_Y   
DA,_Y1,VX,0,1   
DA,_Y1,VY,100,1
DA,_Y1,VZ,0,1   
CMDELE,_Y1   
FLST,5,1,5,ORDE,1   
FITEM,5,1   
CM,_Y,AREA   
ASEL,R, , ,P51X
CM,_Y1,AREA
CMSEL,S,_Y   
CMDELE,_Y   
DA,_Y1,PRES,0,1
CMDELE,_Y1
/GO   
FINISH
!设置流体属性   
/SOL
FLDATA12,PROP,DENS,4
FLDATA13,VARY,DENS,0
FLDATA12,PROP,VISC,4
FLDATA13,VARY,VISC,0
FLDATA12,PROP,COND,0
FLDATA13,VARY,COND,0
FLDATA12,PROP,SPHT,0
FLDATA13,VARY,SPHT,0
FLDATA7,PROT,DENS,AIR-SI
FLDATA8,NOMI,DENS,-1
FLDATA9,COF1,DENS,0
FLDATA10,COF2,DENS,0
FLDATA11,COF3,DENS,0
FLDATA7,PROT,VISC,AIR-SI
FLDATA8,NOMI,VISC,-1
FLDATA9,COF1,VISC,0
FLDATA10,COF2,VISC,0
FLDATA11,COF3,VISC,0
FLDATA12,PROP,IVIS   
FLDATA7,PROT,COND,CONSTANT   
FLDATA8,NOMI,COND,-1,   
FLDATA9,COF1,COND,0
FLDATA10,COF2,COND,0
FLDATA11,COF3,COND,0
FLDATA7,PROT,SPHT,CONSTANT   
FLDATA8,NOMI,SPHT,-1,   
FLDATA9,COF1,SPHT,0
FLDATA10,COF2,SPHT,0
FLDATA11,COF3,SPHT,0
!设置流体参考环境
FLDATA15,PRES,REFE,101350,   
FLDATA16,BULK,BETA,1e+015,   
FLDATA17,GAMM,COMP,1.4,
FLDATA14,TEMP,NOMI,293,
FLDATA14,TEMP,TTOT,293,
FLDATA14,TEMP,BULK,293,
TOFFSET,0,
!设置求解控制   
FLDATA2,ITER,EXEC,60,   
FLDATA2,ITER,OVER,0,
FLDATA2,ITER,APPE,0,
FLDATA3,TERM,VX,0.01,   
FLDATA3,TERM,VY,0.01,   
FLDATA3,TERM,VZ,0.01,   
FLDATA3,TERM,PRES,1e-008,   
FLDATA3,TERM,TEMP,1e-008,   
FLDATA3,TERM,ENKE,0.01,
FLDATA3,TERM,ENDS,0.01,
FLDATA5,OUTP,SUMF,10,
!进行求解   
SOLVE   

Tony0Hung 发表于 2011-1-21 11:01

{:{35}:}牛

fangdian 发表于 2011-6-20 11:19

谢谢分享,挺不错。

XY2312 发表于 2011-7-13 20:14

请问Chelsea可不可以介绍一点ANSYS关于列车或者汽车流场模拟仿真的相关书籍!
页: 1 [2] 3
查看完整版本: 寻找:Ansys计算3D流场的例子