type t =
  | Complete
  | Incomplete