(Cic.id, CicNotationPt.sort_kind) Hashtbl.t -> (* id -> sort *)
Cic.annterm -> (* acic *)
CicNotationPt.term (* ast *)
- * (Cic.id, string) Hashtbl.t (* id -> uri *)
- (* TODO change the type of id->uri table to (Cic.id, UriManager.uri) tbl *)
+ * (Cic.id, UriManager.uri) Hashtbl.t (* id -> uri *)
(** level 2 -> level 1 *)
val pp_ast: CicNotationPt.term -> CicNotationPt.term