view util/ksvd utils/iswhole.m @ 219:4337e28183f1 luisf_dev

Modified help comments of wrapper_mm_DL.m, wrapper_mm_solver.m, SMALL_rlsdla.m & SMALL_AudioDenoise_DL_test_KSVDvsSPAMS.m. Moved wrapper_ALPS_toolbox from toolboxes to toolboxes/alps and added some extra help comments.

function z = iswhole(x,epsilon)
%ISWHOLE Determine whole numbers with finite precision.
%  Z = ISWHOLE(X,EPSILON) returns a matrix the same size as X, containing
%  1's where X is whole up to precision EPSILON, and 0's elsewhere. 
%
%  Z = ISWHOLE(X) uses the default value of EPSILON=1e-6.


%  Ron Rubinstein
%  Computer Science Department
%  Technion, Haifa 32000 Israel
%  ronrubin@cs
%
%  May 2005

if (nargin<2), epsilon = 1e-6; end
z = abs(round(x)-x) < epsilon;