fact: Fixpoint eval (fuel : nat) (min : nat) (c : reccode) (v : list nat) : option (nat + list nat) := match fuel with | 0 => None | S fuel => eval_rec (eval fuel) min c v end.
imports: Undecidability.L.Datatypes(LNat LOptions LSum List.List_nat) Undecidability.L.Tactics.GenEncode