sig
  module Down : sig type 'a t = 'React.E.t end
  module Up : sig type 'a t = '-> unit Lwt.t end
  module S : sig module Down : sig type 'a t = 'React.S.t end end
  val force_link : unit
end