| Step | Hyp | Ref
| Expression |
| 1 | | eqid 2761 |
. . . 4
⊢
{〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))}) ∧ 𝑦 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))})) ∧ ∃𝑙 ∈ (Base‘𝐾)𝑥 = (𝑙( ·𝑠
‘(𝐾 freeLMod
(0...𝑁)))𝑦))} = {〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))}) ∧ 𝑦 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))})) ∧ ∃𝑙 ∈ (Base‘𝐾)𝑥 = (𝑙( ·𝑠
‘(𝐾 freeLMod
(0...𝑁)))𝑦))} |
| 2 | | eqid 2761 |
. . . 4
⊢ (𝐾 freeLMod (0...𝑁)) = (𝐾 freeLMod (0...𝑁)) |
| 3 | | eqid 2761 |
. . . 4
⊢
((Base‘(𝐾
freeLMod (0...𝑁))) ∖
{(0g‘(𝐾
freeLMod (0...𝑁)))}) =
((Base‘(𝐾 freeLMod
(0...𝑁))) ∖
{(0g‘(𝐾
freeLMod (0...𝑁)))}) |
| 4 | | eqid 2761 |
. . . 4
⊢
(Base‘𝐾) =
(Base‘𝐾) |
| 5 | | eqid 2761 |
. . . 4
⊢ (
·𝑠 ‘(𝐾 freeLMod (0...𝑁))) = ( ·𝑠
‘(𝐾 freeLMod
(0...𝑁))) |
| 6 | | prjspnn0.k |
. . . 4
⊢ (𝜑 → 𝐾 ∈ DivRing) |
| 7 | 1, 2, 3, 4, 5, 6 | prjspner 43627 |
. . 3
⊢ (𝜑 → {〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))}) ∧ 𝑦 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))})) ∧ ∃𝑙 ∈ (Base‘𝐾)𝑥 = (𝑙( ·𝑠
‘(𝐾 freeLMod
(0...𝑁)))𝑦))} Er ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))})) |
| 8 | | erdm 8721 |
. . 3
⊢
({〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))}) ∧ 𝑦 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))})) ∧ ∃𝑙 ∈ (Base‘𝐾)𝑥 = (𝑙( ·𝑠
‘(𝐾 freeLMod
(0...𝑁)))𝑦))} Er ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))}) → dom {〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))}) ∧ 𝑦 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))})) ∧ ∃𝑙 ∈ (Base‘𝐾)𝑥 = (𝑙( ·𝑠
‘(𝐾 freeLMod
(0...𝑁)))𝑦))} = ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))})) |
| 9 | 7, 8 | syl 18 |
. 2
⊢ (𝜑 → dom {〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))}) ∧ 𝑦 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))})) ∧ ∃𝑙 ∈ (Base‘𝐾)𝑥 = (𝑙( ·𝑠
‘(𝐾 freeLMod
(0...𝑁)))𝑦))} = ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))})) |
| 10 | | prjspnn0.a |
. . 3
⊢ (𝜑 → 𝐴 ∈ 𝑃) |
| 11 | | prjspnn0.p |
. . . 4
⊢ 𝑃 = (𝑁ℙ𝕣𝕠𝕛n𝐾) |
| 12 | | prjspnn0.n |
. . . . 5
⊢ (𝜑 → 𝑁 ∈
ℕ0) |
| 13 | 1, 2, 3, 4, 5, 12,
6 | prjspnval2 43626 |
. . . 4
⊢ (𝜑 → (𝑁ℙ𝕣𝕠𝕛n𝐾) = (((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))}) / {〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))}) ∧ 𝑦 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))})) ∧ ∃𝑙 ∈ (Base‘𝐾)𝑥 = (𝑙( ·𝑠 ‘(𝐾 freeLMod (0...𝑁)))𝑦))})) |
| 14 | 11, 13 | eqtrid 2808 |
. . 3
⊢ (𝜑 → 𝑃 = (((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))}) / {〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))}) ∧ 𝑦 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))})) ∧ ∃𝑙 ∈ (Base‘𝐾)𝑥 = (𝑙( ·𝑠
‘(𝐾 freeLMod
(0...𝑁)))𝑦))})) |
| 15 | 10, 14 | eleqtrd 2863 |
. 2
⊢ (𝜑 → 𝐴 ∈ (((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))}) / {〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))}) ∧ 𝑦 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))})) ∧ ∃𝑙 ∈ (Base‘𝐾)𝑥 = (𝑙( ·𝑠
‘(𝐾 freeLMod
(0...𝑁)))𝑦))})) |
| 16 | | elqsn0 8798 |
. 2
⊢ ((dom
{〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))}) ∧ 𝑦 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))})) ∧ ∃𝑙 ∈ (Base‘𝐾)𝑥 = (𝑙( ·𝑠
‘(𝐾 freeLMod
(0...𝑁)))𝑦))} = ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))}) ∧ 𝐴 ∈ (((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))}) / {〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))}) ∧ 𝑦 ∈ ((Base‘(𝐾 freeLMod (0...𝑁))) ∖ {(0g‘(𝐾 freeLMod (0...𝑁)))})) ∧ ∃𝑙 ∈ (Base‘𝐾)𝑥 = (𝑙( ·𝑠
‘(𝐾 freeLMod
(0...𝑁)))𝑦))})) → 𝐴 ≠ ∅) |
| 17 | 9, 15, 16 | syl2anc 596 |
1
⊢ (𝜑 → 𝐴 ≠ ∅) |