+
+(* val commit : string -> unit *)
+
+val commit : string -> string list -> string
+
+val add_files : string -> string list -> string
+
+val update_user :
+ string ->
+ (string * matita_flag option) list * string list * (int*int*int*int*int)
+
+val stat_user : string -> (string * matita_flag option) list * string list
+
+val normalize_qfn : string -> string