* http://cs.unibo.it/helm/.
*)
+val fresh_name : Cic.name -> string
+
(* identity_relocation_list_for_metavariable i canonical_context *)
(* returns the identity relocation list, which is the list [1 ; ... ; n] *)
(* where n = List.length [canonical_context] *)