This commit is contained in:
Jay McCarthy 2018-12-08 21:53:06 -05:00
parent a23fdb7796
commit 49f4d3ee84
1 changed files with 1 additions and 3 deletions

View File

@ -16,9 +16,7 @@
(define pl (define pl
(let () (let ()
(local-require plot racket/math racket/class racket/gui/base file/convertible) (local-require plot racket/math racket/class racket/gui/base file/convertible)
(define r (plot (function sin (- pi) pi #:label "y = sin(x)"))) (plot (function sin (- pi) pi #:label "y = sin(x)"))))
(displayln (vector (convertible? r) (is-a? r snip%)))
r))
"Not convertible" "Not convertible"
1 1