exception NoRootFor of string val find_root : string -> string (* baseuri_of_script ?(inc:REG[matita.includes]) fname -> root, buri, fullpath * sample: baseuri_of_script a.ma -> /home/pippo/devel/, cic:/matita/a, * /home/pippo/devel/a.ma *) val baseuri_of_script: ?include_paths:string list -> string -> string * string * string (* finds all the roots files in the specified dir *) val find_roots_in_dir: string -> string list