X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Flambda-delta%2Fbasic_ag%2FbagUntrusted.mli;h=1d25e3da7a2f64728a17c0705a8c9fb31cb4c4f9;hb=f2771b346a41445df23adb6acccd7ee6b1578666;hp=54ae7717cb09606b28c0e964155ee5d51757b15e;hpb=338e3e5c639fbcfeeb347a0121cacc6c0f1fc42a;p=helm.git

diff --git a/helm/software/lambda-delta/basic_ag/bagUntrusted.mli b/helm/software/lambda-delta/basic_ag/bagUntrusted.mli
index 54ae7717c..1d25e3da7 100644
--- a/helm/software/lambda-delta/basic_ag/bagUntrusted.mli
+++ b/helm/software/lambda-delta/basic_ag/bagUntrusted.mli
@@ -10,4 +10,5 @@
       V_______________________________________________________________ *)
 
 val type_check:
-   (Bag.term option -> Bag.item -> 'a) -> Hierarchy.graph -> Bag.item -> 'a
+   (Bag.term -> Bag.entity -> 'a) -> ?si:bool ->
+   Hierarchy.graph -> Bag.entity -> 'a