# HG changeset patch
# User Markus Mützel <markus.muetzel@gmx.de>
# Date 1470780450 25200
# Node ID 669fc8cf1fdd03df21539050ed9b0523bbfa1e6f
# Parent  f7b70f3a8fc17e71d2a435716f8f6cf9326e5db4
isosurface.m: Rework %!demos (bug #48626).

* isosurface.m: Add demo with one sphere for check of color range
computation in graphics toolkits.  Change to Matlab syntax in demo 3 and
rotate view.

diff -r f7b70f3a8fc1 -r 669fc8cf1fdd scripts/plot/draw/isosurface.m
--- a/scripts/plot/draw/isosurface.m	Sat Jul 30 10:38:09 2016 -0500
+++ b/scripts/plot/draw/isosurface.m	Tue Aug 09 15:07:30 2016 -0700
@@ -364,6 +364,14 @@
 %! clf;
 %! [x,y,z] = meshgrid (-2:0.5:2, -2:0.5:2, -2:0.5:2);
 %! v = x.^2 + y.^2 + z.^2;
+%! isosurface (x, y, z, v, 1);
+%! axis equal;
+%! title ("isosurface of a sphere");
+
+%!demo
+%! clf;
+%! [x,y,z] = meshgrid (-2:0.5:2, -2:0.5:2, -2:0.5:2);
+%! v = x.^2 + y.^2 + z.^2;
 %! isosurface (x, y, z, v, 3);
 %! isosurface (x, y, z, v, 5);
 %! axis equal;
@@ -377,21 +385,38 @@
 %! v        = [0, 0, 0; 0, 0, 0; 0, 0, 1; 0, 0, 1];
 %! v(:,:,2) = [0, 0, 0; 0, 0, 1; 0, 1, 2; 0, 1, 2];
 %! iso = 0.8;
+%! clf;
 %% three arguments, no output
-%! figure;
-%! subplot (2, 2, 1); isosurface (v, iso, yy); view(3)
+%! subplot (2, 2, 1);
+%! fvc = isosurface (v, iso, yy);
+%! patch (fvc);
+%! shading faceted
+%! view (110, 40);
 %% six arguments, no output (x, y, z are vectors)
-%! subplot (2, 2, 2); isosurface (x, y, z, v, iso, yy); view (3)
+%! subplot (2, 2, 2);
+%! fvc = isosurface (x, y, z, v, iso, yy);
+%! patch (fvc);
+%! shading faceted
+%! view (110, 40);
 %% six arguments, no output (x, y, z are matrices)
-%! subplot (2, 2, 3); isosurface (xx, yy, zz, v, iso, yy); view (3)
+%! subplot (2, 2, 3);
+%! fvc = isosurface (xx, yy, zz, v, iso, yy);
+%! patch (fvc);
+%! shading faceted
+%! view (110, 40);
 %% six arguments, no output (mixed x, y, z) and option "noshare"
-%! subplot (2, 2, 4); isosurface (x, yy, z, v, iso, yy, "noshare"); view (3)
-%! annotation ("textbox", [0.01 0.93 1 0.1], ...
+%! subplot (2, 2, 4);
+%! fvc = isosurface (x, yy, z, v, iso, yy, "noshare");
+%! patch (fvc);
+%! shading faceted
+%! view (110, 40);
+%! annotation ("textbox", [0.1 0.9 0.9 0.1], ...
 %!    "String", ["Apart from the first plot having a different scale, " ...
-%!               "all four plots must look the same.\n" ...
+%!               "all four plots must look the same." 10 ...
 %!               "The last plot might have different colors but must have " ...
 %!               "the same shape."], ...
-%!    "HorizontalAlignment", "left");
+%!    "HorizontalAlignment", "left", ...
+%!    "FontSize", 12);
 
 %!shared x, y, z, xx, yy, zz, val, iso
 %! x = 0:2;