diff options
author | dos-reis <gdr@axiomatics.org> | 2010-06-21 03:16:39 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2010-06-21 03:16:39 +0000 |
commit | afaaaac2b55741bfe43099f819fd4a9592b1c022 (patch) | |
tree | 7a5bbd28009759b1c787d3df4c4ba5960cd11280 /src/algebra/naalgc.spad.pamphlet | |
parent | 640d839b4de4d0daf0dde00ba08eab6d264160ad (diff) | |
download | open-axiom-afaaaac2b55741bfe43099f819fd4a9592b1c022.tar.gz |
Revert previous erroneous commit
Diffstat (limited to 'src/algebra/naalgc.spad.pamphlet')
-rw-r--r-- | src/algebra/naalgc.spad.pamphlet | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/algebra/naalgc.spad.pamphlet b/src/algebra/naalgc.spad.pamphlet index b68e779c..b0d5b2d3 100644 --- a/src/algebra/naalgc.spad.pamphlet +++ b/src/algebra/naalgc.spad.pamphlet @@ -1022,7 +1022,7 @@ FramedNonAssociativeAlgebra(R:CommutativeRing): Category == _ listOfNumbers : List String := [STRINGIMAGE(q)$Lisp for q in 1..n] symbolsForCoef : Vector Symbol := [concat("%", concat("x", i))::Symbol for i in listOfNumbers] - xx : M P R := new(1,n,0) + xx : M P R mo : P R x : M P R := new(1,n,0) for i in 1..n repeat @@ -1055,7 +1055,7 @@ FramedNonAssociativeAlgebra(R:CommutativeRing): Category == _ listOfNumbers : List String := [STRINGIMAGE(q)$Lisp for q in 1..n] symbolsForCoef : Vector Symbol := [concat("%", concat("x", i))::Symbol for i in listOfNumbers] - xx : M P R := new(1,n,0) + xx : M P R mo : P R x : M P R := new(1,n,0) for i in 1..n repeat |