\ / This software is distributed as is, NO WARRANTY.
V_______________________________________________________________ *)
+type 'a out = (unit -> 'a) -> string -> 'a
+(*
val export_entity:
+ ('a och -> string -> 'bind Entity.entry -> 'a) ->
+ string -> bool -> Hierarchy.graph -> 'bind Entity.entity -> 'a
+*)
+val old_export_entity:
(Format.formatter -> 'bind Entity.entry -> unit) ->
bool -> Hierarchy.graph -> 'bind Entity.entity -> unit