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 43584
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 7117 . . . 4 (𝜑 → (𝑧𝐴𝐶):𝐴𝐵)
43ffvelcdmda 7086 . . 3 ((𝜑𝑏𝐴) → ((𝑧𝐴𝐶)‘𝑏) ∈ 𝐵)
5 fveq2 6888 . . 3 (𝑏 = 𝑐 → ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐))
61, 4, 5fphpd 43583 . 2 (𝜑 → ∃𝑏𝐴𝑐𝐴 (𝑏𝑐 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)))
7 fphpdo.1 . . . . . . . . . 10 (𝜑𝐴 ⊆ ℝ)
87sselda 3940 . . . . . . . . 9 ((𝜑𝑏𝐴) → 𝑏 ∈ ℝ)
98adantrr 730 . . . . . . . 8 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → 𝑏 ∈ ℝ)
109adantr 486 . . . . . . 7 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → 𝑏 ∈ ℝ)
117sselda 3940 . . . . . . . . 9 ((𝜑𝑐𝐴) → 𝑐 ∈ ℝ)
1211adantrl 729 . . . . . . . 8 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → 𝑐 ∈ ℝ)
1312adantr 486 . . . . . . 7 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → 𝑐 ∈ ℝ)
1410, 13lttri2d 11367 . . . . . 6 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → (𝑏𝑐 ↔ (𝑏 < 𝑐𝑐 < 𝑏)))
15 simprl 783 . . . . . . . . . . 11 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → 𝑏𝐴)
1615ad2antrr 739 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑏 < 𝑐) → 𝑏𝐴)
17 simprr 785 . . . . . . . . . . 11 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → 𝑐𝐴)
1817ad2antrr 739 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑏 < 𝑐) → 𝑐𝐴)
19 simpr 490 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑏 < 𝑐) → 𝑏 < 𝑐)
20 simplr 781 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑏 < 𝑐) → ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐))
21 breq1 5117 . . . . . . . . . . . 12 (𝑥 = 𝑏 → (𝑥 < 𝑦𝑏 < 𝑦))
22 fveqeq2 6897 . . . . . . . . . . . 12 (𝑥 = 𝑏 → (((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦) ↔ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑦)))
2321, 22anbi12d 644 . . . . . . . . . . 11 (𝑥 = 𝑏 → ((𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) ↔ (𝑏 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑦))))
24 breq2 5118 . . . . . . . . . . . 12 (𝑦 = 𝑐 → (𝑏 < 𝑦𝑏 < 𝑐))
25 fveq2 6888 . . . . . . . . . . . . 13 (𝑦 = 𝑐 → ((𝑧𝐴𝐶)‘𝑦) = ((𝑧𝐴𝐶)‘𝑐))
2625eqeq2d 2777 . . . . . . . . . . . 12 (𝑦 = 𝑐 → (((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑦) ↔ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)))
2724, 26anbi12d 644 . . . . . . . . . . 11 (𝑦 = 𝑐 → ((𝑏 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑦)) ↔ (𝑏 < 𝑐 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐))))
2823, 27rspc2ev 3597 . . . . . . . . . 10 ((𝑏𝐴𝑐𝐴 ∧ (𝑏 < 𝑐 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐))) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)))
2916, 18, 19, 20, 28syl112anc 1401 . . . . . . . . 9 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑏 < 𝑐) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)))
3029ex 418 . . . . . . . 8 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → (𝑏 < 𝑐 → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦))))
3117ad2antrr 739 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → 𝑐𝐴)
3215ad2antrr 739 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → 𝑏𝐴)
33 simpr 490 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → 𝑐 < 𝑏)
34 simplr 781 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐))
3534eqcomd 2772 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑏))
36 breq1 5117 . . . . . . . . . . . 12 (𝑥 = 𝑐 → (𝑥 < 𝑦𝑐 < 𝑦))
37 fveqeq2 6897 . . . . . . . . . . . 12 (𝑥 = 𝑐 → (((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦) ↔ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑦)))
3836, 37anbi12d 644 . . . . . . . . . . 11 (𝑥 = 𝑐 → ((𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) ↔ (𝑐 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑦))))
39 breq2 5118 . . . . . . . . . . . 12 (𝑦 = 𝑏 → (𝑐 < 𝑦𝑐 < 𝑏))
40 fveq2 6888 . . . . . . . . . . . . 13 (𝑦 = 𝑏 → ((𝑧𝐴𝐶)‘𝑦) = ((𝑧𝐴𝐶)‘𝑏))
4140eqeq2d 2777 . . . . . . . . . . . 12 (𝑦 = 𝑏 → (((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑦) ↔ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑏)))
4239, 41anbi12d 644 . . . . . . . . . . 11 (𝑦 = 𝑏 → ((𝑐 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑦)) ↔ (𝑐 < 𝑏 ∧ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑏))))
4338, 42rspc2ev 3597 . . . . . . . . . 10 ((𝑐𝐴𝑏𝐴 ∧ (𝑐 < 𝑏 ∧ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑏))) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)))
4431, 32, 33, 35, 43syl112anc 1401 . . . . . . . . 9 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)))
4544ex 418 . . . . . . . 8 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → (𝑐 < 𝑏 → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦))))
4630, 45jaod 873 . . . . . . 7 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → ((𝑏 < 𝑐𝑐 < 𝑏) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦))))
47 eqid 2766 . . . . . . . . . . . . . 14 (𝑧𝐴𝐶) = (𝑧𝐴𝐶)
48 fphpdo.5 . . . . . . . . . . . . . 14 (𝑧 = 𝑥𝐶 = 𝐷)
49 simplr 781 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → 𝑥𝐴)
50 eleq1w 2849 . . . . . . . . . . . . . . . . . 18 (𝑧 = 𝑥 → (𝑧𝐴𝑥𝐴))
5150anbi2d 642 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑥 → ((𝜑𝑧𝐴) ↔ (𝜑𝑥𝐴)))
5248eleq1d 2851 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑥 → (𝐶𝐵𝐷𝐵))
5351, 52imbi12d 347 . . . . . . . . . . . . . . . 16 (𝑧 = 𝑥 → (((𝜑𝑧𝐴) → 𝐶𝐵) ↔ ((𝜑𝑥𝐴) → 𝐷𝐵)))
5453, 2chvarvv 2022 . . . . . . . . . . . . . . 15 ((𝜑𝑥𝐴) → 𝐷𝐵)
5554adantr 486 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → 𝐷𝐵)
5647, 48, 49, 55fvmptd3 7020 . . . . . . . . . . . . 13 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → ((𝑧𝐴𝐶)‘𝑥) = 𝐷)
57 fphpdo.6 . . . . . . . . . . . . . 14 (𝑧 = 𝑦𝐶 = 𝐸)
58 simpr 490 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → 𝑦𝐴)
59 eleq1w 2849 . . . . . . . . . . . . . . . . . 18 (𝑧 = 𝑦 → (𝑧𝐴𝑦𝐴))
6059anbi2d 642 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑦 → ((𝜑𝑧𝐴) ↔ (𝜑𝑦𝐴)))
6157eleq1d 2851 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑦 → (𝐶𝐵𝐸𝐵))
6260, 61imbi12d 347 . . . . . . . . . . . . . . . 16 (𝑧 = 𝑦 → (((𝜑𝑧𝐴) → 𝐶𝐵) ↔ ((𝜑𝑦𝐴) → 𝐸𝐵)))
6362, 2chvarvv 2022 . . . . . . . . . . . . . . 15 ((𝜑𝑦𝐴) → 𝐸𝐵)
6463adantlr 728 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → 𝐸𝐵)
6547, 57, 58, 64fvmptd3 7020 . . . . . . . . . . . . 13 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → ((𝑧𝐴𝐶)‘𝑦) = 𝐸)
6656, 65eqeq12d 2782 . . . . . . . . . . . 12 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → (((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦) ↔ 𝐷 = 𝐸))
6766biimpd 232 . . . . . . . . . . 11 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → (((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦) → 𝐷 = 𝐸))
6867anim2d 624 . . . . . . . . . 10 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → ((𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) → (𝑥 < 𝑦𝐷 = 𝐸)))
6968reximdva 3181 . . . . . . . . 9 ((𝜑𝑥𝐴) → (∃𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) → ∃𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7069reximdva 3181 . . . . . . . 8 (𝜑 → (∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7170ad2antrr 739 . . . . . . 7 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → (∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7246, 71syld 48 . . . . . 6 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → ((𝑏 < 𝑐𝑐 < 𝑏) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7314, 72sylbid 243 . . . . 5 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → (𝑏𝑐 → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7473expimpd 459 . . . 4 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → ((((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐) ∧ 𝑏𝑐) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7574ancomsd 471 . . 3 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → ((𝑏𝑐 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7675rexlimdvva 3225 . 2 (𝜑 → (∃𝑏𝐴𝑐𝐴 (𝑏𝑐 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
776, 76mpd 16 1 (𝜑 → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wa 401  wo 861   = wceq 1570  wcel 2146  wne 2961  wrex 3092  Vcvv 3458  wss 3908   class class class wbr 5114  cmpt 5197  cfv 6543  csdm 8951  cr 11117   < clt 11261
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2738  ax-rep 5243  ax-sep 5262  ax-nul 5274  ax-pow 5341  ax-pr 5409  ax-un 7745  ax-resscn 11175  ax-pre-lttri 11192  ax-pre-lttrn 11193
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2570  df-eu 2600  df-clab 2745  df-cleq 2758  df-clel 2841  df-nfc 2915  df-ne 2962  df-nel 3068  df-ral 3083  df-rex 3093  df-reu 3373  df-rab 3420  df-v 3460  df-sbc 3748  df-csb 3857  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-nul 4290  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4878  df-iun 4963  df-br 5115  df-opab 5179  df-mpt 5198  df-id 5561  df-po 5574  df-so 5575  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-iota 6499  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-er 8703  df-en 8953  df-dom 8954  df-sdom 8955  df-pnf 11263  df-mnf 11264  df-ltxr 11266
This theorem is used by:  irrapxlem1  43589
  Copyright terms: Public domain W3C validator