Page 176 - Using ANSYS for Finite Element Analysis Dynamic, Probabilistic, Design and Heat Transfer Analysis
P. 176

apDl programming   •   163
                           •  Define fin length (L) and fin radius (R) as PARAMETERS to be
                              used as design variable.
                           •  Using APDL commands get the fin heat transfer rate (THEAT)
                              and fin tip temperature (Tempend) to be used in the objective
                              function and state variable.
                           •  Define objective function as ObjFunct=C-TOTALHEAT

                               /PMETH,OFF,0 ! Setting preference
                               KEYW,PR_SET,1
                               KEYW,PR_STRUC,0
                               KEYW,PR_THERM,1
                               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,0
                               !
                               ! *******************************PREPRO-
                           CESSING
                               !
                               /PREP7 ! Enter into preprocessor (PREP7)
                               !*
                               ET,1,PLANE55  !  Set  element  type  with
                           axisymmetric option
                               !*
                               KEYOPT,1,1,0
                               KEYOPT,1,3,1
                               KEYOPT,1,4,0
                               KEYOPT,1,8,0
                               KEYOPT,1,9,0
                               MPTEMP,,,,,,,, ! Enter material properties
                               MPTEMP,1,0
                               MPDATA,KXX,1,,398
                               L=1.32 ! Set fin length as parameter L
                               R=12.5e-3 ! Set fin radius as parameter R
                               BLC4,0,0,R,L ! Geometric modeling in terms
                           of R and L
                               FLST,5,2,4,ORDE,2  ! Divide  lines 2 and 4
                           into 600 divisions
   171   172   173   174   175   176   177   178   179   180   181