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