Mercurial > hg > octave-lyh

changeset 78:0fda6e1f90e0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1993-08-30 15:40:16 by jwe]
author jwe
date Mon, 30 Aug 1993 15:40:48 +0000
parents 1cc0af4496c6
children 04c30624aaf9
files scripts/control/abcddim.m scripts/control/is_observable.m scripts/general/is_square.m
diffstat 3 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- 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.")
--- 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)
--- 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)