aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/rep1.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/rep1.spad.pamphlet')
-rw-r--r--src/algebra/rep1.spad.pamphlet2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/rep1.spad.pamphlet b/src/algebra/rep1.spad.pamphlet
index f26ae02c..dde33bc9 100644
--- a/src/algebra/rep1.spad.pamphlet
+++ b/src/algebra/rep1.spad.pamphlet
@@ -302,7 +302,7 @@ RepresentationPackage1(R): public == private where
-- permutations are assumed to permute {1,2,...,n}
a : M I := zero(n :: NNI, n :: NNI)
for i in 1..n repeat
- a(eval(p,i)$(PERM I),i) := 1
+ a(p.i,i) := 1
a