]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/ocaml/cic_notation/cicNotationUtil.mli
snapshot, notably:
[helm.git] / helm / ocaml / cic_notation / cicNotationUtil.mli
index fd7e12f7f6a1ae0d26f3c6cc296546e05b209fb2..6661245afe1c8e5b52b40f255a72c610b0ef854b 100644 (file)
@@ -49,10 +49,13 @@ val ncombine: 'a list list -> 'a list list
 
 val string_of_literal: CicNotationPt.literal -> string
 
+val dress: 'a -> 'a list -> 'a list
+
 val boxify: CicNotationPt.term list -> CicNotationPt.term
+val group: CicNotationPt.term list -> CicNotationPt.term
+val ungroup: CicNotationPt.term list -> CicNotationPt.term list
 
-val find_appl_pattern_uris:
-  CicNotationPt.cic_appl_pattern -> UriManager.uri list
+val find_appl_pattern_uris: GrafiteAst.cic_appl_pattern -> UriManager.uri list
 
 val find_branch:
   CicNotationPt.term -> CicNotationPt.term