1function check_if_same (p1,p2)
2%CHECK_IF_SAME check if two inputs are identical or not
3%
4% Example:
5%   check_if_same (1:5, 2:6)
6% See also: testall
7
8% Copyright 2006-2012, Timothy A. Davis, http://www.suitesparse.com
9
10    if (isempty (p1))
11        if (~isempty (p2))
12            p1          %#ok
13            p2          %#ok
14            error ('empty!') ;
15        end
16    elseif (any (p1 ~= p2))
17        p1              %#ok
18        p2              %#ok
19        error ('!') ;
20    end
21
22