type pp = och -> int -> unit
val export_entity: ('term -> pp) -> 'term Entity.entity -> unit
-
+(*
val export_csys: Ccs.csys -> unit
-
+*)
val tag: string -> attr list -> ?contents:pp -> pp
val sort: string
val level: Level.level -> attr
-val name: Entity.attrs -> attr
-
-val apix: Entity.attrs -> attr
+val name: Entity.node_attrs -> attr
-val mark: Entity.attrs -> attr
+val apix: Entity.node_attrs -> attr
-val meta: Entity.attrs -> attr
+val meta: Entity.root_attrs -> attr
-val info: Entity.attrs -> attr list
+val info: Entity.root_attrs -> attr list