racket/collects/plot/demos/demo-7.ss
2008-02-24 21:27:36 +00:00

8 lines
226 B
Scheme

(require plot)
(define (trig x y) (* (sin x) (sin y)))
(plot (vector-field (gradient trig) '((samples 25)))
(x-min -1.5) (x-max 1.5) (y-min -1.5) (y-max 1.5)
(title "gradient field of F(x,y) = sin(x) * sin(y)"))