www.gusucode.com > A new Toolbox for Interval Valued Bipolar Neutrosophic Matrices > A new Toolbox for Interval Valued Bipolar Neutrosophic Matrices/@term/eq.m

    function r = eq(p,q)
% function r = eq(p,q)
% "equals to" for two terms
% returns 1, if p==q, 0 otherwise
% In the Name of ALLAH
% A new toolbox for computing interval valued bipolar neutrosophic Matrices 
% Copyright (C) 2015-2019 Broumi said 
%for for details contact : broumisaid78@gmail.com
%this package is under improvment 
% A new  toolbox for computing interval valued bipolar neutrosophic Matrice comes 
% This is free software, and you are welcome to redistribut;see license.txt for details.

if isa(p,'term')&(isa(q,'term'))
    if (p(:).n==q(:).n)&(p(:).d==q(:).d)
        r=1;
    else
        r=0;
    end
else
    r=0;
end