Когда я пишу код в Dr Racket, я получаю сообщение об ошибке
unsaved-editor: 8: 2: define: ожидал только одно выражение для тела функции, но нашел 3 дополнительные части в:(определить (улучшить предположение x) (среднее предположение (/ x предположение)))
Но этот код может выполняться в Racket или repl.it .
Я хочу знать, почему в докторе Ракете происходит ошибка и действительно ли мой код неверен?
Мой код такой:
(define (average x y) (/ (+ x y) 2))
(define (square x) (* x x))
(define (sqrt1 x)
(define (good-enough? guess x)
(< (abs (- (square guess) x)) 0.001))
(define (improve guess x)
(average guess (/ x guess)))
(define (sqrt-iter guess x)
(if (good-enough? guess x)
guess
(sqrt-iter (improve guess x) x)))
(sqrt-iter 1.0 x))
(sqrt1 9)