Bug in Algebra`Horner` Mathematica 5.2 (Win) Package
- To: mathgroup at smc.vnet.net
- Subject: [mg71870] Bug in Algebra`Horner` Mathematica 5.2 (Win) Package
- From: "Philipp" <Philipp.M.O at gmail.com>
- Date: Fri, 1 Dec 2006 06:22:28 -0500 (EST)
The following code does NOT switch off the Message[] for MessageName[Horner, "fail"] and Prints the MessageName prefixed with Algebra`, $Version Get["Algebra`Horner`"]; Off[Horner::"fail"] Horner[1 + x^a, x] Messages[Horner] gives 5.2 for Microsoft Windows (June 20, 2005) Algebra`Horner::"fail" : "The expression (1 + x^a) is not a valid polynomial in the variable x" Algebra`Horner::"fail" : "The expression (1 + x^a) is not a valid polynomial in the variable x" Horner[1 + x^a, x] {HoldPattern[Horner::fail] :> $Off[], HoldPattern[Horner::usage] :> "Horner[p] gives the ... (my abbreviation)"} This code works, $Version Get["LinearAlgebra`FourierTrig`"]; Off[Fourier::"fftl"]; FourierSin[2.0] Messages[Fourier] and gives 5.2 for Microsoft Windows (June 20, 2005) FourierSin[2.] {HoldPattern[Fourier::fftl] :> $Off["Argument `1` is not a ..."], HoldPattern[Fourier::fpopt] :> "The value of the option ...", HoldPattern[Fourier::fpopt2] :> "Warning: the discrete ...", HoldPattern[Fourier::fpoptn] :> "Both values of the option ... (my abbreviations)"} In version 4.2 the Horner code, $Version Get["Algebra`Horner`"]; Off[Horner::"fail"] Horner[1 + x^a, x] Messages[Horner] works fine and gives 4.2 for Microsoft Windows (June 5, 2002) Horner[1 + x^a, x] {HoldPattern[Horner::fail] :> $Off[The expression ... (my abbreviation)"], HoldPattern[Horner::usage] :> "Horner[p] gives the ... (my abbreviation)"} Cheers, Philipp.