aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/mring.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/mring.spad.pamphlet')
-rw-r--r--src/algebra/mring.spad.pamphlet2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/mring.spad.pamphlet b/src/algebra/mring.spad.pamphlet
index 8eafac0a..85451910 100644
--- a/src/algebra/mring.spad.pamphlet
+++ b/src/algebra/mring.spad.pamphlet
@@ -132,7 +132,7 @@ MonoidRing(R: Ring, M: Monoid): MRcategory == MRdefinition where
res := res + co * p ** ex
res pretend PositiveInteger
- random() == index( (1+(random()$Integer rem size()$%) )_
+ random() == index( (1 + random(size()$%)$Integer )_
pretend PositiveInteger)$%
0 == empty()