aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/stream.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/stream.spad.pamphlet')
-rw-r--r--src/algebra/stream.spad.pamphlet2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/stream.spad.pamphlet b/src/algebra/stream.spad.pamphlet
index e6fc3f8b..90fd504c 100644
--- a/src/algebra/stream.spad.pamphlet
+++ b/src/algebra/stream.spad.pamphlet
@@ -443,7 +443,7 @@ LazyStreamAggregate(S:Type): Category == StreamAggregate(S) with
if odd? i then x := rst x
eq?(x,y2) => error "last: infinite stream"
- if % has finiteAggregate then -- # is only defined for finiteAggregates
+ if % has FiniteAggregate S then -- # is only defined for finite aggregates
last(x,n) ==
possiblyInfinite? x => error "last: infinite stream"
m := # x