aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/algcat.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/algcat.spad.pamphlet')
-rw-r--r--src/algebra/algcat.spad.pamphlet2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/algcat.spad.pamphlet b/src/algebra/algcat.spad.pamphlet
index 94fde902..a9ff5e97 100644
--- a/src/algebra/algcat.spad.pamphlet
+++ b/src/algebra/algcat.spad.pamphlet
@@ -83,7 +83,7 @@ FiniteRankAlgebra(R:CommutativeRing, UP:UnivariatePolynomialCategory R):
represents(v, b) ==
m := minIndex v - 1
- _+/[v(i+m) * b(i+m) for i in 1..rank()]
+ +/[v(i+m) * b(i+m) for i in 1..rank()]
traceMatrix v ==
matrix [[trace(v.i*v.j) for j in minIndex v..maxIndex v]$List(R)