sig val path : string list val f : (string * string) list -> unit -> (Eliom_registration.browser_content, Eliom_registration.http_service) Eliom_registration.kind Lwt.t end