struct
  type t =
    | Spades
    | Hearts
    | Diamonds
    | Clubs
  with bin_io, sexp
end