Hint Resolve evalBR_step : Recurrence.
Hint Rewrite @evalBR_step : Recurrence.
(** Functional extentionality style theorems about the evaluation of a BR *)
Section BR_FUNEXT.

Lemma evalBR_funext_delta:
forall `{Ring R} (n: nat)
(c: R) (f1 f2: nat -> R)
(bop: R -> R -> R)
(FUNEXT: forall (n: nat), f1 n = f2 n),
{{c, bop, f1}} # n = {{c, bop, f2 }} # n.