DisplayPoints(Model, Scene, dim, sampling, axis_limits)

function [axis_limits] = DisplayPoints(Model, Scene, dim, sampling, axis_limits)
%%=====================================================================
%% $RCSfile: DisplayPoints.m,v $
%% $Date: 2008/12/05 00:09:32 $
%% $Revision: 1.1 $
%%=====================================================================

%if (nargin<4)
%    axis_limits = determine_border(Model,Scene);
%end

if (nargin<4)
    sampling = 0;
end

if (nargin<5)
    axis_limits = determine_border(Model, Scene);
end

if dim==2
    DisplayPoints2D(Model(:,1:2), Scene(:,1:2), sampling, axis_limits);
end

if dim==3
   DisplayPoints3D(Model(:,1:3), Scene(:,1:3), sampling, axis_limits);
end