Theorem: Model.map_discr (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
⊢ discr (map f e) = ↑f (discr e)
Tactic:
simp [Model.discr]
State after:
no goals