Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2009

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Putting an If in my function

  • To: mathgroup at smc.vnet.net
  • Subject: [mg101055] Re: [mg101039] Putting an If in my function
  • From: Bob Hanlon <hanlonr at cox.net>
  • Date: Tue, 23 Jun 2009 07:02:58 -0400 (EDT)
  • Reply-to: hanlonr at cox.net

f[a_, g_, f_, x_, d_, 
   w_] = #5 (1 + ((E^#2 - 1) - (E^#6 - 
              1))/#3)^(#3*#4) + (#1*((1 + (((E^#2 - 1) - (E^#6 - 
                   1))/#3))^(#3*#4) - 
          1))/(((E^#2 - 1) - (E^#6 - 1))/#3) &[a, g, f, x, d, w];

f[a_, g_, f_, x_, d_, g_] = Limit[f[a, g, f, x, d, w], w -> g]

a f x+d

?? f


Bob Hanlon

---- Lobotomy <labbman at gmail.com> wrote: 

=============
Hi, this is my function

#5 (1 + ((E^#2 - 1) - (E^#6 -
            1))/#3)^(#3*#4) + (#1*((1 + (((E^#2 - 1) - (E^#6 -
                 1))/#3))^(#3*#4) -
        1))/(((E^#2 - 1) - (E^#6 - 1))/#3) &[a, g, f, x, d, w]


in the case when w==g the denominator equals zero.

in this case i would like to rewrite the formula above to the much
simpler
d+a*n. How is this done? I've tried

If[w == g, % = d + a*n], but this is not working. Another thing is
where to put the "If"



  • Prev by Date: Re: Putting an If in my function
  • Next by Date: Re: Two questions about modification of a matrix.
  • Previous by thread: Re: Putting an If in my function
  • Next by thread: Re: Putting an If in my function