Proof of Theorem supmaxlem
| Step | Hyp | Ref
| Expression |
| 1 | | breq1 2622 |
. . . . . . 7
⊢ (x = C →
(xRy ↔
CRy)) |
| 2 | 1 | negbid 611 |
. . . . . 6
⊢ (x = C →
(¬ xRy ↔ ¬
CRy)) |
| 3 | 2 | ralbidv 1663 |
. . . . 5
⊢ (x = C →
(∀y
∈ B ¬
xRy ↔ ∀y ∈ B ¬
CRy)) |
| 4 | | breq2 2623 |
. . . . . . 7
⊢ (x = C →
(yRx ↔
yRC)) |
| 5 | 4 | imbi1d 613 |
. . . . . 6
⊢ (x = C →
((yRx → ∃z ∈ B yRz) ↔ (yRC → ∃z ∈ B yRz))) |
| 6 | 5 | ralbidv 1663 |
. . . . 5
⊢ (x = C →
(∀y
∈ A
(yRx → ∃z ∈ B yRz) ↔ ∀y ∈ A (yRC → ∃z ∈ B yRz))) |
| 7 | 3, 6 | anbi12d 628 |
. . . 4
⊢ (x = C →
((∀y
∈ B ¬
xRy ⋀ ∀y ∈ A (yRx → ∃z ∈ B yRz)) ↔ (∀y ∈ B ¬
CRy ⋀ ∀y ∈ A (yRC → ∃z ∈ B yRz)))) |
| 8 | 7 | rcla4ev 1877 |
. . 3
⊢ ((C ∈ A ⋀ (∀y ∈ B ¬
CRy ⋀ ∀y ∈ A (yRC → ∃z ∈ B yRz))) → ∃x ∈ A (∀y ∈ B ¬
xRy ⋀ ∀y ∈ A (yRx → ∃z ∈ B yRz))) |
| 9 | | breq2 2623 |
. . . . . . . 8
⊢ (z = y →
(CRz ↔
CRy)) |
| 10 | 9 | negbid 611 |
. . . . . . 7
⊢ (z = y →
(¬ CRz ↔ ¬
CRy)) |
| 11 | 10 | cbvralv 1800 |
. . . . . 6
⊢ (∀z ∈ B ¬
CRz ↔ ∀y ∈ B ¬
CRy) |
| 12 | 11 | biimp 151 |
. . . . 5
⊢ (∀z ∈ B ¬
CRz → ∀y ∈ B ¬
CRy) |
| 13 | | breq2 2623 |
. . . . . . . . 9
⊢ (z = C →
(yRz ↔
yRC)) |
| 14 | 13 | rcla4ev 1877 |
. . . . . . . 8
⊢ ((C ∈ B ⋀ yRC) → ∃z ∈ B yRz) |
| 15 | 14 | ex 373 |
. . . . . . 7
⊢ (C ∈ B → (yRC → ∃z ∈ B yRz)) |
| 16 | 15 | a1d 12 |
. . . . . 6
⊢ (C ∈ B → (y
∈ A
→ (yRC → ∃z ∈ B yRz))) |
| 17 | 16 | r19.21aiv 1713 |
. . . . 5
⊢ (C ∈ B → ∀y ∈ A (yRC → ∃z ∈ B yRz)) |
| 18 | 12, 17 | anim12i 333 |
. . . 4
⊢ ((∀z ∈ B ¬
CRz ⋀ C ∈ B) →
(∀y
∈ B ¬
CRy ⋀ ∀y ∈ A (yRC → ∃z ∈ B yRz))) |
| 19 | 18 | ancoms 436 |
. . 3
⊢ ((C ∈ B ⋀ ∀z ∈ B ¬
CRz) →
(∀y
∈ B ¬
CRy ⋀ ∀y ∈ A (yRC → ∃z ∈ B yRz))) |
| 20 | 8, 19 | sylan2 451 |
. 2
⊢ ((C ∈ A ⋀ (C ∈ B ⋀ ∀z ∈ B ¬
CRz)) →
∃x ∈ A (∀y ∈ B ¬
xRy ⋀ ∀y ∈ A (yRx → ∃z ∈ B yRz))) |
| 21 | 20 | 3impb 829 |
1
⊢ ((C ∈ A ⋀ C ∈ B ⋀ ∀z ∈ B ¬
CRz) → ∃x ∈ A (∀y ∈ B ¬
xRy ⋀ ∀y ∈ A (yRx → ∃z ∈ B yRz))) |