Mercurial > octave

diff scripts/plot/draw/isonormals.m @ 22302:1c4cd12987f5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use Octave syntax in graphics demos. * inputdlg.m, listdlg.m, waitbar.m, autumn.m, bone.m, cool.m, copper.m, cubehelix.m, flag.m, gray.m, hot.m, hsv.m, jet.m, lines.m, ocean.m, pink.m, prism.m, rainbow.m, rgbplot.m, spring.m, summer.m, viridis.m, white.m, winter.m, annotation.m, axis.m, clabel.m, daspect.m, datetick.m, grid.m, legend.m, lighting.m, material.m, pbaspect.m, shading.m, text.m, xlim.m, ylim.m, zlim.m, area.m, bar.m, barh.m, camlight.m, colorbar.m, comet.m, comet3.m, contour.m, contour3.m, contourf.m, cylinder.m, ellipsoid.m, errorbar.m, ezcontour.m, ezcontourf.m, ezmesh.m, ezmeshc.m, ezplot.m, ezplot3.m, ezsurf.m, ezsurfc.m, feather.m, fill.m, fplot.m, isocaps.m, isonormals.m, isosurface.m, light.m, line.m, loglog.m, loglogerr.m, mesh.m, meshc.m, meshz.m, pareto.m, patch.m, pcolor.m, pie.m, pie3.m, plot.m, plot3.m, plotmatrix.m, plotyy.m, polar.m, quiver.m, quiver3.m, rectangle.m, ribbon.m, rose.m, scatter.m, scatter3.m, semilogx.m, semilogxerr.m, semilogy.m, semilogyerr.m, shrinkfaces.m, slice.m, smooth3.m, sombrero.m, stairs.m, stem.m, stem3.m, stemleaf.m, surf.m, surfc.m, surfl.m, surfnorm.m, tetramesh.m, trimesh.m, triplot.m, trisurf.m, waterfall.m, copyobj.m, hold.m, linkaxes.m, linkprop.m, printd.m, refreshdata.m, subplot.m, zoom.m, pcr.m, dump_demos.m: Use Octave syntax in graphics demos.
author Rik <rik@octave.org>
date Mon, 15 Aug 2016 15:15:30 -0700
parents 283d8dfcad37
children 533c3c4059a3
line wrap: on
line diff
--- a/scripts/plot/draw/isonormals.m	Mon Aug 15 10:56:47 2016 -0700
+++ b/scripts/plot/draw/isonormals.m	Mon Aug 15 15:15:30 2016 -0700
@@ -124,9 +124,9 @@
 
 %!demo
 %! function isofinish (hp)
-%!   axis equal
-%!   set (hp, "VertexNormals", -get (hp, "VertexNormals")); # Revert normals
-%!   shading interp
+%!   axis equal;
+%!   set (hp, "VertexNormals", -get (hp, "VertexNormals"));  # Revert normals
+%!   shading interp;
 %!   set (hp, "FaceLighting", "gouraud");
 %!   set (hp, "BackFaceLighting", "unlit");
 %!   light ();
@@ -139,30 +139,34 @@
 %! val = (x-.5).^2 + (y-.5).^2 + (z-.5).^2;
 %! clf;
 %!
-%! subplot (2,2,1); view (-38, 20);
-%! [fac, vert, cdat] = isosurface (x, y, z, val, iso, y);
-%! hp = patch ("Faces", fac, "Vertices", vert, "FaceVertexCData", cdat);
-%! title ("without isonormals")
-%! isofinish (hp);  # Call user function isofinish
+%! subplot (2,2,1);
+%!  view (-38, 20);
+%!  [fac, vert, cdat] = isosurface (x, y, z, val, iso, y);
+%!  hp = patch ("Faces", fac, "Vertices", vert, "FaceVertexCData", cdat);
+%!  title ("without isonormals");
+%!  isofinish (hp);
 %!
-%! subplot (2,2,2); view (-38, 20);
-%! hp = patch ("Faces", fac, "Vertices", vert, "FaceVertexCData", cdat);
-%! title ("patch modified by isonormals")
-%! isonormals (x, y, z, val, hp); # Directly modify patch
-%! isofinish (hp);
+%! subplot (2,2,2);
+%!  view (-38, 20);
+%!  hp = patch ("Faces", fac, "Vertices", vert, "FaceVertexCData", cdat);
+%!  title ("patch modified by isonormals");
+%!  isonormals (x, y, z, val, hp);  # Directly modify patch
+%!  isofinish (hp);
 %!
-%! subplot (2,2,3); view (-38, 20);
-%! hp = patch ("Faces", fac, "Vertices", vert, "FaceVertexCData", cdat);
-%! vn = isonormals (x, y, z, val, vert); # Compute normals of isosurface
-%! set (hp, "VertexNormals", vn);    # Manually set vertex normals
-%! title ('''VertexNormals'' from isonormals manually set')
-%! isofinish (hp);
+%! subplot (2,2,3);
+%!  view (-38, 20);
+%!  hp = patch ("Faces", fac, "Vertices", vert, "FaceVertexCData", cdat);
+%!  vn = isonormals (x, y, z, val, vert);  # Compute normals of isosurface
+%!  set (hp, "VertexNormals", vn);         # Manually set vertex normals
+%!  title ('"VertexNormals" from isonormals manually set');
+%!  isofinish (hp);
 %!
-%! subplot (2,2,4); view (-38, 20);
-%! hp = patch ("Faces", fac, "Vertices", vert, "FaceVertexCData", cdat);
-%! isonormals (x, y, z, val, hp, "negate"); # Use reverse directly
-%! title ('patch modified by isonormals (..., ''negate'')')
-%! isofinish (hp);
+%! subplot (2,2,4);
+%!  view (-38, 20);
+%!  hp = patch ("Faces", fac, "Vertices", vert, "FaceVertexCData", cdat);
+%!  isonormals (x, y, z, val, hp, "negate");  # Use reverse directly
+%!  title ('patch modified by isonormals (..., "negate")');
+%!  isofinish (hp);
 
 %!shared x,y,z,val,vert
 %! [x, y, z] = meshgrid (0:.5:2, 0:.5:2, 0:.5:2);