Users' Mathboxes Mathbox for Stefan O'Rear < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  fphpdo Structured version   Visualization version   GIF version

Theorem fphpdo 40619
Description: Pigeonhole principle for sets of real numbers with implicit output reordering. (Contributed by Stefan O'Rear, 12-Sep-2014.)
Hypotheses
Ref Expression
fphpdo.1 (𝜑𝐴 ⊆ ℝ)
fphpdo.2 (𝜑𝐵 ∈ V)
fphpdo.3 (𝜑𝐵𝐴)
fphpdo.4 ((𝜑𝑧𝐴) → 𝐶𝐵)
fphpdo.5 (𝑧 = 𝑥𝐶 = 𝐷)
fphpdo.6 (𝑧 = 𝑦𝐶 = 𝐸)
Assertion
Ref Expression
fphpdo (𝜑 → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸))
Distinct variable groups:   𝜑,𝑥,𝑦,𝑧   𝑥,𝐴,𝑦,𝑧   𝑧,𝐵   𝑥,𝐶,𝑦   𝑦,𝐷,𝑧   𝑥,𝐸,𝑧
Allowed substitution hints:   𝐵(𝑥,𝑦)   𝐶(𝑧)   𝐷(𝑥)   𝐸(𝑦)

Proof of Theorem fphpdo
Dummy variables 𝑏 𝑐 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fphpdo.3 . . 3 (𝜑𝐵𝐴)
2 fphpdo.4 . . . . 5 ((𝜑𝑧𝐴) → 𝐶𝐵)
32fmpttd 6983 . . . 4 (𝜑 → (𝑧𝐴𝐶):𝐴𝐵)
43ffvelrnda 6955 . . 3 ((𝜑𝑏𝐴) → ((𝑧𝐴𝐶)‘𝑏) ∈ 𝐵)
5 fveq2 6768 . . 3 (𝑏 = 𝑐 → ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐))
61, 4, 5fphpd 40618 . 2 (𝜑 → ∃𝑏𝐴𝑐𝐴 (𝑏𝑐 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)))
7 fphpdo.1 . . . . . . . . . 10 (𝜑𝐴 ⊆ ℝ)
87sselda 3925 . . . . . . . . 9 ((𝜑𝑏𝐴) → 𝑏 ∈ ℝ)
98adantrr 713 . . . . . . . 8 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → 𝑏 ∈ ℝ)
109adantr 480 . . . . . . 7 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → 𝑏 ∈ ℝ)
117sselda 3925 . . . . . . . . 9 ((𝜑𝑐𝐴) → 𝑐 ∈ ℝ)
1211adantrl 712 . . . . . . . 8 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → 𝑐 ∈ ℝ)
1312adantr 480 . . . . . . 7 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → 𝑐 ∈ ℝ)
1410, 13lttri2d 11097 . . . . . 6 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → (𝑏𝑐 ↔ (𝑏 < 𝑐𝑐 < 𝑏)))
15 simprl 767 . . . . . . . . . . 11 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → 𝑏𝐴)
1615ad2antrr 722 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑏 < 𝑐) → 𝑏𝐴)
17 simprr 769 . . . . . . . . . . 11 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → 𝑐𝐴)
1817ad2antrr 722 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑏 < 𝑐) → 𝑐𝐴)
19 simpr 484 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑏 < 𝑐) → 𝑏 < 𝑐)
20 simplr 765 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑏 < 𝑐) → ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐))
21 breq1 5081 . . . . . . . . . . . 12 (𝑥 = 𝑏 → (𝑥 < 𝑦𝑏 < 𝑦))
22 fveqeq2 6777 . . . . . . . . . . . 12 (𝑥 = 𝑏 → (((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦) ↔ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑦)))
2321, 22anbi12d 630 . . . . . . . . . . 11 (𝑥 = 𝑏 → ((𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) ↔ (𝑏 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑦))))
24 breq2 5082 . . . . . . . . . . . 12 (𝑦 = 𝑐 → (𝑏 < 𝑦𝑏 < 𝑐))
25 fveq2 6768 . . . . . . . . . . . . 13 (𝑦 = 𝑐 → ((𝑧𝐴𝐶)‘𝑦) = ((𝑧𝐴𝐶)‘𝑐))
2625eqeq2d 2750 . . . . . . . . . . . 12 (𝑦 = 𝑐 → (((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑦) ↔ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)))
2724, 26anbi12d 630 . . . . . . . . . . 11 (𝑦 = 𝑐 → ((𝑏 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑦)) ↔ (𝑏 < 𝑐 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐))))
2823, 27rspc2ev 3572 . . . . . . . . . 10 ((𝑏𝐴𝑐𝐴 ∧ (𝑏 < 𝑐 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐))) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)))
2916, 18, 19, 20, 28syl112anc 1372 . . . . . . . . 9 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑏 < 𝑐) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)))
3029ex 412 . . . . . . . 8 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → (𝑏 < 𝑐 → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦))))
3117ad2antrr 722 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → 𝑐𝐴)
3215ad2antrr 722 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → 𝑏𝐴)
33 simpr 484 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → 𝑐 < 𝑏)
34 simplr 765 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐))
3534eqcomd 2745 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑏))
36 breq1 5081 . . . . . . . . . . . 12 (𝑥 = 𝑐 → (𝑥 < 𝑦𝑐 < 𝑦))
37 fveqeq2 6777 . . . . . . . . . . . 12 (𝑥 = 𝑐 → (((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦) ↔ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑦)))
3836, 37anbi12d 630 . . . . . . . . . . 11 (𝑥 = 𝑐 → ((𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) ↔ (𝑐 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑦))))
39 breq2 5082 . . . . . . . . . . . 12 (𝑦 = 𝑏 → (𝑐 < 𝑦𝑐 < 𝑏))
40 fveq2 6768 . . . . . . . . . . . . 13 (𝑦 = 𝑏 → ((𝑧𝐴𝐶)‘𝑦) = ((𝑧𝐴𝐶)‘𝑏))
4140eqeq2d 2750 . . . . . . . . . . . 12 (𝑦 = 𝑏 → (((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑦) ↔ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑏)))
4239, 41anbi12d 630 . . . . . . . . . . 11 (𝑦 = 𝑏 → ((𝑐 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑦)) ↔ (𝑐 < 𝑏 ∧ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑏))))
4338, 42rspc2ev 3572 . . . . . . . . . 10 ((𝑐𝐴𝑏𝐴 ∧ (𝑐 < 𝑏 ∧ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑏))) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)))
4431, 32, 33, 35, 43syl112anc 1372 . . . . . . . . 9 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)))
4544ex 412 . . . . . . . 8 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → (𝑐 < 𝑏 → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦))))
4630, 45jaod 855 . . . . . . 7 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → ((𝑏 < 𝑐𝑐 < 𝑏) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦))))
47 eqid 2739 . . . . . . . . . . . . . 14 (𝑧𝐴𝐶) = (𝑧𝐴𝐶)
48 fphpdo.5 . . . . . . . . . . . . . 14 (𝑧 = 𝑥𝐶 = 𝐷)
49 simplr 765 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → 𝑥𝐴)
50 eleq1w 2822 . . . . . . . . . . . . . . . . . 18 (𝑧 = 𝑥 → (𝑧𝐴𝑥𝐴))
5150anbi2d 628 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑥 → ((𝜑𝑧𝐴) ↔ (𝜑𝑥𝐴)))
5248eleq1d 2824 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑥 → (𝐶𝐵𝐷𝐵))
5351, 52imbi12d 344 . . . . . . . . . . . . . . . 16 (𝑧 = 𝑥 → (((𝜑𝑧𝐴) → 𝐶𝐵) ↔ ((𝜑𝑥𝐴) → 𝐷𝐵)))
5453, 2chvarvv 2005 . . . . . . . . . . . . . . 15 ((𝜑𝑥𝐴) → 𝐷𝐵)
5554adantr 480 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → 𝐷𝐵)
5647, 48, 49, 55fvmptd3 6892 . . . . . . . . . . . . 13 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → ((𝑧𝐴𝐶)‘𝑥) = 𝐷)
57 fphpdo.6 . . . . . . . . . . . . . 14 (𝑧 = 𝑦𝐶 = 𝐸)
58 simpr 484 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → 𝑦𝐴)
59 eleq1w 2822 . . . . . . . . . . . . . . . . . 18 (𝑧 = 𝑦 → (𝑧𝐴𝑦𝐴))
6059anbi2d 628 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑦 → ((𝜑𝑧𝐴) ↔ (𝜑𝑦𝐴)))
6157eleq1d 2824 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑦 → (𝐶𝐵𝐸𝐵))
6260, 61imbi12d 344 . . . . . . . . . . . . . . . 16 (𝑧 = 𝑦 → (((𝜑𝑧𝐴) → 𝐶𝐵) ↔ ((𝜑𝑦𝐴) → 𝐸𝐵)))
6362, 2chvarvv 2005 . . . . . . . . . . . . . . 15 ((𝜑𝑦𝐴) → 𝐸𝐵)
6463adantlr 711 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → 𝐸𝐵)
6547, 57, 58, 64fvmptd3 6892 . . . . . . . . . . . . 13 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → ((𝑧𝐴𝐶)‘𝑦) = 𝐸)
6656, 65eqeq12d 2755 . . . . . . . . . . . 12 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → (((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦) ↔ 𝐷 = 𝐸))
6766biimpd 228 . . . . . . . . . . 11 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → (((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦) → 𝐷 = 𝐸))
6867anim2d 611 . . . . . . . . . 10 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → ((𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) → (𝑥 < 𝑦𝐷 = 𝐸)))
6968reximdva 3204 . . . . . . . . 9 ((𝜑𝑥𝐴) → (∃𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) → ∃𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7069reximdva 3204 . . . . . . . 8 (𝜑 → (∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7170ad2antrr 722 . . . . . . 7 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → (∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7246, 71syld 47 . . . . . 6 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → ((𝑏 < 𝑐𝑐 < 𝑏) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7314, 72sylbid 239 . . . . 5 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → (𝑏𝑐 → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7473expimpd 453 . . . 4 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → ((((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐) ∧ 𝑏𝑐) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7574ancomsd 465 . . 3 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → ((𝑏𝑐 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7675rexlimdvva 3224 . 2 (𝜑 → (∃𝑏𝐴𝑐𝐴 (𝑏𝑐 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
776, 76mpd 15 1 (𝜑 → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395  wo 843   = wceq 1541  wcel 2109  wne 2944  wrex 3066  Vcvv 3430  wss 3891   class class class wbr 5078  cmpt 5161  cfv 6430  csdm 8706  cr 10854   < clt 10993
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1801  ax-4 1815  ax-5 1916  ax-6 1974  ax-7 2014  ax-8 2111  ax-9 2119  ax-10 2140  ax-11 2157  ax-12 2174  ax-ext 2710  ax-rep 5213  ax-sep 5226  ax-nul 5233  ax-pow 5291  ax-pr 5355  ax-un 7579  ax-resscn 10912  ax-pre-lttri 10929  ax-pre-lttrn 10930
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1544  df-fal 1554  df-ex 1786  df-nf 1790  df-sb 2071  df-mo 2541  df-eu 2570  df-clab 2717  df-cleq 2731  df-clel 2817  df-nfc 2890  df-ne 2945  df-nel 3051  df-ral 3070  df-rex 3071  df-reu 3072  df-rab 3074  df-v 3432  df-sbc 3720  df-csb 3837  df-dif 3894  df-un 3896  df-in 3898  df-ss 3908  df-nul 4262  df-if 4465  df-pw 4540  df-sn 4567  df-pr 4569  df-op 4573  df-uni 4845  df-iun 4931  df-br 5079  df-opab 5141  df-mpt 5162  df-id 5488  df-po 5502  df-so 5503  df-xp 5594  df-rel 5595  df-cnv 5596  df-co 5597  df-dm 5598  df-rn 5599  df-res 5600  df-ima 5601  df-iota 6388  df-fun 6432  df-fn 6433  df-f 6434  df-f1 6435  df-fo 6436  df-f1o 6437  df-fv 6438  df-er 8472  df-en 8708  df-dom 8709  df-sdom 8710  df-pnf 10995  df-mnf 10996  df-ltxr 10998
This theorem is referenced by:  irrapxlem1  40624
  Copyright terms: Public domain W3C validator