aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/naalgc.spad.pamphlet
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2010-06-21 03:14:17 +0000
committerdos-reis <gdr@axiomatics.org>2010-06-21 03:14:17 +0000
commit640d839b4de4d0daf0dde00ba08eab6d264160ad (patch)
tree3b5565cbc731bd2455a13c72a9a9c539f3088310 /src/algebra/naalgc.spad.pamphlet
parentbf21f6c3c98ea62bbd952ecd2382b63f4cd370bb (diff)
downloadopen-axiom-640d839b4de4d0daf0dde00ba08eab6d264160ad.tar.gz
* algebra/sgcf.spad.pamphlet (SymmetricGroupCombinatoricFunctions)
[listYoungTableaus]: Fix thinko. Don't use lattice in its own initialization before it is defined.
Diffstat (limited to 'src/algebra/naalgc.spad.pamphlet')
-rw-r--r--src/algebra/naalgc.spad.pamphlet4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/algebra/naalgc.spad.pamphlet b/src/algebra/naalgc.spad.pamphlet
index b0d5b2d3..b68e779c 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
+ xx : M P R := new(1,n,0)
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
+ xx : M P R := new(1,n,0)
mo : P R
x : M P R := new(1,n,0)
for i in 1..n repeat