function [px,py]=normPolyChar(B,s,tol)
% normPolyChar <Prepare polyChar for packing.>
% Usage:: [px,py]=normPolyChar(B,s,tol[1e-3])
%

% revision history:
% 12/05/18 Mark D. Shattuck <mds> normPolyChar.m

%% Parse Input
if(~exist('tol','var') || isempty(tol))
	tol=1e-3;
end

%% Main

NB=length(B);
px=cell(NB,1);
py=cell(NB,1);
for nb=1:NB; 
  ii=reducePolyChar(B{nb}(:,2)/s,B{nb}(:,1)/s,tol); 
  px{nb}=B{nb}(ii,2)'/s; 
  py{nb}=1-B{nb}(ii,1)'/s; 
end

