type 'a rd = < rd : unit.. > as 'a
type 'a wr = < wr : unit.. > as 'a
type 'a mode =
| Rd : < rd : unit > mode
| Wr : < wr : unit > mode
| RdWr : < rd : unit ; wr : unit > mode
type +'a fiber = 'a Lwt.t
val pp_error : error Fmt.t
val map : t -> 'm rd fd -> pos:int64 -> int -> Bigstringaf.t
val append : t -> 'm wr fd -> string -> unit fiber