diff scripts/general/bicubic.m @ 10549:95c3e38098bf

Untabify .m scripts
author Rik <code@nomad.inbox5.com>
date Fri, 23 Apr 2010 11:28:50 -0700
parents 1bf0ce0930be
children d1978e7364ad
line wrap: on
line diff
--- a/scripts/general/bicubic.m	Fri Apr 23 11:13:48 2010 -0700
+++ b/scripts/general/bicubic.m	Fri Apr 23 11:28:50 2010 -0700
@@ -79,7 +79,7 @@
     [rz, cz] = size (Z) ; 
     if (isvector (X) && isvector (Y))
       if (rz != length (Y) || cz != length (X))
-	error ("length of X and Y must match the size of Z");
+        error ("length of X and Y must match the size of Z");
       endif
     elseif (size_equal (X, Y) && size_equal (X, Z))
       X = X(1,:);
@@ -184,8 +184,8 @@
     it = indt(i);
     int = [it, it+1, it+2, it+3];
     F(i,:) = ([ct0(i),ct1(i),ct2(i),ct3(i)]
-	      * (p(int,inds) .* cs0 + p(int,inds+1) .* cs1
-		 + p(int,inds+2) .* cs2 + p(int,inds+3) .* cs3));
+              * (p(int,inds) .* cs0 + p(int,inds+1) .* cs1
+                 + p(int,inds+2) .* cs2 + p(int,inds+3) .* cs3));
   endfor
 
   ## Set points outside the table to extrapval.