val destroy_development: development -> unit
(* initiale internal data structures *)
val initialize : unit -> unit
-
+(* gives back the root *)
+val root_for_development : development -> string
+(* gives back the name *)
+val name_for_development : development -> string