X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Flambda-delta%2Fbasic_rg%2FbrgReduction.mli;h=57e2bfb417ea2540c32244bc08510f040cb2f6cb;hb=17e7978cda0dfa4585393b0c48bd96e9504a6b92;hp=91a0289bba82fb8f3d34cbe1d5cc9c6cca5eb182;hpb=41bf338d7e638ebb5d97e525055bff05b1f0f045;p=helm.git

diff --git a/helm/software/lambda-delta/basic_rg/brgReduction.mli b/helm/software/lambda-delta/basic_rg/brgReduction.mli
index 91a0289bb..57e2bfb41 100644
--- a/helm/software/lambda-delta/basic_rg/brgReduction.mli
+++ b/helm/software/lambda-delta/basic_rg/brgReduction.mli
@@ -12,12 +12,8 @@
 
 exception LRefNotFound of Brg.message
 
-type ho_whd_result =
-   | Sort of int
-   | Abst of Brg.term
-
-val ho_whd: 
-   (Brg.context -> ho_whd_result -> 'a) -> Brg.context -> Brg.term -> 'a
+val domain: 
+   (Brg.term option -> 'a) -> Brg.context -> Brg.term -> 'a
 
 val are_convertible:
-   (bool -> 'a) -> Brg.context -> Brg.term -> Brg.term -> 'a
+   (bool -> 'a) -> ?si:bool -> Brg.context -> Brg.term -> Brg.term -> 'a