function coolplot(x,y,c)


% COOLPLOT(X,Y) plots an unconnected sample plot with markers that
% have a reasonable size for our subplots.  The default color and
% shape is blue circles.  
% COOLPLOT(X,Y,C) draws the same plot, but with the specified color
% and shape c, where c is a string with the color character first,
% followed by the shape character
%
% This function has very little error checking and it is up to the
% user to ensure that the arguments sent to it, especially the
% string that contains the format are correct and will work for the
% plot command.  This will accept the same string arguments as the
% plot command.
%
%   D. Tran 11-3-99
%
%   Modified from coolstem.m J. Steinheider 3-8-00
%

if (nargin==2)
   c = 'bo';
end

% Limited error checking ??


len = length(x);
if (len<=32)
   msize = 6;
elseif (len<=128)
   msize = 4;
else
   msize = 2;
end
plot(x,y,c,'MarkerEdgeColor',c(1),'MarkerSize',msize);









