sig val pretty : Stdlib.Format.formatter -> Wpo.t -> unit val filename : ?legacy:bool -> Wpo.t -> string val exists : Wpo.t -> bool val save : Wpo.t -> Json.t -> unit val load : Wpo.t -> Json.t val remove : Wpo.t -> unit end