Theorem: Model.map_b4 (ECTate/Algebra/EllipticCurve/Model.lean)

State before:
R✝ : Type u
inst✝² : CommRing R✝
R S : Type u
inst✝¹ : CommRing R
inst✝ : CommRing S
f : R →+* S
e : Model R
⊢ b4 (map f e) = ↑f (b4 e)
Tactic:
simp [Model.b4]
State after:
no goals