diff scripts/image/image.m @ 904:3470f1e25a79

[project @ 1994-11-09 21:22:15 by jwe]
author jwe
date Wed, 09 Nov 1994 21:22:15 +0000
parents 0faebdd7df57
children 56520a75b5b3
line wrap: on
line diff
--- a/scripts/image/image.m	Wed Nov 09 20:02:47 1994 +0000
+++ b/scripts/image/image.m	Wed Nov 09 21:22:15 1994 +0000
@@ -1,24 +1,19 @@
 function image(x, zoom)
-#Display an octave image matrix.
-#
-#image(x) displays a matrix as a color image. The elements of x are indices
-#into the current colormap and should have values between 1 and the length
-#of the colormap.
-#
-#image(x,zoom) changes the zoom factor.  The default value is 4.
-#
-#SEE ALSO: imshow, imagesc, colormap.
 
-#Author:
-# Tony Richardson
-# amr@mpl.ucsd.edu
-# July 1994
+# Display an octave image matrix.
+#
+# image(x) displays a matrix as a color image. The elements of x are indices
+# into the current colormap and should have values between 1 and the length
+# of the colormap.
 #
-#Modified:
-# Tony Richardson
-# amr@mpl.ucsd.edu
-# July 1994
-# (Modifications based on suggestions from John Eaton.)
+# image(x,zoom) changes the zoom factor.  The default value is 4.
+#
+# SEE ALSO: imshow, imagesc, colormap.
+
+# Author:
+#  Tony Richardson
+#  amr@mpl.ucsd.edu
+#  July 1994
 
   if (nargin == 0)
     # Load Bobbie Jo Richardson (Born 3/16/94)
@@ -27,7 +22,7 @@
   elseif(nargin == 1)
     zoom = 4;
   elseif(nargin > 2)
-    error("usage: image (matrix, [zoom])");
+    usage ("image (matrix, [zoom])");
   endif
 
   # Generate random file name