diff scripts/general/is_square.m @ 2311:2b5788792cad

[project @ 1996-07-11 20:18:38 by jwe]
author jwe
date Thu, 11 Jul 1996 20:18:38 +0000
parents 5cffc4b8de57
children 204cc7db6f4a
line wrap: on
line diff
--- a/scripts/general/is_square.m
+++ b/scripts/general/is_square.m
@@ -17,14 +17,14 @@
 ### Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 ### 02111-1307, USA.
 
-function retval = is_square (x)
+## usage: is_square (x)
+##
+## If x is square, then return value is the dimension of x.
+## otherwise, returns a value of 0
+##
+## See also: size, rows, columns, length, is_matrix, is_scalar, is_vector
 
-  ## usage: is_square (x)
-  ##
-  ## If x is square, then return value is the dimension of x.
-  ## otherwise, returns a value of 0
-  ##
-  ## See also: size, rows, columns, length, is_matrix, is_scalar, is_vector
+function retval = is_square (x)
 
   ## Written by A. S. Hodel (scotte@eng.auburn.edu) August 1993.