Fs.File
type t = file
val create : directory:Directory.t -> name:string -> t
val dirname : t -> Directory.t
val append : Directory.t -> t -> t
val has_ext : string -> t -> bool
val get_ext : t -> string
val of_string : string -> t
val to_string : t -> string
val read : t -> (string, [> Or_error.msg ]) Or_error.result