103c103,118 < [X, Y] = meshgrid(1:columns(Z), 1:rows(Z)); --- > ## [X, Y] = meshgrid(1:columns(Z), 1:rows(Z)); > XD = linspace (1, columns(Z), columns(Z)); > YD = linspace (1, rows(Z), Rows(Z)); > XDs = single(XD); > YDs = single(YD); > %# absolute tolerance equality > isequalAbs = @(x,y,tol) (abs(x-y) <= tol ); > if(all(isequalAbs(XD, XDs, eps(XDs))) && all(isequalAbs(YD, YDs, eps(YDs)))) > XD = XDs; > YD = YDs; > endif > XDs=[]; > YDs=[]; > [X, Y] = meshgrid (XD, YD); > XD=[]; > YD=[];