scheme - 在此代码中未定义print

时间:2017-10-05 03:35:50

标签: stream scheme racket sicp

我遇到的问题是我已经获得此代码进行测试并用于分析。除了我运行它,打印定义被抱怨。它一直在说" print:undefined"

任何人都可以为我提供适合此问题的打印定义吗?

(define (integral integrand initial-value dt)
  (define int
    (cons-stream initial-value
                 (add-streams (scale-stream integrand dt)
                              int)))
  int)

(define (RC R C dt)
  (define (vs is v0)
    (cons-stream v0
                 (add-streams (scale-stream is R)
                              (integral (scale-stream is (/ 1 C)) v0 dt))))
  vs)

(define RC1 (RC 5 1 0.5))
(define s (RC1 ones 10))
(do ((i 0 (+ i 1)))
  ((= i 30))
  (print (stream-ref s i)))

DrRacket中必须使用的语言是R5RS,我认为这是打印定义未定义的原因

1 个答案:

答案 0 :(得分:2)

{5}过程未在R5RS中定义,请将其替换为print,这是标准的。如果您需要插入换行符,请使用display