racket/collects/plot/demos/demo-6.ss
2005-05-27 18:56:37 +00:00

7 lines
217 B
Scheme

(require (lib "plot.ss" "plot"))
(define (trig x y) (* (sin x) (sin y)))
(plot (contour trig)
(x-min -1.5) (x-max 1.5) (y-min -1.5) (y-max 1.5)
(title "contours of F(x,y) = sin(x) * sin(y)"))