let units_finset := (Finset.univ : Finset (ZMod p)).erase 0
p : ℕ
h_p : p ≠ 2
inst✝ : Fact p.Prime
a : ℤ
⊢ ↑a ≠ 0 → ↑a ^ (p - 1) = -1
p : ℕ
h_p : p ≠ 2
inst✝ : Fact p.Prime
a : ℤ
units_finset : Finset (ZMod p) := univ.erase 0
⊢ ↑a ≠ 0 → ↑a ^ (p - 1) = -1