function g = gray(m)
//GRAY   Linear gray-scale color map.
//  GRAY(M) returns an M-by-3 matrix containing a gray-scale colormap.
//   GRAY, by itself, is the same length as the current colormap.
//
//   For example, to reset the colormap of the current figure:
//
//             colormap(gray)
//
//  Copyright Aldo I Maalouf

//if nargin < 1, m = size(get(gcf,'colormap'),1); end
g = (0:m-1)'/max(m-1,1);
g = [g g g];

endfunction