module Shape: sig .. end with type command := t
sig
end
with type command := t
type t =
|
Basic
Group of (string * t) list
(string * t) list
Exec of (unit -> t)
(unit -> t)