30 lines
1.8 KiB
Racket
30 lines
1.8 KiB
Racket
; Library streams
|
|
; Adapted for PLT Scheme by Jacob J. A. Koot
|
|
; from original version of Philip L. Bewig.
|
|
|
|
; Copyright (C) 2007 by Philip L. Bewig of Saint Louis, Missouri, USA. All rights
|
|
; reserved. Permission is hereby granted, free of charge, to any person obtaining a copy of
|
|
; this software and associated documentation files (the "Software"), to deal in the Software
|
|
; without restriction, including without limitation the rights to use, copy, modify, merge,
|
|
; publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to
|
|
; whom the Software is furnished to do so, subject to the following conditions: The above
|
|
; copyright notice and this permission notice shall be included in all copies or substantial
|
|
; portions of the Software. THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
|
|
; EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS
|
|
; FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
|
|
; HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF
|
|
; CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR
|
|
; THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
|
|
|
#lang scheme
|
|
|
|
(provide stream-null stream-cons stream? stream-null? stream-pair? stream-car
|
|
stream-cdr stream-lambda define-stream list->stream port->stream stream
|
|
stream->list stream-append stream-concat stream-constant stream-drop
|
|
stream-drop-while stream-filter stream-fold stream-for-each stream-from
|
|
stream-iterate stream-length stream-let stream-map stream-match _
|
|
stream-of stream-range stream-ref stream-reverse stream-scan stream-take
|
|
stream-take-while stream-unfold stream-unfolds stream-zip)
|
|
|
|
(require "primitive.rkt" "derived.rkt")
|