Section ra_min_extra.
Variable (n : nat) (f : recalg (S n)) (v : vec nat n).
Hypothesis Hf : forall x, ex (⟦f⟧ (x##v)).

Theorem ra_min_extra : ex (⟦ra_min f⟧ v) <-> exists x, ⟦f⟧ (x##v) 0.