type ho_whd_result =
| Sort of int
+ | GRef of NUri.uri * Bag.term list
| Abst of Bag.term
type ac_result = (int * NUri.uri * Bag.term list) list option
+type extension = No | NSI
+
val ho_whd:
- (Bag.context -> ho_whd_result -> 'a) -> Bag.context -> Bag.term -> 'a
+ (ho_whd_result -> 'a) -> Bag.context -> Bag.term -> 'a
val are_convertible:
(ac_result -> 'a) -> Bag.context -> Bag.term -> Bag.term -> 'a
+
+val ext: extension ref