open Culr

let () = Pipes.read_all Env.colours Env.order