fig.m

it will work it is recogntion code only

function fig(im,range)% 
if nargin<1
    fig1
elseif nargin<2 & prod(size(im))==1
    fig1(im)
elseif  nargin==1
    figim(im)
else
    figim(im,range)
end

function fig1(n)
if nargin>0, figure(n)
else figure
end
pixval