exception UnificationFailure of string Lazy.t;;
-module Founif (B : Terms.Blob) :
+module Founif (B : Orderings.Blob) :
sig
val unification:
Terms.varlist ->
B.t Terms.foterm ->
B.t Terms.foterm ->
- B.t Terms.substitution * Terms.varlist
+ B.t Terms.substitution
val alpha_eq: