aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/lodof.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/lodof.spad.pamphlet')
-rw-r--r--src/algebra/lodof.spad.pamphlet2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/lodof.spad.pamphlet b/src/algebra/lodof.spad.pamphlet
index dd3d6209..aabb5d7d 100644
--- a/src/algebra/lodof.spad.pamphlet
+++ b/src/algebra/lodof.spad.pamphlet
@@ -58,7 +58,7 @@ SetOfMIntegersInOneToN(m, n): Exports == Implementation where
s1 = s2 == s1.bits =$Bits s2.bits
coerce(s:%):OutputForm == brace [i::OutputForm for i in elements s]
- random() == index((1 + (random()$Integer rem size()))::PI)
+ random() == index((1 + random(size())$Integer)::PI)
reallyEnumerate() == [[b, i] for b in enum(m, n) for i in 1..]
member?(p, s) == s.bits.p