Mercurial > hg > octave-lyh

changeset 14223:ba7a26030214

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use Octave spacing convention in %!test blocks of surface plot functions. * surface.m, surfc.m, surfl.m, surfnorm.m: Use Octave spacing convention in %!test blocks.
author Rik <octave@nomad.inbox5.com>
date Wed, 18 Jan 2012 21:17:14 -0800
parents 190952239c2c
children f6007bb54f06
files scripts/plot/surface.m scripts/plot/surfc.m scripts/plot/surfl.m scripts/plot/surfnorm.m
diffstat 4 files changed, 21 insertions(+), 18 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/plot/surface.m
+++ b/scripts/plot/surface.m
@@ -166,8 +166,8 @@
 
 endfunction
 
+
 ## Functional tests for surface() are in surf.m, surfc.m, surfl.m, and pcolor.m
-
 %!test
 %! hf = figure ("visible", "off");
 %! unwind_protect
--- a/scripts/plot/surfc.m
+++ b/scripts/plot/surfc.m
@@ -74,21 +74,22 @@
 
 endfunction
 
-%!demo
-%! clf
-%! [~,~,Z]=peaks;
-%! surfc(Z);
 
 %!demo
 %! clf
-%! [~,~,Z]=sombrero;
+%! [~,~,Z] = peaks;
+%! surfc (Z);
+
+%!demo
+%! clf
+%! [~,~,Z] = sombrero;
 %! [Fx,Fy] = gradient(Z);
-%! surfc(Z,Fx+Fy);
+%! surfc (Z, Fx+Fy);
 %! shading interp;
 
 %!demo
 %! clf
-%! [X,Y,Z]=sombrero;
+%! [X,Y,Z] = sombrero;
 %! [~,Fy] = gradient(Z);
-%! surfc(X,Y,Z,Fy);
+%! surfc (X,Y,Z,Fy);
 %! shading interp;
--- a/scripts/plot/surfl.m
+++ b/scripts/plot/surfl.m
@@ -171,18 +171,19 @@
 
 endfunction
 
+
 %!demo
 %! clf
-%! [X,Y,Z]=sombrero;
-%! colormap(copper);
-%! surfl(X,Y,Z);
+%! [X,Y,Z] = sombrero;
+%! colormap (copper);
+%! surfl (X,Y,Z);
 %! shading interp;
 
 %!demo
 %! clf
-%! [X,Y,Z]=sombrero;
-%! colormap(copper);
+%! [X,Y,Z] = sombrero;
+%! colormap (copper);
 %! [az, el] = view;
-%! surfl(X,Y,Z,[az+225,el],[0.2 0.6 0.4 25]);
+%! surfl (X,Y,Z, [az+225,el], [0.2 0.6 0.4 25]);
 %! shading interp;
 
--- a/scripts/plot/surfnorm.m
+++ b/scripts/plot/surfnorm.m
@@ -141,17 +141,18 @@
 
 endfunction
 
+
 %!demo
 %! clf
 %! colormap (jet (64))
-%! [x, y, z] = peaks(10);
+%! [x, y, z] = peaks (10);
 %! surfnorm (x, y, z);
 
 %!demo
 %! clf
-%! surfnorm (peaks(10));
+%! surfnorm (peaks (10));
 
 %!demo
 %! clf
-%! surfnorm (peaks(32));
+%! surfnorm (peaks (32));
 %! shading interp