home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 10 / 10.iso / l / l460 / 2.ddi / POLYFUN.DI$ / UNMKPP.M < prev    next >
Encoding:
Text File  |  1993-03-07  |  369 b   |  17 lines

  1. function [breaks,coefs,l,k]=unmkpp(pp)
  2. %UNMKPP    Unmake piecewise polynomial.
  3. %
  4. %        [breaks,coefs,l,k] = unmkpp(pp)
  5. %
  6. %    takes apart the  pp  function into its pieces.
  7. %
  8. %    See also MKPP, SPLINE, PPVAL.
  9.  
  10. %    Carl de Boor 7-2-86
  11. %    Copyright (c) 1984-93 by The MathWorks, Inc.
  12.  
  13. l=pp(1);
  14. breaks=pp(2:l+2);
  15. k=pp(l+3);
  16. coefs=zeros(l,k);coefs(:)=pp(l+4:l+k*l+3);
  17.