% default border is white all around and then black around that
%
% preserves size
%
% Example: Y = border(X);
%        : Y = border(X,0,255);  % redefines min and max

function Y=steve(X);

if nargin==2
  mymax=max2nan(X);
  disp(sprintf('border.m: mymax defaulting to maximum value of %g in input image',mymax));
end%if
if nargin==1
  mymin=min2nan(X);
  mymax=max2nan(X);
  disp(sprintf('border.m: mymin, mymax defaulting to image range: %g: %g',mymin,mymax));
end%if

Y=(bordersamesize(bordersamesize(X,2,2,2,2,mymax),1,1,1,1,mymin));