Mercurial > hg > octave-nkf

diff scripts/miscellaneous/list_primes.m @ 2311:2b5788792cad

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1996-07-11 20:18:38 by jwe]
author jwe
date Thu, 11 Jul 1996 20:18:38 +0000
parents 5cffc4b8de57
children 5ca126254d15
line wrap: on
line diff
--- a/scripts/miscellaneous/list_primes.m
+++ b/scripts/miscellaneous/list_primes.m
@@ -17,14 +17,14 @@
 ### Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 ### 02111-1307, USA.
 
-function retval = list_primes (n)
+## usage: list_primes (n)
+##
+## List the first n primes.  If n is unspecified, the first 30 primes
+## are listed.
+##
+## The algorithm used is from page 218 of the TeXbook.
 
-  ## usage: list_primes (n)
-  ##
-  ## List the first n primes.  If n is unspecified, the first 30 primes
-  ## are listed.
-  ##
-  ## The algorithm used is from page 218 of the TeXbook.
+function retval = list_primes (n)
 
   if (nargin > 0)
     if (! is_scalar (n))