* http://helm.cs.unibo.it/
*)
+(** metadata -> string *)
+
+val pp_position: MetadataTypes.position -> string
+val pp_position_tag: MetadataTypes.position -> string
+val pp_constr: MetadataTypes.constr -> string
+
(** Pretty printer and OCamlDBI friendly interface *)
type t =
| `String of string
| `Null ]
- (** @param about uri of object whose metadata are about
- * @return columns for Sort, Rel, and Obj respectively *)
-val columns_of_metadata:
- about:string -> MetadataTypes.metadata list ->
- t list list * t list list * t list list
-
(** @return columns for Sort, Rel, and Obj respectively *)
-val columns_of_ind_metadata:
- (string * string * MetadataTypes.metadata list) list ->
+val columns_of_metadata:
+ (UriManager.uri * string * MetadataTypes.metadata list) list ->
t list list * t list list * t list list
+(*
val pp_columns: ?sep:string -> t list list * t list list * t list list -> string
+*)
+
+val pp_relation: MetadataTypes.relation -> string