Mercurial > hg > octave-lyh

diff scripts/plot/quiver3.m @ 7245:d65670971cbc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-12-04 03:03:54 by jwe]
author jwe
date Tue, 04 Dec 2007 03:03:55 +0000
parents dd88d61d443f
children 9a6f4713f765
line wrap: on
line diff
--- a/scripts/plot/quiver3.m
+++ b/scripts/plot/quiver3.m
@@ -90,3 +90,10 @@
 %! hold on; 
 %! mesh(x,y,z); 
 %! hold off;
+
+%!demo
+%! [x, y, z] = peaks (25);
+%! surf (x, y, z);
+%! hold on;
+%! [u, v, w] = surfnorm (x, y, z / 10);
+%! quiver3 (x, y, z, u, v, w);