- ('a och -> string -> 'bind Entity.entry -> 'a) ->
- string -> bool -> Hierarchy.graph -> 'bind Entity.entity -> 'a
-*)
+ ('term -> pp) ->
+ bool -> Hierarchy.graph -> 'term Entity.entity -> unit
+
+val tag: string -> attr list -> ?contents:pp -> pp
+
+val sort: string
+
+val lref: string
+
+val gref: string
+
+val cast: string
+
+val appl: string
+
+val proj: string
+
+val abst: string
+
+val abbr: string
+
+val void: string
+
+val position: int -> attr
+
+val offset: int -> attr
+
+val uri: Entity.uri -> attr
+
+val arity: int -> attr
+
+val name: Entity.attrs -> attr
+
+val mark: Entity.attrs -> attr
+