diff scripts/general/is_square.m @ 2312:204cc7db6f4a

[project @ 1996-07-11 21:20:36 by jwe]
author jwe
date Thu, 11 Jul 1996 21:20:36 +0000
parents 2b5788792cad
children 5ca126254d15
line wrap: on
line diff
--- a/scripts/general/is_square.m
+++ b/scripts/general/is_square.m
@@ -24,9 +24,11 @@
 ##
 ## See also: size, rows, columns, length, is_matrix, is_scalar, is_vector
 
-function retval = is_square (x)
+## Author: A. S. Hodel <scotte@eng.auburn.edu>
+## Created: August 1993
+## Adapted-By: jwe
 
-  ## Written by A. S. Hodel (scotte@eng.auburn.edu) August 1993.
+function retval = is_square (x)
 
   if (nargin == 1)
     [nr, nc] = size (x);