let
to_list t =
List
.of_enum (enum t)