Section enumerator_list_enumerator.
Variable X : Type.
Variable p : X -> Prop.
Variables (e : nat -> option X).
Let T (n : nat) : list X :=  match e n with Some x => [x] | None => [] end.
End enumerator_list_enumerator.

Lemma enumerable__T_list_enumerable {X} :
enumerable__T X -> list_enumerable__T X.