Mercurial > hg > octave-nkf

comparison scripts/plot/cylinder.m @ 11589:b0084095098e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
missing semicolons in script files
author John W. Eaton <jwe@octave.org>
date Thu, 20 Jan 2011 18:26:09 -0500
parents c792872f8942
children 80fc70a53400
comparison
equal deleted inserted replaced
11588:d5bd2766c640 11589:b0084095098e
63 else 63 else
64 print_usage (); 64 print_usage ();
65 endif 65 endif
66 66
67 if (length (r) < 2) 67 if (length (r) < 2)
68 error ("cylinder: length(R) must be larger than 2") 68 error ("cylinder: length(R) must be larger than 2");
69 endif 69 endif
70 70
71 phi = linspace (0, 2*pi, n+1); 71 phi = linspace (0, 2*pi, n+1);
72 idx = 1:length(r); 72 idx = 1:length(r);
73 [phi, idx] = meshgrid(phi, idx); 73 [phi, idx] = meshgrid(phi, idx);