Mercurial > hg > octave-max

changeset 3194:bea685644090

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1998-10-28 17:51:09 by jwe]
author jwe
date Wed, 28 Oct 1998 17:51:09 +0000
parents 973954fc757e
children 7a5a5da64756
files scripts/general/length.m
diffstat 1 files changed, 0 insertions(+), 36 deletions(-) [+]
line wrap: on
line diff
deleted file mode 100644
--- a/scripts/general/length.m
+++ /dev/null
@@ -1,36 +0,0 @@
-## Copyright (C) 1996, 1997 John W. Eaton
-##
-## This file is part of Octave.
-##
-## Octave is free software; you can redistribute it and/or modify it
-## under the terms of the GNU General Public License as published by
-## the Free Software Foundation; either version 2, or (at your option)
-## any later version.
-##
-## Octave is distributed in the hope that it will be useful, but
-## WITHOUT ANY WARRANTY; without even the implied warranty of
-## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-## General Public License for more details.
-##
-## You should have received a copy of the GNU General Public License
-## along with Octave; see the file COPYING.  If not, write to the Free
-## Software Foundation, 59 Temple Place - Suite 330, Boston, MA
-## 02111-1307, USA.
-
-## usage: length (x)
-##
-## Return the number of rows or columns, whichever is greater.
-##
-## See also: size, rows, columns, is_scalar, is_vector, is_matrix
-
-## Author: jwe
-
-function len = length (x)
-
-  if (nargin != 1)
-    usage ("length (x)");
-  endif
-
-  len = max (size (x));
-
-endfunction