# HG changeset patch
# User Pantxo Diribarne <pantxo.diribarne@gmail.com>
# Date 1368185671 -7200
# Node ID 3f02bcf2bdcc50a26b61cc528dcfe59c39246148
# Parent  f0bc865db55ff68809e651e947ca4a772b47bb9e
ppval.m: ensure consistency in the shape of intermediate interpolated matrix between "nearest" and higher order methods.

* scripts/polynomial/ppval.m: Use same reshape call in "nearest" as in other
methods so output is consistent for ppval.

diff -r f0bc865db55f -r 3f02bcf2bdcc scripts/polynomial/ppval.m
--- a/scripts/polynomial/ppval.m	Tue Oct 22 08:34:23 2013 -0700
+++ b/scripts/polynomial/ppval.m	Fri May 10 13:34:31 2013 +0200
@@ -74,9 +74,10 @@
   dx = shiftdim (dx, ndv - 1);
 
   ## Use Horner scheme.
-  yi = Pidx;
   if (k > 1)
     yi = shiftdim (reshape (Pidx(1,:), dimvec), ndv - 1);
+  else
+    yi = shiftdim (reshape (Pidx, dimvec), ndv - 1);
   endif
 
   for i = 2 : k;