Roots of a function: Difference between revisions
→{{header|Scheme}}
Line 3,293:
(define (find-root f interval)
(define (display-exactness root)
(display (if (and (exact? root
(exact? (f root))
(zero? (f root)))
" (exact) "
" (inexact) ")))
| |||