| Step | Hyp | Ref
| Expression |
| 1 | | elnc 6126 |
. . . . . . . . 9
⊢
(𝒫1p ∈ Nc
𝒫1A ↔
𝒫1p ≈
𝒫1A) |
| 2 | | enpw1 6063 |
. . . . . . . . 9
⊢ (p ≈ A
↔ 𝒫1p ≈
𝒫1A) |
| 3 | 1, 2 | bitr4i 243 |
. . . . . . . 8
⊢
(𝒫1p ∈ Nc
𝒫1A ↔ p ≈ A) |
| 4 | | elnc 6126 |
. . . . . . . . 9
⊢
(𝒫1t ∈ Nc
𝒫1B ↔
𝒫1t ≈
𝒫1B) |
| 5 | | enpw1 6063 |
. . . . . . . . 9
⊢ (t ≈ B
↔ 𝒫1t ≈
𝒫1B) |
| 6 | 4, 5 | bitr4i 243 |
. . . . . . . 8
⊢
(𝒫1t ∈ Nc
𝒫1B ↔ t ≈ B) |
| 7 | | enmap1 6075 |
. . . . . . . . 9
⊢ (p ≈ A
→ (p ↑m t) ≈ (A
↑m t)) |
| 8 | | enmap2 6069 |
. . . . . . . . 9
⊢ (t ≈ B
→ (A ↑m t) ≈ (A
↑m B)) |
| 9 | | entr 6039 |
. . . . . . . . 9
⊢ (((p ↑m t) ≈ (A
↑m t) ∧ (A
↑m t) ≈ (A ↑m B)) → (p
↑m t) ≈ (A ↑m B)) |
| 10 | 7, 8, 9 | syl2an 463 |
. . . . . . . 8
⊢ ((p ≈ A
∧ t
≈ B) → (p ↑m t) ≈ (A
↑m B)) |
| 11 | 3, 6, 10 | syl2anb 465 |
. . . . . . 7
⊢
((𝒫1p ∈ Nc
𝒫1A ∧ 𝒫1t ∈ Nc 𝒫1B) → (p
↑m t) ≈ (A ↑m B)) |
| 12 | | entr 6039 |
. . . . . . . 8
⊢ ((g ≈ (p
↑m t) ∧ (p
↑m t) ≈ (A ↑m B)) → g
≈ (A ↑m B)) |
| 13 | 12 | ancoms 439 |
. . . . . . 7
⊢ (((p ↑m t) ≈ (A
↑m B) ∧ g ≈
(p ↑m t)) → g
≈ (A ↑m B)) |
| 14 | 11, 13 | sylan 457 |
. . . . . 6
⊢
(((𝒫1p ∈ Nc
𝒫1A ∧ 𝒫1t ∈ Nc 𝒫1B) ∧ g ≈ (p
↑m t)) → g ≈ (A
↑m B)) |
| 15 | 14 | 3impa 1146 |
. . . . 5
⊢
((𝒫1p ∈ Nc
𝒫1A ∧ 𝒫1t ∈ Nc 𝒫1B ∧ g ≈ (p
↑m t)) → g ≈ (A
↑m B)) |
| 16 | 15 | exlimivv 1635 |
. . . 4
⊢ (∃p∃t(𝒫1p ∈ Nc 𝒫1A ∧
𝒫1t ∈ Nc
𝒫1B ∧ g ≈
(p ↑m t)) → g
≈ (A ↑m B)) |
| 17 | | cenc.1 |
. . . . . . 7
⊢ A ∈
V |
| 18 | 17 | pw1ex 4304 |
. . . . . 6
⊢
𝒫1A ∈ V |
| 19 | 18 | ncelncsi 6122 |
. . . . 5
⊢ Nc 𝒫1A ∈ NC |
| 20 | | cenc.2 |
. . . . . . 7
⊢ B ∈
V |
| 21 | 20 | pw1ex 4304 |
. . . . . 6
⊢
𝒫1B ∈ V |
| 22 | 21 | ncelncsi 6122 |
. . . . 5
⊢ Nc 𝒫1B ∈ NC |
| 23 | | elce 6176 |
. . . . 5
⊢ (( Nc 𝒫1A ∈ NC ∧ Nc 𝒫1B ∈ NC ) → (g ∈ ( Nc
𝒫1A ↑c
Nc 𝒫1B) ↔ ∃p∃t(𝒫1p ∈ Nc 𝒫1A ∧
𝒫1t ∈ Nc
𝒫1B ∧ g ≈
(p ↑m t)))) |
| 24 | 19, 22, 23 | mp2an 653 |
. . . 4
⊢ (g ∈ ( Nc 𝒫1A ↑c Nc
𝒫1B) ↔ ∃p∃t(𝒫1p ∈ Nc 𝒫1A ∧
𝒫1t ∈ Nc
𝒫1B ∧ g ≈
(p ↑m t))) |
| 25 | | elnc 6126 |
. . . 4
⊢ (g ∈ Nc (A
↑m B) ↔ g ≈ (A
↑m B)) |
| 26 | 16, 24, 25 | 3imtr4i 257 |
. . 3
⊢ (g ∈ ( Nc 𝒫1A ↑c Nc
𝒫1B) → g ∈ Nc (A
↑m B)) |
| 27 | 26 | ssriv 3278 |
. 2
⊢ ( Nc 𝒫1A ↑c Nc
𝒫1B) ⊆ Nc (A ↑m B) |
| 28 | 18 | ncid 6124 |
. . . . 5
⊢
𝒫1A ∈ Nc
𝒫1A |
| 29 | 21 | ncid 6124 |
. . . . 5
⊢
𝒫1B ∈ Nc
𝒫1B |
| 30 | | pw1eq 4144 |
. . . . . . . . 9
⊢ (a = A →
𝒫1a =
𝒫1A) |
| 31 | 30 | eleq1d 2419 |
. . . . . . . 8
⊢ (a = A →
(𝒫1a ∈ Nc
𝒫1A ↔
𝒫1A ∈ Nc
𝒫1A)) |
| 32 | 31 | adantr 451 |
. . . . . . 7
⊢ ((a = A ∧ b = B) → (𝒫1a ∈ Nc 𝒫1A ↔ 𝒫1A ∈ Nc 𝒫1A)) |
| 33 | | pw1eq 4144 |
. . . . . . . . 9
⊢ (b = B →
𝒫1b =
𝒫1B) |
| 34 | 33 | eleq1d 2419 |
. . . . . . . 8
⊢ (b = B →
(𝒫1b ∈ Nc
𝒫1B ↔
𝒫1B ∈ Nc
𝒫1B)) |
| 35 | 34 | adantl 452 |
. . . . . . 7
⊢ ((a = A ∧ b = B) → (𝒫1b ∈ Nc 𝒫1B ↔ 𝒫1B ∈ Nc 𝒫1B)) |
| 36 | | oveq12 5533 |
. . . . . . . 8
⊢ ((a = A ∧ b = B) → (a
↑m b) = (A ↑m B)) |
| 37 | 36 | breq2d 4652 |
. . . . . . 7
⊢ ((a = A ∧ b = B) → (g
≈ (a ↑m b) ↔ g
≈ (A ↑m B))) |
| 38 | 32, 35, 37 | 3anbi123d 1252 |
. . . . . 6
⊢ ((a = A ∧ b = B) → ((𝒫1a ∈ Nc 𝒫1A ∧
𝒫1b ∈ Nc
𝒫1B ∧ g ≈
(a ↑m b)) ↔ (𝒫1A ∈ Nc 𝒫1A ∧
𝒫1B ∈ Nc
𝒫1B ∧ g ≈
(A ↑m B)))) |
| 39 | 17, 20, 38 | spc2ev 2948 |
. . . . 5
⊢
((𝒫1A ∈ Nc
𝒫1A ∧ 𝒫1B ∈ Nc 𝒫1B ∧ g ≈ (A
↑m B)) → ∃a∃b(𝒫1a ∈ Nc 𝒫1A ∧
𝒫1b ∈ Nc
𝒫1B ∧ g ≈
(a ↑m b))) |
| 40 | 28, 29, 39 | mp3an12 1267 |
. . . 4
⊢ (g ≈ (A
↑m B) → ∃a∃b(𝒫1a ∈ Nc 𝒫1A ∧
𝒫1b ∈ Nc
𝒫1B ∧ g ≈
(a ↑m b))) |
| 41 | | elce 6176 |
. . . . 5
⊢ (( Nc 𝒫1A ∈ NC ∧ Nc 𝒫1B ∈ NC ) → (g ∈ ( Nc
𝒫1A ↑c
Nc 𝒫1B) ↔ ∃a∃b(𝒫1a ∈ Nc 𝒫1A ∧
𝒫1b ∈ Nc
𝒫1B ∧ g ≈
(a ↑m b)))) |
| 42 | 19, 22, 41 | mp2an 653 |
. . . 4
⊢ (g ∈ ( Nc 𝒫1A ↑c Nc
𝒫1B) ↔ ∃a∃b(𝒫1a ∈ Nc 𝒫1A ∧
𝒫1b ∈ Nc
𝒫1B ∧ g ≈
(a ↑m b))) |
| 43 | 40, 25, 42 | 3imtr4i 257 |
. . 3
⊢ (g ∈ Nc (A
↑m B) → g ∈ ( Nc 𝒫1A ↑c Nc
𝒫1B)) |
| 44 | 43 | ssriv 3278 |
. 2
⊢ Nc (A
↑m B) ⊆ ( Nc
𝒫1A ↑c
Nc 𝒫1B) |
| 45 | 27, 44 | eqssi 3289 |
1
⊢ ( Nc 𝒫1A ↑c Nc
𝒫1B) = Nc (A
↑m B) |