add comparison between Furlong and Number

Author: dkarrasch

test/testhelpers/Furlongs.jl

@@ -76,6 +76,11 @@ end
 for op in (:(==), :(!=), :<, :<=, :isless, :isequal)
     @eval $op(x::Furlong{p}, y::Furlong{p}) where {p} = $op(x.val, y.val)::Bool
 end
+for op in (:(==), :isequal)
+    @eval $op(x::Furlong{p}, y::Furlong{q}) where {p,q} = false
+    @eval $op(x::Furlong, y::Number) = $op(promote(x, y)...)
+    @eval $op(x::Number, y::Furlong) = $op(y, x)
+end
 for (f,op) in ((:_plus,:+),(:_minus,:-),(:_times,:*),(:_div,://))
     @eval function $f(v::T, ::Furlong{p}, ::Union{Furlong{q},Val{q}}) where {T,p,q}
         s = $op(p, q)