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=76ba89918c0a058243ac66d6303dce70b658fa2d;hpb=79684e8bd0f54b5c88fff981366bd8c78dd0fbe9;p=helm.git diff --git a/helm/software/lambda-delta/basic_ag/bagUntrusted.mli b/helm/software/lambda-delta/basic_ag/bagUntrusted.mli index 76ba89918..1d25e3da7 100644 --- a/helm/software/lambda-delta/basic_ag/bagUntrusted.mli +++ b/helm/software/lambda-delta/basic_ag/bagUntrusted.mli @@ -10,5 +10,5 @@ V_______________________________________________________________ *) val type_check: - (Bag.term option -> Bag.unit -> 'a) -> ?si:bool -> - Hierarchy.graph -> Bag.unit -> 'a + (Bag.term -> Bag.entity -> 'a) -> ?si:bool -> + Hierarchy.graph -> Bag.entity -> 'a