# HG changeset patch
# User jwe
# Date 746725248 0
# Node ID 0fda6e1f90e04c610fa111312f351e0bea62c8a5
# Parent  1cc0af4496c66468130876049e697f6fe2d10a11
[project @ 1993-08-30 15:40:16 by jwe]

diff --git a/scripts/control/abcddim.m b/scripts/control/abcddim.m
--- a/scripts/control/abcddim.m
+++ b/scripts/control/abcddim.m
@@ -11,7 +11,7 @@
 #
 # Returns n = m = p = -1 if the system is not compatible.
 
-# Written by A. S. Hodel (scotte@eng.auburn.edu) August 1993
+# Written by A. S. Hodel (scotte@eng.auburn.edu) August 1993.
 
   if (nargin != 4)
     error ("abcddim: illegal number of arguments.  need four.")
diff --git a/scripts/control/is_observable.m b/scripts/control/is_observable.m
--- a/scripts/control/is_observable.m
+++ b/scripts/control/is_observable.m
@@ -6,6 +6,8 @@
 #
 # See also: size, rows, columns, length, is_matrix, is_scalar, is_vector.
 
+# Written by A. S. Hodel (scotte@eng.auburn.edu) August 1993.
+
   if (nargin == 2)
     retval = is_controllable (a', c');
   elseif (nargin == 3)
diff --git a/scripts/general/is_square.m b/scripts/general/is_square.m
--- a/scripts/general/is_square.m
+++ b/scripts/general/is_square.m
@@ -7,6 +7,8 @@
 #
 # See also: size, rows, columns, length, is_matrix, is_scalar, is_vector
 
+# Written by A. S. Hodel (scotte@eng.auburn.edu) August 1993.
+
   if (nargin == 1)
     [nr, nc] = size (x);
     if (nr == nc)