sig
  type t = Ketrew_program.t
  val sh : string -> Ketrew_edsl.Program.t
  val shf :
    ('a, unit, string, Ketrew_edsl.Program.t) Pervasives.format4 -> 'a
  val exec : string list -> Ketrew_edsl.Program.t
  val ( && ) :
    Ketrew_edsl.Program.t -> Ketrew_edsl.Program.t -> Ketrew_edsl.Program.t
  val chain : Ketrew_edsl.Program.t list -> Ketrew_edsl.Program.t
end