function [breaks,coefs,l,k]=unmkpp(pp)
%UNMKPP	Unmake piecewise polynomial.
%
%	    [breaks,coefs,l,k] = unmkpp(pp)
%
%	takes apart the  pp  function into its pieces.
%
%	See also MKPP, SPLINE, PPVAL.

%	Carl de Boor 7-2-86
%	Copyright (c) 1984-93 by The MathWorks, Inc.

l=pp(1);
breaks=pp(2:l+2);
k=pp(l+3);
coefs=zeros(l,k);coefs(:)=pp(l+4:l+k*l+3);
