(* $Id: nCic.ml 9058 2008-10-13 17:42:30Z tassi $ *)
+exception UnificationFailure of string Lazy.t;;
+
val unification:
Terms.varlist -> (* global varlist for both terms t1 and t2 *)
Terms.varlist -> (* locked variables: if equal to FV(t2) we match t1 with t2*)