[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Axiom-developer] [#103 solve(z=z, z) ] patch
From: |
kratt6 |
Subject: |
[Axiom-developer] [#103 solve(z=z, z) ] patch |
Date: |
Thu, 17 Feb 2005 07:46:12 -0600 |
??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