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

RE: Coefficient problem

• To: mathgroup at smc.vnet.net
• Subject: [mg36459] RE: [mg36421] Coefficient problem
• From: "David Park" <djmp at earthlink.net>
• Date: Sat, 7 Sep 2002 02:54:50 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

Check out the Help for Coefficient.

"Coefficient[expr, form, 0] picks out terms that are not proportional to
form."

Delta[eq_, x_] :=
  Coefficient[eq, x]^2 - 4 Coefficient[eq, x^2] Coefficient[eq, x, 0]

Delta[a x^2 + b x + c, x]

b^2 - 4*a*c

David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/

From: CeZaR [mailto:pascal at go.ro]
To: mathgroup at smc.vnet.net


Hi,

Now I'm trying to calculate this formula:

Delta[eq_, x_]:=Coefficient[eq, x]^2 - 4 Coefficient[eq, x^2]
Coefficient[eq, x^0]

eq has this form a x^2 + b x + c

But there is a problem with the x^0 coefficient!
How can I overcome that?

Thanks!

CeZaR