changeset 9606:33ed042002f9 octave-forge

normc: use print_usage
author carandraug
date Thu, 08 Mar 2012 17:54:19 +0000
parents 4fa3d0a20d75
children 2ca6888e8218
files main/miscellaneous/inst/normc.m
diffstat 1 files changed, 14 insertions(+), 14 deletions(-) [+]
line wrap: on
line diff
--- a/main/miscellaneous/inst/normc.m	Thu Mar 08 17:52:40 2012 +0000
+++ b/main/miscellaneous/inst/normc.m	Thu Mar 08 17:54:19 2012 +0000
@@ -1,20 +1,20 @@
-## Copyright (C) 2011   Thomas Weber
+## Copyright (C) 2011 Thomas Weber <tweber@debian.org>
 ##
-## This program 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 3 of the License, or
-## (at your option) any later version.
+## This program 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 3 of the License, or (at your option) any later
+## version.
 ##
-## This program 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.
+## This program 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 this program; If not, see <http://www.gnu.org/licenses/>.
+## You should have received a copy of the GNU General Public License along with
+## this program; if not, see <http://www.gnu.org/licenses/>.
 
 ## -*- texinfo -*-
-## @deftypefn {Function File} {@var{x} = } normc (@var{M})
+## @deftypefn {Function File} {@var{x} =} normc (@var{M})
 ## Normalize the columns of a matrix to a length of 1 and return the matrix.
 ##
 ## @example
@@ -32,9 +32,9 @@
 
 function X = normc(M)
   if (1 != nargin)
-    usage("normc(M)");
+    print_usage;
   endif
-  
+
   X = normr(M.').';
 endfunction