\ / This software is distributed as is, NO WARRANTY.
V_______________________________________________________________ *)
+IFDEF OBJECTS THEN
+
type och = string -> unit
type attr = string * string
val cast: string
-val appl: bool -> string
+val appl: string
val proj: string
val position: int -> attr
+val depth: int -> attr
+
val uri: Entity.uri -> attr
+val restricted: bool -> attr
+
val layer: Layer.status -> Layer.layer -> attr
-val name: Entity.node_attrs -> attr
+val name: Entity.bind_attrs -> attr
-val main: Entity.node_attrs -> attr list
+val main: Entity.arity -> attr list
-val side: Entity.node_attrs -> attr list
+val side: Entity.arity -> attr list
val apix: Entity.node_attrs -> attr
val meta: Entity.root_attrs -> attr
val info: Entity.root_attrs -> attr list
+
+END