MathGroup Archive 2009

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

Search the Archive

Re: mathematica newbie trouble

  • To: mathgroup at
  • Subject: [mg99281] Re: [mg99276] mathematica newbie trouble
  • From: Murray Eisenberg <murray at>
  • Date: Sat, 2 May 2009 05:55:24 -0400 (EDT)
  • Organization: Mathematics & Statistics, Univ. of Mass./Amherst
  • References: <>
  • Reply-to: murray at

Briefly, SetDelayed (:=) does not evaluate what's on the right-hand-side 
until the left hand side is evaluated.  The trouble with your code is 
that you really want s to be a function of a,b,c, that is, to get its 
value after a, b, c get their values.  And then you need to make the s 
on the right-hand side of your definition of k to depend explicitly on 
a,b,c.  So change the two definitions to the following (and no 
terminating semicolons are required):

   s[a_, b_, c_] := (a + b + c)/2
   k[a_, b_, c_] :=
       Sqrt[s[a, b, c](s[a, b, c] - a)(s[a, b, c] - b)(s[a, b, c] - c)]

Then your k should work as expected.

A bit better, avoid the long expression now inside the square-root by 
making some use of Mathematica's list-processing ability and functional 

   k[a_, b_, c_] := Sqrt[Times @@ (s[a, b, c] - {0, a, b, c})]

What happens on the right-hand side there is the following:   The 
quantity s[a,b,c] is evaluated just once. From it each of the numbers 0, 
a, b, c is subtracted ("in parallel").  Then Times is Apply'ed to the 
result, in other words, the differences are multiplied.

Guapo wrote:
> i wrote the following mathematica code:
> s := (a + b + c)/2;
> k[a_, b_, c_] := Sqrt[s (s - a) (s - b) (s - c)];
> k[3, 4, 5]
> k[5, 9, 12]
> when run it, i can't get the write answer. but i change setDelayed(:=)
> to set(=), everything works ok
> s = (a + b + c)/2;
> k[a_, b_, c_] = Sqrt[s (s - a) (s - b) (s - c)];
> k[3, 4, 5]
> k[5, 9, 12]
> i did a google search for the difference of set and setDelayed,
> however, i still can't understand it for the upper described problem,
> could anyone explain it? great thanks.

Murray Eisenberg                     murray at
Mathematics & Statistics Dept.
Lederle Graduate Research Tower      phone 413 549-1020 (H)
University of Massachusetts                413 545-2859 (W)
710 North Pleasant Street            fax   413 545-1801
Amherst, MA 01003-9305

  • Prev by Date: Re: FindFit and complex data
  • Next by Date: Re: mathematica newbie trouble
  • Previous by thread: Re: mathematica newbie trouble
  • Next by thread: Re: mathematica newbie trouble