case a
p : ℕ
R : Type ?u.70738
hp : Fact (Nat.Prime p)
inst✝ : CommRing R
⊢ ↑(map (Int.castRingHom ℚ)) (wittNeg p 0) = ↑(map (Int.castRingHom ℚ)) (-X (0, 0))
p : ℕ
R : Type ?u.70738
hp : Fact (Nat.Prime p)
inst✝ : CommRing R
⊢ wittNeg p 0 = -X (0, 0)
apply MvPolynomial.map_injective (Int.castRingHom ℚ) Int.cast_injective
no goals
case a
p : ℕ
R : Type ?u.70738
hp : Fact (Nat.Prime p)
inst✝ : CommRing R
⊢ ↑(map (Int.castRingHom ℚ)) (wittNeg p 0) = ↑(map (Int.castRingHom ℚ)) (-X (0, 0))
simp only [wittNeg, wittStructureRat, rename_X, xInTermsOfW_zero, map_X, wittPolynomial_zero,
  RingHom.map_neg, AlgHom.map_neg, bind₁_X_right, map_wittStructureInt]