[Axiom-developer] [#103 solve(z=z, z) ] patch

[kratt6]

??changed:
- This should return [ ] as in (1)
This should return '[ ]' as in (1)

++added:

>From kratt6 Thu Feb 17 07:35:54 -0600 2005
From: kratt6
Date: Thu, 17 Feb 2005 07:35:54 -0600
Subject: patch
Message-ID: <address@hidden>

The mistake is in 'primitivePart\$POLYCAT', where a check for zero (as in 
'primitivePart!\$NEWPOLY', 'primitivePart\$SUP', 'primitivePart\$FAMR') is 
missing.

The functions should read::

  @@ -580,8 +585,10 @@
           unit(s := squareFree p) * */[f.factor for f in factors s]
         content(p,v) == content univariate(p,v)
         primitivePart p ==
  +        zero? p => p
           unitNormal((p exquo content p) ::%).canonical
         primitivePart(p,v) ==
  +        zero? p => p
           unitNormal((p exquo content(p,v)) ::%).canonical
       if R has OrderedSet then
         p:% < q:% ==

--
forwarded from http://page.axiom-developer.org/zope/mathaction/address@hidden