sig   type 'a t = 'Note.event   val obs : 'Note.E.t -> 'a option Note.Logr.obs   val log : ?now:bool -> 'Note.event -> ('-> unit) -> Note.Logr.t option   val create : unit -> 'Note.event * (?step:Note.Step.t -> '-> unit)   val value : 'Note.event -> 'a option   val never : 'Note.event   val bind : 'Note.event -> ('-> 'Note.event) -> 'Note.event   val join : 'Note.event Note.event -> 'Note.event   val swap : 'Note.event Note.signal -> 'Note.event   val map : ('-> 'b) -> 'Note.event -> 'Note.event   val stamp : '-> 'Note.event -> 'Note.event   val filter : ('-> bool) -> 'Note.event -> 'Note.event   val filter_map : ('-> 'b option) -> 'Note.event -> 'Note.event   val select : 'Note.event list -> 'Note.event   val accum : '-> ('-> 'a) Note.event -> 'Note.event   val fix : ('Note.event -> 'Note.event * 'b) -> 'b   module Option :     sig       val some : 'Note.event -> 'a option Note.event       val evict :         none:'Note.signal -> 'a option Note.event -> 'Note.event     end   val dump_src_ids : Format.formatter -> 'Note.event -> unit end