Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tree: 2a9dba2f9e
Fetching contributors…

Cannot retrieve contributors at this time

15 lines (10 sloc) 0.251 kb
;; Example 3.58
#lang racket
(require racket/stream)
(define (expand num den radix)
(stream-cons
(quotient (* num radix) den)
(expand (remainder (* num radix) den) den radix)))
(define s1 (expand 1 7 10))
;; 1 4 2 8 5 7
;; 0.142857142...
Jump to Line
Something went wrong with that request. Please try again.