diff options
author | dos-reis <gdr@axiomatics.org> | 2009-05-29 14:18:26 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2009-05-29 14:18:26 +0000 |
commit | a17c2d47d4df5af5ef5e624ac6c5636b2741dd4a (patch) | |
tree | 225c59abef532441c688540ba0771937558b33ee /src/algebra/fmod.spad.pamphlet | |
parent | bcf4deb1f4de85c07a6c91d2fb59a77545e317b0 (diff) | |
download | open-axiom-a17c2d47d4df5af5ef5e624ac6c5636b2741dd4a.tar.gz |
Fix SF/2798220
* algebra/fmod.spad.pamphlet (IntegerMod): Define before?
* algebra/ffp.spad.pamphlet (FiniteFieldExtensionByPolynomial):
Likewise.
* algebra/pf.spad.pamphlet (InnerPrimeField): Likewise.
* testsuite/interpreter/sf-2798220.input: New.
Diffstat (limited to 'src/algebra/fmod.spad.pamphlet')
-rw-r--r-- | src/algebra/fmod.spad.pamphlet | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/algebra/fmod.spad.pamphlet b/src/algebra/fmod.spad.pamphlet index 5140356b..47182caf 100644 --- a/src/algebra/fmod.spad.pamphlet +++ b/src/algebra/fmod.spad.pamphlet @@ -14,7 +14,7 @@ )abbrev domain ZMOD IntegerMod ++ Author: ++ Date Created: -++ Date Last Updated: +++ Date Last Updated: May 29, 2009 ++ Basic Functions: ++ Related Constructors: ++ Also See: @@ -66,6 +66,8 @@ IntegerMod(p:PositiveInteger): (c1, c2, g) := extendedEuclidean(x, q)$Rep not one? g => "failed" positiveRemainder(c1, q) + + before?(x,y) == before?(x,y)$Rep else Rep:= Integer @@ -94,6 +96,8 @@ IntegerMod(p:PositiveInteger): (c1, c2, g) := extendedEuclidean(x, p)$Rep not one? g => "failed" positiveRemainder(c1, p) + + before?(x,y) == before?(x,y)$Rep @ \section{License} |