fact: Variable (n : nat) (f : vec nat n -> nat -> nat) (af : recalg (S n)) (Hf : forall a v, ⟦af⟧ (a##v) (f v a)) (Haf : prim_rec af).
imports: Arith List Lia Undecidability.Shared.Libs.DLW(utils_tac utils_nat utils_list gcd crt sums finite pos vec) Undecidability.MuRec.Util(recalg recomp prim_min)