sig type 'a t val of_react : ?scope:[< Eliom_comet.Channel.comet_scope ] -> ?throttling:float -> ?name:string -> 'a React.S.t -> 'a Eliom_react.S.Down.t end