0508521 发表于 2006-6-20 10:37

有谁做过流固耦合传热吗

有谁做过流固耦合共轭传热吗
我想做一个固体在流体中转动的问题
想知道流体的对流传热系数
有谁做过类似问题吗
指点一二,不胜感谢

AaronSpark 发表于 2006-6-21 06:50


一个共轭传热的例子/BATCH
/units,si
!*
/NOPR
/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
/GO
!*
/COM,
/COM,Preferences for GUI filtering have been set to display:
/COM, FLOTRAN CFD
!*
/PREP7
!*
ET,1,FLUID141
!*
!*
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,KXX,2,,398
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,VISC,2,,200
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,KXX,3,,0.276
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,VISC,3,,200
RECTNG,0,0.2,0,0.2,
RECTNG,0.05,0.15,0,0.2,
RECTNG,0.07,0.13,0,0.2,
RECTNG,0,0.2,0.05,0.15,
RECTNG,0,0.2,0.07,0.13,
FLST,2,5,5,ORDE,2
FITEM,2,1
FITEM,2,-5
AOVLAP,P51X
FLST,5,60,4,ORDE,5
FITEM,5,9
FITEM,5,11
FITEM,5,18
FITEM,5,20
FITEM,5,-76
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y
!*
LESIZE,_Y1,0.01, , , , , , ,1
!*
MSHAPE,0,2D
MSHKEY,1
!*
FLST,5,16,5,ORDE,2
FITEM,5,6
FITEM,5,-21
CM,_Y,AREA
ASEL, , , ,P51X
CM,_Y1,AREA
CHKMSH,'AREA'
CMSEL,S,_Y
!*
AMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*
APLOT
mat,2
CM,_Y,AREA
ASEL, , , , 30
CM,_Y1,AREA
CHKMSH,'AREA'
CMSEL,S,_Y
!*
AMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*
mat,3
FLST,5,8,5,ORDE,2
FITEM,5,22
FITEM,5,-29
CM,_Y,AREA
ASEL, , , ,P51X
CM,_Y1,AREA
CHKMSH,'AREA'
CMSEL,S,_Y
!*
AMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*
EPLOT
FLST,2,80,1,ORDE,29
FITEM,2,1
FITEM,2,-7
FITEM,2,43
FITEM,2,49
FITEM,2,-54
FITEM,2,85
FITEM,2,-91
FITEM,2,127
FITEM,2,-133
FITEM,2,169
FITEM,2,-174
FITEM,2,180
FITEM,2,185
FITEM,2,-188
FITEM,2,205
FITEM,2,-215
FITEM,2,241
FITEM,2,-251
FITEM,2,277
FITEM,2,283
FITEM,2,-292
FITEM,2,313
FITEM,2,319
FITEM,2,325
FITEM,2,331
FITEM,2,337
FITEM,2,343
FITEM,2,349
FITEM,2,356
!*
/GO
D,P51X, ,20, , , ,TEMP, , , , ,
FLST,2,1,5,ORDE,1
FITEM,2,30
/GO
!*
BFA,P51X,HGEN,100000
FLST,5,80,1,ORDE,29
FITEM,5,1
FITEM,5,-7
FITEM,5,43
FITEM,5,49
FITEM,5,-54
FITEM,5,85
FITEM,5,-91
FITEM,5,127
FITEM,5,-133
FITEM,5,169
FITEM,5,-174
FITEM,5,180
FITEM,5,185
FITEM,5,-188
FITEM,5,205
FITEM,5,-215
FITEM,5,241
FITEM,5,-251
FITEM,5,277
FITEM,5,283
FITEM,5,-292
FITEM,5,313
FITEM,5,319
FITEM,5,325
FITEM,5,331
FITEM,5,337
FITEM,5,343
FITEM,5,349
FITEM,5,356
CM,_Y,NODE
NSEL,R, , ,P51X
CM,_Y1,NODE
CMSEL,S,_Y
CMDELE,_Y
!*
!*
!*
D,_Y1,VX,0
D,_Y1,VY,0
!*
CMDELE,_Y1
!*
FLDATA1,SOLU,TRAN,0
FLDATA1,SOLU,FLOW,1
FLDATA1,SOLU,TEMP,1
FLDATA1,SOLU,TURB,0
FLDATA1,SOLU,COMP,0
FLDATA1,SOLU,VOF,0
FLDATA1,SOLU,SFTS,0
FLDATA1,SOLU,IVSH,0
FLDATA1,SOLU,SWRL,0
FLDATA1,SOLU,SPEC,0
FLDATA1,SOLU,ALE,0
FLDATA1,SOLU,RDSF,1
!*
/COM,,Steady State Analysis,0
FLDATA2,ITER,EXEC,200,
FLDATA2,ITER,OVER,50,
FLDATA2,ITER,APPE,50,
FLDATA3,TERM,VX,0.01,
FLDATA3,TERM,VY,0.01,
FLDATA3,TERM,VZ,0.01,
FLDATA3,TERM,PRES,0.01,
FLDATA3,TERM,TEMP,0.01,
FLDATA3,TERM,ENKE,0.01,
FLDATA3,TERM,ENDS,0.01,
FLDATA5,OUTP,SUMF,10,
!*
FLDATA12,PROP,DENS,4
FLDATA13,VARY,DENS,1
FLDATA12,PROP,VISC,4
FLDATA13,VARY,VISC,0
FLDATA12,PROP,COND,4
FLDATA13,VARY,COND,0
FLDATA12,PROP,SPHT,4
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,AIR-SI
FLDATA8,NOMI,COND,-1
FLDATA9,COF1,COND,0
FLDATA10,COF2,COND,0
FLDATA11,COF3,COND,0
FLDATA7,PROT,SPHT,AIR-SI
FLDATA8,NOMI,SPHT,-1
FLDATA9,COF1,SPHT,0
FLDATA10,COF2,SPHT,0
FLDATA11,COF3,SPHT,0
!*
ACEL,0,9.81,0,
FLDATA26,STAB,MOME,1e-5,
FLDATA26,STAB,PRES,1e-5,
FLDATA26,STAB,TEMP,1e-5,
FLDATA26,STAB,TURB,1e+015,
FLDATA26,STAB,VISC,0,
!*
FLDATA34,MIR,MOME,1,
FLDATA34,MIR,TEMP,1,
FLDATA34,MIR,TURB,0,
!*
FLDATA31,CAPP,VELO,0
FLDATA31,CAPP,TEMP,1
FLDATA31,CAPP,PRES,0
!*
FLDATA31,CAPP,TMIN,20,
FLDATA31,CAPP,TMAX,1e+020,
!*
FINISH

lion_arthas 发表于 2011-5-2 16:43

楼上是个高手,灰常v5,鉴定完毕
页: [1]
查看完整版本: 有谁做过流固耦合传热吗