[转帖]ANSYS热分析的辐射例子

AaronSpark · 发表于 2006-4-19 07:37

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？我要加入

x

ANSYS热分析的辐射例子 /BATCH ! ! /GRA,POWER /GST,ON /NOPR /PMETH,OFF KEYW,PR_SET,1 KEYW,PR_THERM,1 ! set preferences for thermal menus only /title, Chapter 8 - Radiation Matrix Utility Example - Non-Hidden base = .150 ! base thickness hgt = 1.0 ! overall height ttop = 0.05 ! thickness at the top of the fin tbot = .150 ! thickness at the base of the fin fspc = 0.4 ! fin spacing /PREP7 ! enter preprocessor MP,KXX,1,8.5 ! input thermal conductivity ET,1,PLANE55 ! element type 1 definition ET,2,SURF151 ! define surface effect elements KEYOPT,2,3,0 ! set keyoptions for type 2 KEYOPT,2,4,1 ! exclude midside nodes KEYOPT,2,5,1 ! include extra node KEYOPT,2,6,0 ! use of bulk temp KEYOPT,2,8,2 ! HF at average T KEYOPT,2,9,0 ! exclude radiation effects K,1,0,0,0, ! create keypoints K, ,0,base,0, K, ,0,hgt,0, K, ,tbot/2,0,0, K, ,tbot/2,base,0, K, ,ttop/2,hgt,0, K, ,fspc/2,0,0, K, ,fspc/2,base,0, a,1,4,5,2 ! create areas using keypoints a,2,5,6,3 a,4,7,8,5 local,11,0,fspc/2 ! create local CSYS 11 for reflection operations arsym,x,all ! reflect areas nummrg,kp ! merge keypoints agen,5,1,6,1,fspc ! generate additional areas local,11,0,5*fspc ! relocate CSYS11 arsym,x,28,30 ! last reflection operation nummrg,kp ! merge keypoints csys,0 ! switch active coordinate system to global cartesian eshape,2 ! specify quad shaped elements esize,ttop*.9 ! specify element size amesh,all ! mesh all areas eplot ! plot elements /num,0 ! plot labels with both colors and numbers *get,nn,node,,num,max ! using *get utility to get max node number n,nn+1,5.5*fspc/2,hgt+.2 ! create extra node for surface effect elements lsel,s,ext ! select lines for surface effect element generation lsel,u,loc,x,0 lsel,u,loc,y,0 lsel,u,,,104 nsll,s,1 ! select node attached to these lines nplot ! plot of nodes for checking NSEL,A, , , 813 ! also select extra node nplot TYPE, 2 ! switch element type for meshing to type 2 esurf,nn+1 ! create surface effect elements allsel ! select everything save ! save the database FINISH ! exit the preprocessor

AaronSpark · 发表于 2006-4-19 07:37

/SOLU ! enter Solution ANTYPE,0 ! specify new steady-state analysis nsel,s,loc,y,0 ! select nodes on base for flux loading sf,all,hflux,17.0 ! apply hflux load allsel,all ! select everything esel,s,type,,2 ! select type 2 elements eplot ! plot elements for checking SFE,ALL,1,CONV,,0.01 ! apply film coeff to all selected elements D,nn+1,TEMP,90 ! apply temperature to extra node allsel ! select everything /psf,hflux,,2 ! check loading by plotting, hflux eplot /PLOPTS,INFO,1 ! turn legend on /psf,conv,,2 ! turn on plotting of convection symbols eplot ! check by plotting SAVE ! save the database before solution execution /STAT,SOLU ! review status for the thermal analysis SOLVE ! execute the solution FINISH ! exit solution /POST1 ! enter the postprocessor PRRSOL,HEAT ! list reaction solution, heat ESEL,S,TYPE,,1 ! select all type 1 elements ALLSEL,BELOW,ELEM ! select everything below the selected elements NSLE ! select all nodes attached to elements PLNSOL,TEMP, ,0, ! plot nodal solution, temperature ALLSEL,ALL ! select everything FINISH ! exit the postprocessor /PREP7 ! this is the beginning of radiation input ET,3,LINK32 ! define element type 3, LINK32 TYPE, 3 ! set attributes for meshing to type 3 lsel,s,ext ! isolate radiation surfaces by selecting lines lsel,u,loc,y,0 lsel,u,loc,x,0 lsel,u,loc,x,5.5*fspc lplot ! plot lines to check nsll,s,1 ! select nodes attached to lines nplot ! plot nodes to check n,nn+2,6.5*fspc/2,hgt+.2 ! define space node esurf ! create elements /PSYMB,ESYS,1 ! turn on esys plotting ESEL,S,TYPE,,3 ! select all type 3 elements eplot ! plot to check orientation allsel ! select everything FINISH ! exit

AaronSpark · 发表于 2006-4-19 07:37

/aux12 ! enter radiation amtrix utility ! select entites for bay 1 lsel,s,ext ! select external lines lsel,r,loc,x,0.05,0.35 ! select bay 1 lines lsel,u,loc,y,0 nsll,s,1 ! select attached nodes esln,s,1 ! select attached elements nsel,a,,,nn+2 ! also select space node emis,1,0.9 ! set emissivity stef,1.19e-011 ! set Stefan-Botzman constant geom,1,0 ! set geom to 2D space,nn+2 ! specify space node number vtype,1,, ! specify non-hidden method mprint,0 ! do not pint matricies write,bay1 ! write file bay1 allsel,all ! select everything ! select entities for bay 2 lsel,s,ext ! select external lines lsel,r,loc,x,0.425,0.775 ! select bay 2 lines lsel,u,loc,y,0 nsll,s,1 ! select attached nodes esln,s,1 ! select attached elements nsel,a,,,nn+2 ! also select space node emis,1,0.9 ! set emissivity stef,1.19e-011 ! set Stefan-Botzman constant geom,1,0 ! set geom to 2D space,nn+2 ! specify space node number vtype,1,, ! specify non-hidden method mprint,0 ! do not pint matricies write,bay2 ! write file bay2 allsel,all ! select everything ! select entities for bay 3 lsel,s,ext ! select external lines lsel,r,loc,x,0.825,0.825+.35 ! select bay 3 lines lsel,u,loc,y,0 nsll,s,1 ! select attached nodes esln,s,1 ! select attached elements nsel,a,,,nn+2 ! also select space node emis,1,0.9 ! set emissivity stef,1.19e-011 ! set Stefan-Botzman constant geom,1,0 ! set geom to 2D space,nn+2 ! specify space node number vtype,1,, ! specify non-hidden method mprint,0 ! do not pint matricies write,bay3 ! write file bay3 allsel,all ! select everything ! select entities for bay 4 lsel,s,ext ! select external lines lsel,r,loc,x,1.225,1.225+.35 ! select bay 4 lines lsel,u,loc,y,0 nsll,s,1 ! select attached nodes esln,s,1 ! select attached elements nsel,a,,,nn+2 ! also select space node emis,1,0.9 ! set emissivity stef,1.19e-011 ! set Stefan-Botzman constant geom,1,0 ! set geom to 2D space,nn+2 ! specify space node number vtype,1,, ! specify non-hidden method mprint,0 ! do not pint matricies write,bay4 ! write file bay4 allsel,all ! select everything

AaronSpark · 发表于 2006-4-19 07:37

! select entities for bay 5 lsel,s,ext ! select external lines lsel,r,loc,x,1.625,1.625+.35 ! select bay 5 lines lsel,u,loc,y,0 nsll,s,1 ! select attached nodes esln,s,1 ! select attached elements nsel,a,,,nn+2 ! also select space node emis,1,0.9 ! set emissivity stef,1.19e-011 ! set Stefan-Botzman constant geom,1,0 ! set geom to 2D space,nn+2 ! specify space node number vtype,1,, ! specify non-hidden method mprint,0 ! do not pint matricies write,bay5 ! write file bay5 allsel,all ! select everything ! select entities for bay 6 lsel,s,ext ! select external lines lsel,r,loc,x,2.025,2.220 ! select bay 6 lines lsel,u,loc,y,0 nsll,s,1 ! select attached nodes esln,s,1 ! select attached elements nsel,a,,,nn+2 ! also select space node emis,1,0.9 ! set emissivity stef,1.19e-011 ! set Stefan-Botzman constant geom,1,0 ! set geom to 2D space,nn+2 ! specify space node number vtype,1,, ! specify non-hidden method mprint,0 ! do not pint matricies write,bay6 ! write file bay6 allsel,all ! select everything ! select entities for bay 7 lsel,s,loc,y,1.0 ! select lines at tips of fins nsll,s,1 ! select attached nodes esln,s,1 ! select attached elements nsel,a,,,nn+2 ! also select space node emis,1,0.9 ! set emissivity 
 stef,1.19e-011 ! set Stefan-Botzman constant geom,1,0 ! set geom to 2D space,nn+2 ! specify space node number vtype,1,, ! specify non-hidden method mprint,0 ! do not pint matricies write,bay7 ! write file bay7 allsel,all ! select everything finish /PREP7 ! enter the preprocessor et,4,matrix50 ! define element type matrix 50 keyopt,4,1,1 ! set keyopts for 50 keyopt,4,6,0 type,4 ! set active mesh attributes to type 4 se,bay1,,,0.0001 ! read in file bay1 se,bay2,,,0.0001 ! read in file bay2 se,bay3,,,0.0001 ! read in file bay3 se,bay4,,,0.0001 ! read in file bay4 se,bay5,,,0.0001 ! read in file bay5 se,bay6,,,0.0001 ! read in file bay6 se,bay7,,,0.0001 ! read in file bay7 esel,s,type,,3 ! select all type 3 elements ! elist ! for checking only edele,all ! delete all active elements finish ! exit prep7 /solu ! enter solution allsel,all ! select all entities nlgeom,0 ! set analysis options nropt,auto,,off lumpm,0 eqslv,front,,0, prec,0 pivcheck,1 sstif pstres toffst,460, ! set temperature offset d,nn+2,temp,90 ! set temperature of space node save ! save the data base /stat,solu solve finish /post1 esel,s,type,,1 ! select all type 1 elements allsel,below,elem ! select everything below nsle ! select nodes plnsol,temp,,0 ! plot nodal solution, temp allsel,all ! select everything prrsol,heat ! print reaction solution save finish ! /exit,nosa

AaronSpark · 发表于 2006-4-19 07:38

/BATCH /COM,ANSYS RELEASE 6.1 UP20020321 09:23:13 08/17/2004 /input,menust,tmp,'''',,,,,,,,,,,,,,,,1 /GRA,POWER /GST,ON /PLO,INFO,3 /GRO,CURL,ON /REPLOT,RESIZE ~SATIN,race,sat,,SOLIDS,0 /NOPR /GO /FACET,NORML /REPLOT /USER, 1 !* /NOPR /PMETH,OFF,0
 /GO !* /COM, /COM,Preferences for GUI filtering have been set to display: /COM, Thermal !* !* ET,1,SOLID70 !* ET,3,PLANE55 !* ETDEL,1 !* ETDEL,3 !* ET,1,SOLID70 !* ET,2,PLANE55 !* ETDEL,2 !* ET,3,PLANE55 !* ET,2,SURF152 !* !*
!* ETDEL,2 !* et,2,surf22,1,,,1,1 !*
!* !* R,2,1,5.67e-8, , , , RMORE, , , , , !* !* MPTEMP,,,,,,,, MPTEMP,1,0 MPDATA,KXX,1,,154 MPTEMP,,,,,,,, MPTEMP,1,0 MPDATA,C,1,,896 MPTEMP,,,,,,,, MPTEMP,1,0 MPDATA,DENS,1,,2700 MPTEMP,,,,,,,, MPTEMP,1,0 MPDATA,EMIS,1,,0.5 !* MPTEMP,,,,,,,, MPTEMP,1,0 MPDE,DENS,1 MPDATA,DENS,1,,2700 MPTEMP,,,,,,,, MPTEMP,1,0 MPDATA,EMIS,2,,0.5 !* CM,_Y,VOLU VSEL, , , , 1 CM,_Y1,VOLU CMSEL,S,_Y !* !* CM,_Y,VOLU VSEL, , , , 1 CM,_Y1,VOLU CMSEL,S,_Y !* CMSEL,S,_Y1 VATT, 1, 2, 1, 0 CMSEL,S,_Y CMDELE,_Y CMDELE,_Y1

账号		自动登录	找回密码
密码			我要加入

[CFD及热分析] [转帖]ANSYS热分析的辐射例子

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

回复：（AaronSpark）[转帖]ANSYS热分析的辐射例子

回复：（AaronSpark）[转帖]ANSYS热分析的辐射例子

回复：（AaronSpark）[转帖]ANSYS热分析的辐射例子

回复：（AaronSpark）[转帖]ANSYS热分析的辐射例子