function b=ae(a,b)
b=(abs(a-b)<10^(-13))
end

