\ / This software is distributed as is, NO WARRANTY.
V_______________________________________________________________ *)
+type counters
+
+val initial_counters: counters
+
+val count_entity: (counters -> 'a) -> counters -> Crg.entity -> 'a
+
+val print_counters: (unit -> 'a) -> counters -> 'a
+
val pp_term: (string -> unit) -> Crg.term -> unit