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

State before:
R : Type u
inst✝ : CommRing R
e : ValidModel R
t : R
⊢ (rst_iso 0 0 t e).toModel.a4 = e.a4 - t * e.a1
Tactic:
simp only [rst_iso, Model.rst_iso, one_pow, zero_mul, sub_zero, mul_zero, add_zero, one_mul]
State after:
no goals