view m-toolbox/classes/tests/@Assert/doubleEquals.m @ 35:4be5f7a5316f database-connection-manager

Suppress output messages on preferences loading and saving
author Daniele Nicolodi <nicolodi@science.unitn.it>
date Mon, 05 Dec 2011 16:20:06 +0100
parents f0afece42f48
children
line wrap: on
line source

% DOUBLEEQUALS Assert that two doubles are equal.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% DESCRIPTION: Assert that two doubles are equal.
%              doubleEquals(A, B) throws an AssertionFailed exception if A
%              and B are not equal. A and B must have the same class and
%              the same length.
%
% COMMAND:     Assert.doubleEquals(val1, val2)
%              Assert.doubleEquals(val1, val2, message)
%
% VERSION:     $Id: doubleEquals.m,v 1.1 2011/06/20 16:32:56 ingo Exp $
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
function doubleEquals(val1, val2, varargin)
  
  % Check class of the input arguments
  if ~isnumeric(val1) || ~isnumeric(val2)
    Assert.fail('The input arguments must be two double.');
  end
  
  % Check the length of the inputs
  if numel(val1) ~= numel(val2)
    Assert.fail('The input arguments don''t have the same length.');
  end
  
  if (val1 ~= val2)
    Assert.fail(varargin{:});
  end
  
end