Fix_proof should recursively work on explicit substs.

[helm.git] / helm / software / components / library / coercGraph.mli

diff --git a/helm/software/components/library/coercGraph.mli b/helm/software/components/library/coercGraph.mli
index 01f3fecf69ab1d564f5910c6d60241e398d41fba..e6bc766df3d141ea3049789fd43c91bb6679c134 100644 (file)
--- a/helm/software/components/library/coercGraph.mli
+++ b/helm/software/components/library/coercGraph.mli
@@ -36,9 +36,21 @@ type coercion_search_result =
 val look_for_coercion :
   Cic.term -> Cic.term -> coercion_search_result
 
+val look_for_coercion' :
+  CoercDb.coerc_carr -> CoercDb.coerc_carr -> coercion_search_result
+
 val is_a_coercion: Cic.term -> bool
+val is_a_coercion_to_funclass: Cic.term -> int option
+
+(* checks if term is a constant or 
+ * a constant applyed that is marked with (`Class `Coercion) *)
+val is_composite: Cic.term -> bool
+
 val source_of: Cic.term -> Cic.term
-val target_of: Cic.term -> Cic.term
 
 val generate_dot_file: unit -> string
 
+val meets : 
+  CoercDb.coerc_carr -> CoercDb.coerc_carr -> 
+    CoercDb.coerc_carr list
+