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 43399
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 7098 . . . 4 (𝜑 → (𝑧𝐴𝐶):𝐴𝐵)
43ffvelcdmda 7067 . . 3 ((𝜑𝑏𝐴) → ((𝑧𝐴𝐶)‘𝑏) ∈ 𝐵)
5 fveq2 6869 . . 3 (𝑏 = 𝑐 → ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐))
61, 4, 5fphpd 43398 . 2 (𝜑 → ∃𝑏𝐴𝑐𝐴 (𝑏𝑐 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)))
7 fphpdo.1 . . . . . . . . . 10 (𝜑𝐴 ⊆ ℝ)
87sselda 3938 . . . . . . . . 9 ((𝜑𝑏𝐴) → 𝑏 ∈ ℝ)
98adantrr 727 . . . . . . . 8 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → 𝑏 ∈ ℝ)
109adantr 484 . . . . . . 7 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → 𝑏 ∈ ℝ)
117sselda 3938 . . . . . . . . 9 ((𝜑𝑐𝐴) → 𝑐 ∈ ℝ)
1211adantrl 726 . . . . . . . 8 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → 𝑐 ∈ ℝ)
1312adantr 484 . . . . . . 7 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → 𝑐 ∈ ℝ)
1410, 13lttri2d 11324 . . . . . 6 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → (𝑏𝑐 ↔ (𝑏 < 𝑐𝑐 < 𝑏)))
15 simprl 780 . . . . . . . . . . 11 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → 𝑏𝐴)
1615ad2antrr 736 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑏 < 𝑐) → 𝑏𝐴)
17 simprr 782 . . . . . . . . . . 11 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → 𝑐𝐴)
1817ad2antrr 736 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑏 < 𝑐) → 𝑐𝐴)
19 simpr 488 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑏 < 𝑐) → 𝑏 < 𝑐)
20 simplr 778 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑏 < 𝑐) → ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐))
21 breq1 5105 . . . . . . . . . . . 12 (𝑥 = 𝑏 → (𝑥 < 𝑦𝑏 < 𝑦))
22 fveqeq2 6878 . . . . . . . . . . . 12 (𝑥 = 𝑏 → (((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦) ↔ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑦)))
2321, 22anbi12d 641 . . . . . . . . . . 11 (𝑥 = 𝑏 → ((𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) ↔ (𝑏 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑦))))
24 breq2 5106 . . . . . . . . . . . 12 (𝑦 = 𝑐 → (𝑏 < 𝑦𝑏 < 𝑐))
25 fveq2 6869 . . . . . . . . . . . . 13 (𝑦 = 𝑐 → ((𝑧𝐴𝐶)‘𝑦) = ((𝑧𝐴𝐶)‘𝑐))
2625eqeq2d 2775 . . . . . . . . . . . 12 (𝑦 = 𝑐 → (((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑦) ↔ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)))
2724, 26anbi12d 641 . . . . . . . . . . 11 (𝑦 = 𝑐 → ((𝑏 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑦)) ↔ (𝑏 < 𝑐 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐))))
2823, 27rspc2ev 3596 . . . . . . . . . 10 ((𝑏𝐴𝑐𝐴 ∧ (𝑏 < 𝑐 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐))) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)))
2916, 18, 19, 20, 28syl112anc 1395 . . . . . . . . 9 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑏 < 𝑐) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)))
3029ex 416 . . . . . . . 8 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → (𝑏 < 𝑐 → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦))))
3117ad2antrr 736 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → 𝑐𝐴)
3215ad2antrr 736 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → 𝑏𝐴)
33 simpr 488 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → 𝑐 < 𝑏)
34 simplr 778 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐))
3534eqcomd 2770 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑏))
36 breq1 5105 . . . . . . . . . . . 12 (𝑥 = 𝑐 → (𝑥 < 𝑦𝑐 < 𝑦))
37 fveqeq2 6878 . . . . . . . . . . . 12 (𝑥 = 𝑐 → (((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦) ↔ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑦)))
3836, 37anbi12d 641 . . . . . . . . . . 11 (𝑥 = 𝑐 → ((𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) ↔ (𝑐 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑦))))
39 breq2 5106 . . . . . . . . . . . 12 (𝑦 = 𝑏 → (𝑐 < 𝑦𝑐 < 𝑏))
40 fveq2 6869 . . . . . . . . . . . . 13 (𝑦 = 𝑏 → ((𝑧𝐴𝐶)‘𝑦) = ((𝑧𝐴𝐶)‘𝑏))
4140eqeq2d 2775 . . . . . . . . . . . 12 (𝑦 = 𝑏 → (((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑦) ↔ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑏)))
4239, 41anbi12d 641 . . . . . . . . . . 11 (𝑦 = 𝑏 → ((𝑐 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑦)) ↔ (𝑐 < 𝑏 ∧ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑏))))
4338, 42rspc2ev 3596 . . . . . . . . . 10 ((𝑐𝐴𝑏𝐴 ∧ (𝑐 < 𝑏 ∧ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑏))) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)))
4431, 32, 33, 35, 43syl112anc 1395 . . . . . . . . 9 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)))
4544ex 416 . . . . . . . 8 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → (𝑐 < 𝑏 → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦))))
4630, 45jaod 870 . . . . . . 7 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → ((𝑏 < 𝑐𝑐 < 𝑏) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦))))
47 eqid 2764 . . . . . . . . . . . . . 14 (𝑧𝐴𝐶) = (𝑧𝐴𝐶)
48 fphpdo.5 . . . . . . . . . . . . . 14 (𝑧 = 𝑥𝐶 = 𝐷)
49 simplr 778 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → 𝑥𝐴)
50 eleq1w 2847 . . . . . . . . . . . . . . . . . 18 (𝑧 = 𝑥 → (𝑧𝐴𝑥𝐴))
5150anbi2d 639 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑥 → ((𝜑𝑧𝐴) ↔ (𝜑𝑥𝐴)))
5248eleq1d 2849 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑥 → (𝐶𝐵𝐷𝐵))
5351, 52imbi12d 346 . . . . . . . . . . . . . . . 16 (𝑧 = 𝑥 → (((𝜑𝑧𝐴) → 𝐶𝐵) ↔ ((𝜑𝑥𝐴) → 𝐷𝐵)))
5453, 2chvarvv 2011 . . . . . . . . . . . . . . 15 ((𝜑𝑥𝐴) → 𝐷𝐵)
5554adantr 484 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → 𝐷𝐵)
5647, 48, 49, 55fvmptd3 7001 . . . . . . . . . . . . 13 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → ((𝑧𝐴𝐶)‘𝑥) = 𝐷)
57 fphpdo.6 . . . . . . . . . . . . . 14 (𝑧 = 𝑦𝐶 = 𝐸)
58 simpr 488 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → 𝑦𝐴)
59 eleq1w 2847 . . . . . . . . . . . . . . . . . 18 (𝑧 = 𝑦 → (𝑧𝐴𝑦𝐴))
6059anbi2d 639 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑦 → ((𝜑𝑧𝐴) ↔ (𝜑𝑦𝐴)))
6157eleq1d 2849 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑦 → (𝐶𝐵𝐸𝐵))
6260, 61imbi12d 346 . . . . . . . . . . . . . . . 16 (𝑧 = 𝑦 → (((𝜑𝑧𝐴) → 𝐶𝐵) ↔ ((𝜑𝑦𝐴) → 𝐸𝐵)))
6362, 2chvarvv 2011 . . . . . . . . . . . . . . 15 ((𝜑𝑦𝐴) → 𝐸𝐵)
6463adantlr 725 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → 𝐸𝐵)
6547, 57, 58, 64fvmptd3 7001 . . . . . . . . . . . . 13 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → ((𝑧𝐴𝐶)‘𝑦) = 𝐸)
6656, 65eqeq12d 2780 . . . . . . . . . . . 12 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → (((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦) ↔ 𝐷 = 𝐸))
6766biimpd 231 . . . . . . . . . . 11 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → (((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦) → 𝐷 = 𝐸))
6867anim2d 621 . . . . . . . . . 10 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → ((𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) → (𝑥 < 𝑦𝐷 = 𝐸)))
6968reximdva 3177 . . . . . . . . 9 ((𝜑𝑥𝐴) → (∃𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) → ∃𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7069reximdva 3177 . . . . . . . 8 (𝜑 → (∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7170ad2antrr 736 . . . . . . 7 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → (∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7246, 71syld 47 . . . . . 6 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → ((𝑏 < 𝑐𝑐 < 𝑏) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7314, 72sylbid 242 . . . . 5 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → (𝑏𝑐 → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7473expimpd 457 . . . 4 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → ((((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐) ∧ 𝑏𝑐) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7574ancomsd 469 . . 3 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → ((𝑏𝑐 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7675rexlimdvva 3221 . 2 (𝜑 → (∃𝑏𝐴𝑐𝐴 (𝑏𝑐 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
776, 76mpd 15 1 (𝜑 → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 399  wo 858   = wceq 1562  wcel 2144  wne 2959  wrex 3088  Vcvv 3456  wss 3906   class class class wbr 5102  cmpt 5183  cfv 6523  csdm 8928  cr 11074   < clt 11218
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1817  ax-4 1831  ax-5 1932  ax-6 1989  ax-7 2030  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2214  ax-ext 2736  ax-rep 5229  ax-sep 5248  ax-nul 5258  ax-pow 5324  ax-pr 5392  ax-un 7720  ax-resscn 11132  ax-pre-lttri 11149  ax-pre-lttrn 11150
This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1100  df-3an 1101  df-tru 1565  df-fal 1575  df-ex 1802  df-nf 1806  df-sb 2093  df-mo 2568  df-eu 2598  df-clab 2743  df-cleq 2756  df-clel 2839  df-nfc 2913  df-ne 2960  df-nel 3064  df-ral 3079  df-rex 3089  df-reu 3370  df-rab 3417  df-v 3458  df-sbc 3747  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-nul 4288  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-iun 4953  df-br 5103  df-opab 5165  df-mpt 5184  df-id 5544  df-po 5557  df-so 5558  df-xp 5655  df-rel 5656  df-cnv 5657  df-co 5658  df-dm 5659  df-rn 5660  df-res 5661  df-ima 5662  df-iota 6479  df-fun 6525  df-fn 6526  df-f 6527  df-f1 6528  df-fo 6529  df-f1o 6530  df-fv 6531  df-er 8680  df-en 8930  df-dom 8931  df-sdom 8932  df-pnf 11220  df-mnf 11221  df-ltxr 11223
This theorem is referenced by:  irrapxlem1  43404
  Copyright terms: Public domain W3C validator