fof(subtract_to_0,axiom,
( element(crazy,domain)
& subtract(domain,crazy,crazy) != zero(domain) ) ).
It'll be real easy to prove now - you'd better check that
the axioms (included and explicit) are satisfiable.
Delete the hypothesis and conjecture and use
a model finder for that, and if it fails try show them
unsatisfiable using a theorem prover.