diff scripts/sparse/spones.m @ 7125:f084ba47812b

[project @ 2007-11-08 02:29:23 by jwe]
author jwe
date Thu, 08 Nov 2007 02:29:24 +0000
parents a1dbe9d80eee
children aeeb646f6538
line wrap: on
line diff
--- a/scripts/sparse/spones.m
+++ b/scripts/sparse/spones.m
@@ -23,6 +23,11 @@
 ## @end deftypefn
 
 function s = spones (s)
+
+  if (nargin != 1)
+    print_usage ();
+  endif
+
   if (issparse (s))
     [i, j, v, m, n] = spfind (s);
   else