Theorem: ValidModel.st_of_a2 (ECTate/Algebra/EllipticCurve/Model.lean)

State before:
R : Type u
inst✝ : CommRing R
e : ValidModel R
s t : R
⊢ (rst_iso 0 s t e).toModel.a2 = e.a2 - s * e.a1 - s ^ 2
Tactic:
simp only [rst_iso, Model.rst_iso, one_pow, mul_zero, one_mul, add_zero, mul_assoc, ←pow_two s]
State after:
no goals