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"