% lap_lab.m --- either for cf_split.m or used alone
%               to display NUMGRID results (see also DELSQ)
%e.g. n=16, G=numgrid('D',n); lap_lab
if ~exist('n') | ~exist('G'), help cf_split; help lap_lab, return; end

x=0:1/(n-1):1;[x y]=meshgrid(x);
x=x'.*(G>0); y=y'.*(G>0);
x=x(:); y=y(:);  LX=find(x);
x=x(LX); y=y(LX);
%figure
  plot([0 1],[0 1],'+')
  for k=1:length(x), text(x(k),y(k),num2str(k));hold on, end
  hold off
% 
