sig   type progress   val bytes_read : Brr.File.Read.progress -> int   val bytes_total : Brr.File.Read.progress -> int option   type error =       [ `Aborted | `Not_found | `Not_readable | `Other of string | `Security ]   val pp_error : Format.formatter -> Brr.File.Read.error -> unit   type file = Brr.File.t   type 'a t   val to_data_url : Brr.File.Read.file -> Brr.Jstr.t Brr.File.Read.t   val abort : 'Brr.File.Read.t -> unit   val result :     'Brr.File.Read.t ->     (Brr.File.Read.file * ('a, Brr.File.Read.error) Pervasives.result)     Note.event   val progress :     'Brr.File.Read.t ->     (Brr.File.Read.file * Brr.File.Read.progress) Note.event end