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 43622
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 7115 . . . 4 (𝜑 → (𝑧𝐴𝐶):𝐴𝐵)
43ffvelcdmda 7084 . . 3 ((𝜑𝑏𝐴) → ((𝑧𝐴𝐶)‘𝑏) ∈ 𝐵)
5 fveq2 6886 . . 3 (𝑏 = 𝑐 → ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐))
61, 4, 5fphpd 43621 . 2 (𝜑 → ∃𝑏𝐴𝑐𝐴 (𝑏𝑐 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)))
7 fphpdo.1 . . . . . . . . . 10 (𝜑𝐴 ⊆ ℝ)
87sselda 3938 . . . . . . . . 9 ((𝜑𝑏𝐴) → 𝑏 ∈ ℝ)
98adantrr 730 . . . . . . . 8 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → 𝑏 ∈ ℝ)
109adantr 486 . . . . . . 7 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → 𝑏 ∈ ℝ)
117sselda 3938 . . . . . . . . 9 ((𝜑𝑐𝐴) → 𝑐 ∈ ℝ)
1211adantrl 729 . . . . . . . 8 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → 𝑐 ∈ ℝ)
1312adantr 486 . . . . . . 7 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → 𝑐 ∈ ℝ)
1410, 13lttri2d 11369 . . . . . 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 5114 . . . . . . . . . . . 12 (𝑥 = 𝑏 → (𝑥 < 𝑦𝑏 < 𝑦))
22 fveqeq2 6895 . . . . . . . . . . . 12 (𝑥 = 𝑏 → (((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦) ↔ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑦)))
2321, 22anbi12d 644 . . . . . . . . . . 11 (𝑥 = 𝑏 → ((𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) ↔ (𝑏 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑦))))
24 breq2 5115 . . . . . . . . . . . 12 (𝑦 = 𝑐 → (𝑏 < 𝑦𝑏 < 𝑐))
25 fveq2 6886 . . . . . . . . . . . . 13 (𝑦 = 𝑐 → ((𝑧𝐴𝐶)‘𝑦) = ((𝑧𝐴𝐶)‘𝑐))
2625eqeq2d 2776 . . . . . . . . . . . 12 (𝑦 = 𝑐 → (((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑦) ↔ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)))
2724, 26anbi12d 644 . . . . . . . . . . 11 (𝑦 = 𝑐 → ((𝑏 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑦)) ↔ (𝑏 < 𝑐 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐))))
2823, 27rspc2ev 3596 . . . . . . . . . 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 2771 . . . . . . . . . 10 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑏))
36 breq1 5114 . . . . . . . . . . . 12 (𝑥 = 𝑐 → (𝑥 < 𝑦𝑐 < 𝑦))
37 fveqeq2 6895 . . . . . . . . . . . 12 (𝑥 = 𝑐 → (((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦) ↔ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑦)))
3836, 37anbi12d 644 . . . . . . . . . . 11 (𝑥 = 𝑐 → ((𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) ↔ (𝑐 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑦))))
39 breq2 5115 . . . . . . . . . . . 12 (𝑦 = 𝑏 → (𝑐 < 𝑦𝑐 < 𝑏))
40 fveq2 6886 . . . . . . . . . . . . 13 (𝑦 = 𝑏 → ((𝑧𝐴𝐶)‘𝑦) = ((𝑧𝐴𝐶)‘𝑏))
4140eqeq2d 2776 . . . . . . . . . . . 12 (𝑦 = 𝑏 → (((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑦) ↔ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑏)))
4239, 41anbi12d 644 . . . . . . . . . . 11 (𝑦 = 𝑏 → ((𝑐 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑦)) ↔ (𝑐 < 𝑏 ∧ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑏))))
4338, 42rspc2ev 3596 . . . . . . . . . 10 ((𝑐𝐴𝑏𝐴 ∧ (𝑐 < 𝑏 ∧ ((𝑧𝐴𝐶)‘𝑐) = ((𝑧𝐴𝐶)‘𝑏))) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)))
4431, 32, 33, 35, 43syl112anc 1401 . . . . . . . . 9 ((((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) ∧ 𝑐 < 𝑏) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)))
4544ex 418 . . . . . . . 8 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → (𝑐 < 𝑏 → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦))))
4630, 45jaod 873 . . . . . . 7 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → ((𝑏 < 𝑐𝑐 < 𝑏) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦))))
47 eqid 2765 . . . . . . . . . . . . . 14 (𝑧𝐴𝐶) = (𝑧𝐴𝐶)
48 fphpdo.5 . . . . . . . . . . . . . 14 (𝑧 = 𝑥𝐶 = 𝐷)
49 simplr 781 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → 𝑥𝐴)
50 eleq1w 2848 . . . . . . . . . . . . . . . . . 18 (𝑧 = 𝑥 → (𝑧𝐴𝑥𝐴))
5150anbi2d 642 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑥 → ((𝜑𝑧𝐴) ↔ (𝜑𝑥𝐴)))
5248eleq1d 2850 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑥 → (𝐶𝐵𝐷𝐵))
5351, 52imbi12d 347 . . . . . . . . . . . . . . . 16 (𝑧 = 𝑥 → (((𝜑𝑧𝐴) → 𝐶𝐵) ↔ ((𝜑𝑥𝐴) → 𝐷𝐵)))
5453, 2chvarvv 2022 . . . . . . . . . . . . . . 15 ((𝜑𝑥𝐴) → 𝐷𝐵)
5554adantr 486 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → 𝐷𝐵)
5647, 48, 49, 55fvmptd3 7018 . . . . . . . . . . . . 13 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → ((𝑧𝐴𝐶)‘𝑥) = 𝐷)
57 fphpdo.6 . . . . . . . . . . . . . 14 (𝑧 = 𝑦𝐶 = 𝐸)
58 simpr 490 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → 𝑦𝐴)
59 eleq1w 2848 . . . . . . . . . . . . . . . . . 18 (𝑧 = 𝑦 → (𝑧𝐴𝑦𝐴))
6059anbi2d 642 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑦 → ((𝜑𝑧𝐴) ↔ (𝜑𝑦𝐴)))
6157eleq1d 2850 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑦 → (𝐶𝐵𝐸𝐵))
6260, 61imbi12d 347 . . . . . . . . . . . . . . . 16 (𝑧 = 𝑦 → (((𝜑𝑧𝐴) → 𝐶𝐵) ↔ ((𝜑𝑦𝐴) → 𝐸𝐵)))
6362, 2chvarvv 2022 . . . . . . . . . . . . . . 15 ((𝜑𝑦𝐴) → 𝐸𝐵)
6463adantlr 728 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → 𝐸𝐵)
6547, 57, 58, 64fvmptd3 7018 . . . . . . . . . . . . 13 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → ((𝑧𝐴𝐶)‘𝑦) = 𝐸)
6656, 65eqeq12d 2781 . . . . . . . . . . . 12 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → (((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦) ↔ 𝐷 = 𝐸))
6766biimpd 232 . . . . . . . . . . 11 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → (((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦) → 𝐷 = 𝐸))
6867anim2d 624 . . . . . . . . . 10 (((𝜑𝑥𝐴) ∧ 𝑦𝐴) → ((𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) → (𝑥 < 𝑦𝐷 = 𝐸)))
6968reximdva 3180 . . . . . . . . 9 ((𝜑𝑥𝐴) → (∃𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) → ∃𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7069reximdva 3180 . . . . . . . 8 (𝜑 → (∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7170ad2antrr 739 . . . . . . 7 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → (∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦 ∧ ((𝑧𝐴𝐶)‘𝑥) = ((𝑧𝐴𝐶)‘𝑦)) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7246, 71syld 48 . . . . . 6 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → ((𝑏 < 𝑐𝑐 < 𝑏) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7314, 72sylbid 243 . . . . 5 (((𝜑 ∧ (𝑏𝐴𝑐𝐴)) ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → (𝑏𝑐 → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7473expimpd 459 . . . 4 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → ((((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐) ∧ 𝑏𝑐) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7574ancomsd 471 . . 3 ((𝜑 ∧ (𝑏𝐴𝑐𝐴)) → ((𝑏𝑐 ∧ ((𝑧𝐴𝐶)‘𝑏) = ((𝑧𝐴𝐶)‘𝑐)) → ∃𝑥𝐴𝑦𝐴 (𝑥 < 𝑦𝐷 = 𝐸)))
7675rexlimdvva 3224 . 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 2960  wrex 3091  Vcvv 3457  wss 3906   class class class wbr 5111  cmpt 5194  cfv 6541  csdm 8949  cr 11119   < clt 11263
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 2737  ax-rep 5240  ax-sep 5259  ax-nul 5271  ax-pow 5338  ax-pr 5406  ax-un 7743  ax-resscn 11177  ax-pre-lttri 11194  ax-pre-lttrn 11195
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 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-nel 3067  df-ral 3082  df-rex 3092  df-reu 3372  df-rab 3419  df-v 3459  df-sbc 3747  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-nul 4287  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4875  df-iun 4960  df-br 5112  df-opab 5176  df-mpt 5195  df-id 5558  df-po 5571  df-so 5572  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-iota 6497  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fo 6547  df-f1o 6548  df-fv 6549  df-er 8701  df-en 8951  df-dom 8952  df-sdom 8953  df-pnf 11265  df-mnf 11266  df-ltxr 11268
This theorem is used by:  irrapxlem1  43627
  Copyright terms: Public domain W3C validator