UriManager.string_of_uri (*UriManager.name_of_uri*) uri ^ pp_exp_named_subst exp_named_subst l
| C.Meta (n,l1) ->
"?" ^ (string_of_int n) ^ "[" ^
+(*
String.concat " ; "
(List.rev_map (function None -> "_" | Some t -> pp t l) l1) ^
+*)
"]"
| C.Sort s ->
(match s with