diff options
author | dos-reis <gdr@axiomatics.org> | 2009-08-16 14:17:40 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2009-08-16 14:17:40 +0000 |
commit | ab480e7c03c9f3ab95856eaff6e6493882ff0c36 (patch) | |
tree | bba846f3e063f72834df5121dfff6d68ad7f4f91 /src/algebra/modmon.spad.pamphlet | |
parent | d2afe2366c2c592327cd0eb6593a3536a6eff54d (diff) | |
download | open-axiom-ab480e7c03c9f3ab95856eaff6e6493882ff0c36.tar.gz |
* interp/i-map.boot (addMap): Fix typo from last commit.
* interp/compiler.boot (compElt): Fix thinko, one more time.
* interp/nruncomp.boot (optDeltaEntry): Don't overquote VM forms
for constants.
* algebra/algext.spad.pamphlet: Call niladic functions with empty
argument lists.
* algebra/ddfact.spad.pamphlet: Likewise.
* algebra/gpgcd.spad.pamphlet: Likewise.
* algebra/modmon.spad.pamphlet: Likewise.
* algebra/pf.spad.pamphlet: Likewise.
* algebra/polycat.spad.pamphlet: Likewise.
* algebra/twofact.spad.pamphlet: Likewise.
* algebra/list.spad.pamphlet: "nil" is now a ocnstant.
* algebra/string.spad.pamphlet: "space", "quote", "escape" are now
constants.
Diffstat (limited to 'src/algebra/modmon.spad.pamphlet')
-rw-r--r-- | src/algebra/modmon.spad.pamphlet | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/algebra/modmon.spad.pamphlet b/src/algebra/modmon.spad.pamphlet index 79ad7718..3b678cd8 100644 --- a/src/algebra/modmon.spad.pamphlet +++ b/src/algebra/modmon.spad.pamphlet @@ -92,7 +92,7 @@ ModMonic(R,Rep): C == T m modulus == m if R has Finite then - size == d * size$R + size == d * size()$R random == UnVectorise([random()$R for i in 0..d1]) 0 == 0$Rep 1 == 1$Rep @@ -132,7 +132,7 @@ ModMonic(R,Rep): C == T if frobenius? then computeFrobeniusPowers() == mat : PrimitiveArray(%):= new(d,1) - mat.1:= mult := monomial(1, size$R)$% + mat.1:= mult := monomial(1, size()$R)$% for i in 2..d1 repeat mat.i := mult * mat.(i-1) mat |