ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  suplocexprlemloc GIF version

Theorem suplocexprlemloc 7834
Description: Lemma for suplocexpr 7838. The putative supremum is located. (Contributed by Jim Kingdon, 9-Jan-2024.)
Hypotheses
Ref Expression
suplocexpr.m (𝜑 → ∃𝑥 𝑥𝐴)
suplocexpr.ub (𝜑 → ∃𝑥P𝑦𝐴 𝑦<P 𝑥)
suplocexpr.loc (𝜑 → ∀𝑥P𝑦P (𝑥<P 𝑦 → (∃𝑧𝐴 𝑥<P 𝑧 ∨ ∀𝑧𝐴 𝑧<P 𝑦)))
suplocexpr.b 𝐵 = ⟨ (1st𝐴), {𝑢Q ∣ ∃𝑤 (2nd𝐴)𝑤 <Q 𝑢}⟩
Assertion
Ref Expression
suplocexprlemloc (𝜑 → ∀𝑞Q𝑟Q (𝑞 <Q 𝑟 → (𝑞 (1st𝐴) ∨ 𝑟 ∈ (2nd𝐵))))
Distinct variable groups:   𝑢,𝐴,𝑧,𝑤   𝑥,𝐴,𝑦,𝑢,𝑧   𝑢,𝑞,𝑧,𝑤   𝑥,𝑞,𝑦,𝜑   𝜑,𝑟,𝑤,𝑞   𝜑,𝑧,𝑥,𝑦   𝑢,𝑟
Allowed substitution hints:   𝜑(𝑢)   𝐴(𝑟,𝑞)   𝐵(𝑥,𝑦,𝑧,𝑤,𝑢,𝑟,𝑞)

Proof of Theorem suplocexprlemloc
Dummy variables 𝑠 𝑡 𝑣 𝑙 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simpr 110 . . . . 5 (((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) → 𝑞 <Q 𝑟)
2 ltbtwnnqq 7528 . . . . 5 (𝑞 <Q 𝑟 ↔ ∃𝑣Q (𝑞 <Q 𝑣𝑣 <Q 𝑟))
31, 2sylib 122 . . . 4 (((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) → ∃𝑣Q (𝑞 <Q 𝑣𝑣 <Q 𝑟))
4 simplll 533 . . . . . . 7 ((((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) ∧ (𝑣Q ∧ (𝑞 <Q 𝑣𝑣 <Q 𝑟))) → 𝜑)
5 simprl 529 . . . . . . . 8 ((𝜑 ∧ (𝑞Q𝑟Q)) → 𝑞Q)
65ad2antrr 488 . . . . . . 7 ((((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) ∧ (𝑣Q ∧ (𝑞 <Q 𝑣𝑣 <Q 𝑟))) → 𝑞Q)
7 simprl 529 . . . . . . 7 ((((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) ∧ (𝑣Q ∧ (𝑞 <Q 𝑣𝑣 <Q 𝑟))) → 𝑣Q)
84, 6, 7jca32 310 . . . . . 6 ((((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) ∧ (𝑣Q ∧ (𝑞 <Q 𝑣𝑣 <Q 𝑟))) → (𝜑 ∧ (𝑞Q𝑣Q)))
9 simprrl 539 . . . . . 6 ((((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) ∧ (𝑣Q ∧ (𝑞 <Q 𝑣𝑣 <Q 𝑟))) → 𝑞 <Q 𝑣)
10 ltnqpri 7707 . . . . . . . . 9 (𝑞 <Q 𝑣 → ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩)
1110adantl 277 . . . . . . . 8 (((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) → ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩)
12 breq2 4048 . . . . . . . . . 10 (𝑦 = ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩ → (⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑦 ↔ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩))
13 breq2 4048 . . . . . . . . . . . 12 (𝑦 = ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩ → (𝑧<P 𝑦𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩))
1413ralbidv 2506 . . . . . . . . . . 11 (𝑦 = ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩ → (∀𝑧𝐴 𝑧<P 𝑦 ↔ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩))
1514orbi2d 792 . . . . . . . . . 10 (𝑦 = ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩ → ((∃𝑧𝐴 ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧 ∨ ∀𝑧𝐴 𝑧<P 𝑦) ↔ (∃𝑧𝐴 ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧 ∨ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩)))
1612, 15imbi12d 234 . . . . . . . . 9 (𝑦 = ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩ → ((⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑦 → (∃𝑧𝐴 ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧 ∨ ∀𝑧𝐴 𝑧<P 𝑦)) ↔ (⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩ → (∃𝑧𝐴 ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧 ∨ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩))))
17 breq1 4047 . . . . . . . . . . . 12 (𝑥 = ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩ → (𝑥<P 𝑦 ↔ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑦))
18 breq1 4047 . . . . . . . . . . . . . 14 (𝑥 = ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩ → (𝑥<P 𝑧 ↔ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧))
1918rexbidv 2507 . . . . . . . . . . . . 13 (𝑥 = ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩ → (∃𝑧𝐴 𝑥<P 𝑧 ↔ ∃𝑧𝐴 ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧))
2019orbi1d 793 . . . . . . . . . . . 12 (𝑥 = ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩ → ((∃𝑧𝐴 𝑥<P 𝑧 ∨ ∀𝑧𝐴 𝑧<P 𝑦) ↔ (∃𝑧𝐴 ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧 ∨ ∀𝑧𝐴 𝑧<P 𝑦)))
2117, 20imbi12d 234 . . . . . . . . . . 11 (𝑥 = ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩ → ((𝑥<P 𝑦 → (∃𝑧𝐴 𝑥<P 𝑧 ∨ ∀𝑧𝐴 𝑧<P 𝑦)) ↔ (⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑦 → (∃𝑧𝐴 ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧 ∨ ∀𝑧𝐴 𝑧<P 𝑦))))
2221ralbidv 2506 . . . . . . . . . 10 (𝑥 = ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩ → (∀𝑦P (𝑥<P 𝑦 → (∃𝑧𝐴 𝑥<P 𝑧 ∨ ∀𝑧𝐴 𝑧<P 𝑦)) ↔ ∀𝑦P (⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑦 → (∃𝑧𝐴 ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧 ∨ ∀𝑧𝐴 𝑧<P 𝑦))))
23 suplocexpr.loc . . . . . . . . . . 11 (𝜑 → ∀𝑥P𝑦P (𝑥<P 𝑦 → (∃𝑧𝐴 𝑥<P 𝑧 ∨ ∀𝑧𝐴 𝑧<P 𝑦)))
2423ad2antrr 488 . . . . . . . . . 10 (((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) → ∀𝑥P𝑦P (𝑥<P 𝑦 → (∃𝑧𝐴 𝑥<P 𝑧 ∨ ∀𝑧𝐴 𝑧<P 𝑦)))
25 simplrl 535 . . . . . . . . . . 11 (((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) → 𝑞Q)
26 nqprlu 7660 . . . . . . . . . . 11 (𝑞Q → ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩ ∈ P)
2725, 26syl 14 . . . . . . . . . 10 (((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) → ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩ ∈ P)
2822, 24, 27rspcdva 2882 . . . . . . . . 9 (((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) → ∀𝑦P (⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑦 → (∃𝑧𝐴 ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧 ∨ ∀𝑧𝐴 𝑧<P 𝑦)))
29 simplrr 536 . . . . . . . . . 10 (((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) → 𝑣Q)
30 nqprlu 7660 . . . . . . . . . 10 (𝑣Q → ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩ ∈ P)
3129, 30syl 14 . . . . . . . . 9 (((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) → ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩ ∈ P)
3216, 28, 31rspcdva 2882 . . . . . . . 8 (((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) → (⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩ → (∃𝑧𝐴 ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧 ∨ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩)))
3311, 32mpd 13 . . . . . . 7 (((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) → (∃𝑧𝐴 ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧 ∨ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩))
34 simpr 110 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) → ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧)
3527ad2antrr 488 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) → ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩ ∈ P)
36 suplocexpr.m . . . . . . . . . . . . . . . 16 (𝜑 → ∃𝑥 𝑥𝐴)
37 suplocexpr.ub . . . . . . . . . . . . . . . 16 (𝜑 → ∃𝑥P𝑦𝐴 𝑦<P 𝑥)
3836, 37, 23suplocexprlemss 7828 . . . . . . . . . . . . . . 15 (𝜑𝐴P)
3938ad4antr 494 . . . . . . . . . . . . . 14 (((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) → 𝐴P)
40 simplr 528 . . . . . . . . . . . . . 14 (((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) → 𝑧𝐴)
4139, 40sseldd 3194 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) → 𝑧P)
42 ltdfpr 7619 . . . . . . . . . . . . 13 ((⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩ ∈ P𝑧P) → (⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧 ↔ ∃𝑤Q (𝑤 ∈ (2nd ‘⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩) ∧ 𝑤 ∈ (1st𝑧))))
4335, 41, 42syl2anc 411 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) → (⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧 ↔ ∃𝑤Q (𝑤 ∈ (2nd ‘⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩) ∧ 𝑤 ∈ (1st𝑧))))
4434, 43mpbid 147 . . . . . . . . . . 11 (((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) → ∃𝑤Q (𝑤 ∈ (2nd ‘⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩) ∧ 𝑤 ∈ (1st𝑧)))
45 vex 2775 . . . . . . . . . . . . . 14 𝑤 ∈ V
46 breq2 4048 . . . . . . . . . . . . . 14 (𝑢 = 𝑤 → (𝑞 <Q 𝑢𝑞 <Q 𝑤))
47 ltnqex 7662 . . . . . . . . . . . . . . 15 {𝑙𝑙 <Q 𝑞} ∈ V
48 gtnqex 7663 . . . . . . . . . . . . . . 15 {𝑢𝑞 <Q 𝑢} ∈ V
4947, 48op2nd 6233 . . . . . . . . . . . . . 14 (2nd ‘⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩) = {𝑢𝑞 <Q 𝑢}
5045, 46, 49elab2 2921 . . . . . . . . . . . . 13 (𝑤 ∈ (2nd ‘⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩) ↔ 𝑞 <Q 𝑤)
5150anbi1i 458 . . . . . . . . . . . 12 ((𝑤 ∈ (2nd ‘⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩) ∧ 𝑤 ∈ (1st𝑧)) ↔ (𝑞 <Q 𝑤𝑤 ∈ (1st𝑧)))
5251rexbii 2513 . . . . . . . . . . 11 (∃𝑤Q (𝑤 ∈ (2nd ‘⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩) ∧ 𝑤 ∈ (1st𝑧)) ↔ ∃𝑤Q (𝑞 <Q 𝑤𝑤 ∈ (1st𝑧)))
5344, 52sylib 122 . . . . . . . . . 10 (((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) → ∃𝑤Q (𝑞 <Q 𝑤𝑤 ∈ (1st𝑧)))
54 simpllr 534 . . . . . . . . . . . . . 14 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) ∧ (𝑤Q ∧ (𝑞 <Q 𝑤𝑤 ∈ (1st𝑧)))) → 𝑧𝐴)
55 simprrl 539 . . . . . . . . . . . . . . 15 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) ∧ (𝑤Q ∧ (𝑞 <Q 𝑤𝑤 ∈ (1st𝑧)))) → 𝑞 <Q 𝑤)
5641adantr 276 . . . . . . . . . . . . . . . . 17 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) ∧ (𝑤Q ∧ (𝑞 <Q 𝑤𝑤 ∈ (1st𝑧)))) → 𝑧P)
57 prop 7588 . . . . . . . . . . . . . . . . 17 (𝑧P → ⟨(1st𝑧), (2nd𝑧)⟩ ∈ P)
5856, 57syl 14 . . . . . . . . . . . . . . . 16 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) ∧ (𝑤Q ∧ (𝑞 <Q 𝑤𝑤 ∈ (1st𝑧)))) → ⟨(1st𝑧), (2nd𝑧)⟩ ∈ P)
59 simprrr 540 . . . . . . . . . . . . . . . 16 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) ∧ (𝑤Q ∧ (𝑞 <Q 𝑤𝑤 ∈ (1st𝑧)))) → 𝑤 ∈ (1st𝑧))
60 prcdnql 7597 . . . . . . . . . . . . . . . 16 ((⟨(1st𝑧), (2nd𝑧)⟩ ∈ P𝑤 ∈ (1st𝑧)) → (𝑞 <Q 𝑤𝑞 ∈ (1st𝑧)))
6158, 59, 60syl2anc 411 . . . . . . . . . . . . . . 15 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) ∧ (𝑤Q ∧ (𝑞 <Q 𝑤𝑤 ∈ (1st𝑧)))) → (𝑞 <Q 𝑤𝑞 ∈ (1st𝑧)))
6255, 61mpd 13 . . . . . . . . . . . . . 14 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) ∧ (𝑤Q ∧ (𝑞 <Q 𝑤𝑤 ∈ (1st𝑧)))) → 𝑞 ∈ (1st𝑧))
6354, 62jca 306 . . . . . . . . . . . . 13 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) ∧ (𝑤Q ∧ (𝑞 <Q 𝑤𝑤 ∈ (1st𝑧)))) → (𝑧𝐴𝑞 ∈ (1st𝑧)))
646319.8ad 1614 . . . . . . . . . . . 12 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) ∧ (𝑤Q ∧ (𝑞 <Q 𝑤𝑤 ∈ (1st𝑧)))) → ∃𝑧(𝑧𝐴𝑞 ∈ (1st𝑧)))
65 df-rex 2490 . . . . . . . . . . . 12 (∃𝑧𝐴 𝑞 ∈ (1st𝑧) ↔ ∃𝑧(𝑧𝐴𝑞 ∈ (1st𝑧)))
6664, 65sylibr 134 . . . . . . . . . . 11 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) ∧ (𝑤Q ∧ (𝑞 <Q 𝑤𝑤 ∈ (1st𝑧)))) → ∃𝑧𝐴 𝑞 ∈ (1st𝑧))
67 suplocexprlemell 7826 . . . . . . . . . . 11 (𝑞 (1st𝐴) ↔ ∃𝑧𝐴 𝑞 ∈ (1st𝑧))
6866, 67sylibr 134 . . . . . . . . . 10 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) ∧ (𝑤Q ∧ (𝑞 <Q 𝑤𝑤 ∈ (1st𝑧)))) → 𝑞 (1st𝐴))
6953, 68rexlimddv 2628 . . . . . . . . 9 (((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ 𝑧𝐴) ∧ ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧) → 𝑞 (1st𝐴))
7069rexlimdva2 2626 . . . . . . . 8 (((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) → (∃𝑧𝐴 ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧𝑞 (1st𝐴)))
71 fo2nd 6244 . . . . . . . . . . . . . . 15 2nd :V–onto→V
72 fofun 5499 . . . . . . . . . . . . . . 15 (2nd :V–onto→V → Fun 2nd )
7371, 72ax-mp 5 . . . . . . . . . . . . . 14 Fun 2nd
74 fvelima 5630 . . . . . . . . . . . . . 14 ((Fun 2nd𝑠 ∈ (2nd𝐴)) → ∃𝑡𝐴 (2nd𝑡) = 𝑠)
7573, 74mpan 424 . . . . . . . . . . . . 13 (𝑠 ∈ (2nd𝐴) → ∃𝑡𝐴 (2nd𝑡) = 𝑠)
7675adantl 277 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩) ∧ 𝑠 ∈ (2nd𝐴)) → ∃𝑡𝐴 (2nd𝑡) = 𝑠)
77 breq1 4047 . . . . . . . . . . . . . . 15 (𝑧 = 𝑡 → (𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩ ↔ 𝑡<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩))
78 simpllr 534 . . . . . . . . . . . . . . 15 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩) ∧ 𝑠 ∈ (2nd𝐴)) ∧ (𝑡𝐴 ∧ (2nd𝑡) = 𝑠)) → ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩)
79 simprl 529 . . . . . . . . . . . . . . 15 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩) ∧ 𝑠 ∈ (2nd𝐴)) ∧ (𝑡𝐴 ∧ (2nd𝑡) = 𝑠)) → 𝑡𝐴)
8077, 78, 79rspcdva 2882 . . . . . . . . . . . . . 14 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩) ∧ 𝑠 ∈ (2nd𝐴)) ∧ (𝑡𝐴 ∧ (2nd𝑡) = 𝑠)) → 𝑡<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩)
8129ad3antrrr 492 . . . . . . . . . . . . . . 15 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩) ∧ 𝑠 ∈ (2nd𝐴)) ∧ (𝑡𝐴 ∧ (2nd𝑡) = 𝑠)) → 𝑣Q)
8238ad5antr 496 . . . . . . . . . . . . . . . 16 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩) ∧ 𝑠 ∈ (2nd𝐴)) ∧ (𝑡𝐴 ∧ (2nd𝑡) = 𝑠)) → 𝐴P)
8382, 79sseldd 3194 . . . . . . . . . . . . . . 15 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩) ∧ 𝑠 ∈ (2nd𝐴)) ∧ (𝑡𝐴 ∧ (2nd𝑡) = 𝑠)) → 𝑡P)
84 nqpru 7665 . . . . . . . . . . . . . . 15 ((𝑣Q𝑡P) → (𝑣 ∈ (2nd𝑡) ↔ 𝑡<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩))
8581, 83, 84syl2anc 411 . . . . . . . . . . . . . 14 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩) ∧ 𝑠 ∈ (2nd𝐴)) ∧ (𝑡𝐴 ∧ (2nd𝑡) = 𝑠)) → (𝑣 ∈ (2nd𝑡) ↔ 𝑡<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩))
8680, 85mpbird 167 . . . . . . . . . . . . 13 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩) ∧ 𝑠 ∈ (2nd𝐴)) ∧ (𝑡𝐴 ∧ (2nd𝑡) = 𝑠)) → 𝑣 ∈ (2nd𝑡))
87 simprr 531 . . . . . . . . . . . . 13 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩) ∧ 𝑠 ∈ (2nd𝐴)) ∧ (𝑡𝐴 ∧ (2nd𝑡) = 𝑠)) → (2nd𝑡) = 𝑠)
8886, 87eleqtrd 2284 . . . . . . . . . . . 12 ((((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩) ∧ 𝑠 ∈ (2nd𝐴)) ∧ (𝑡𝐴 ∧ (2nd𝑡) = 𝑠)) → 𝑣𝑠)
8976, 88rexlimddv 2628 . . . . . . . . . . 11 (((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩) ∧ 𝑠 ∈ (2nd𝐴)) → 𝑣𝑠)
9089ralrimiva 2579 . . . . . . . . . 10 ((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩) → ∀𝑠 ∈ (2nd𝐴)𝑣𝑠)
91 vex 2775 . . . . . . . . . . 11 𝑣 ∈ V
9291elint2 3892 . . . . . . . . . 10 (𝑣 (2nd𝐴) ↔ ∀𝑠 ∈ (2nd𝐴)𝑣𝑠)
9390, 92sylibr 134 . . . . . . . . 9 ((((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) ∧ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩) → 𝑣 (2nd𝐴))
9493ex 115 . . . . . . . 8 (((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) → (∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩ → 𝑣 (2nd𝐴)))
9570, 94orim12d 788 . . . . . . 7 (((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) → ((∃𝑧𝐴 ⟨{𝑙𝑙 <Q 𝑞}, {𝑢𝑞 <Q 𝑢}⟩<P 𝑧 ∨ ∀𝑧𝐴 𝑧<P ⟨{𝑙𝑙 <Q 𝑣}, {𝑢𝑣 <Q 𝑢}⟩) → (𝑞 (1st𝐴) ∨ 𝑣 (2nd𝐴))))
9633, 95mpd 13 . . . . . 6 (((𝜑 ∧ (𝑞Q𝑣Q)) ∧ 𝑞 <Q 𝑣) → (𝑞 (1st𝐴) ∨ 𝑣 (2nd𝐴)))
978, 9, 96syl2anc 411 . . . . 5 ((((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) ∧ (𝑣Q ∧ (𝑞 <Q 𝑣𝑣 <Q 𝑟))) → (𝑞 (1st𝐴) ∨ 𝑣 (2nd𝐴)))
98 breq2 4048 . . . . . . . . . 10 (𝑢 = 𝑟 → (𝑤 <Q 𝑢𝑤 <Q 𝑟))
9998rexbidv 2507 . . . . . . . . 9 (𝑢 = 𝑟 → (∃𝑤 (2nd𝐴)𝑤 <Q 𝑢 ↔ ∃𝑤 (2nd𝐴)𝑤 <Q 𝑟))
100 simprr 531 . . . . . . . . . 10 ((𝜑 ∧ (𝑞Q𝑟Q)) → 𝑟Q)
101100ad3antrrr 492 . . . . . . . . 9 (((((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) ∧ (𝑣Q ∧ (𝑞 <Q 𝑣𝑣 <Q 𝑟))) ∧ 𝑣 (2nd𝐴)) → 𝑟Q)
102 simpr 110 . . . . . . . . . 10 (((((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) ∧ (𝑣Q ∧ (𝑞 <Q 𝑣𝑣 <Q 𝑟))) ∧ 𝑣 (2nd𝐴)) → 𝑣 (2nd𝐴))
103 simprrr 540 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) ∧ (𝑣Q ∧ (𝑞 <Q 𝑣𝑣 <Q 𝑟))) → 𝑣 <Q 𝑟)
104103adantr 276 . . . . . . . . . 10 (((((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) ∧ (𝑣Q ∧ (𝑞 <Q 𝑣𝑣 <Q 𝑟))) ∧ 𝑣 (2nd𝐴)) → 𝑣 <Q 𝑟)
105 breq1 4047 . . . . . . . . . . 11 (𝑤 = 𝑣 → (𝑤 <Q 𝑟𝑣 <Q 𝑟))
106105rspcev 2877 . . . . . . . . . 10 ((𝑣 (2nd𝐴) ∧ 𝑣 <Q 𝑟) → ∃𝑤 (2nd𝐴)𝑤 <Q 𝑟)
107102, 104, 106syl2anc 411 . . . . . . . . 9 (((((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) ∧ (𝑣Q ∧ (𝑞 <Q 𝑣𝑣 <Q 𝑟))) ∧ 𝑣 (2nd𝐴)) → ∃𝑤 (2nd𝐴)𝑤 <Q 𝑟)
10899, 101, 107elrabd 2931 . . . . . . . 8 (((((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) ∧ (𝑣Q ∧ (𝑞 <Q 𝑣𝑣 <Q 𝑟))) ∧ 𝑣 (2nd𝐴)) → 𝑟 ∈ {𝑢Q ∣ ∃𝑤 (2nd𝐴)𝑤 <Q 𝑢})
109 suplocexpr.b . . . . . . . . . . . 12 𝐵 = ⟨ (1st𝐴), {𝑢Q ∣ ∃𝑤 (2nd𝐴)𝑤 <Q 𝑢}⟩
110109suplocexprlem2b 7827 . . . . . . . . . . 11 (𝐴P → (2nd𝐵) = {𝑢Q ∣ ∃𝑤 (2nd𝐴)𝑤 <Q 𝑢})
11138, 110syl 14 . . . . . . . . . 10 (𝜑 → (2nd𝐵) = {𝑢Q ∣ ∃𝑤 (2nd𝐴)𝑤 <Q 𝑢})
112111eleq2d 2275 . . . . . . . . 9 (𝜑 → (𝑟 ∈ (2nd𝐵) ↔ 𝑟 ∈ {𝑢Q ∣ ∃𝑤 (2nd𝐴)𝑤 <Q 𝑢}))
113112ad4antr 494 . . . . . . . 8 (((((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) ∧ (𝑣Q ∧ (𝑞 <Q 𝑣𝑣 <Q 𝑟))) ∧ 𝑣 (2nd𝐴)) → (𝑟 ∈ (2nd𝐵) ↔ 𝑟 ∈ {𝑢Q ∣ ∃𝑤 (2nd𝐴)𝑤 <Q 𝑢}))
114108, 113mpbird 167 . . . . . . 7 (((((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) ∧ (𝑣Q ∧ (𝑞 <Q 𝑣𝑣 <Q 𝑟))) ∧ 𝑣 (2nd𝐴)) → 𝑟 ∈ (2nd𝐵))
115114ex 115 . . . . . 6 ((((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) ∧ (𝑣Q ∧ (𝑞 <Q 𝑣𝑣 <Q 𝑟))) → (𝑣 (2nd𝐴) → 𝑟 ∈ (2nd𝐵)))
116115orim2d 790 . . . . 5 ((((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) ∧ (𝑣Q ∧ (𝑞 <Q 𝑣𝑣 <Q 𝑟))) → ((𝑞 (1st𝐴) ∨ 𝑣 (2nd𝐴)) → (𝑞 (1st𝐴) ∨ 𝑟 ∈ (2nd𝐵))))
11797, 116mpd 13 . . . 4 ((((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) ∧ (𝑣Q ∧ (𝑞 <Q 𝑣𝑣 <Q 𝑟))) → (𝑞 (1st𝐴) ∨ 𝑟 ∈ (2nd𝐵)))
1183, 117rexlimddv 2628 . . 3 (((𝜑 ∧ (𝑞Q𝑟Q)) ∧ 𝑞 <Q 𝑟) → (𝑞 (1st𝐴) ∨ 𝑟 ∈ (2nd𝐵)))
119118ex 115 . 2 ((𝜑 ∧ (𝑞Q𝑟Q)) → (𝑞 <Q 𝑟 → (𝑞 (1st𝐴) ∨ 𝑟 ∈ (2nd𝐵))))
120119ralrimivva 2588 1 (𝜑 → ∀𝑞Q𝑟Q (𝑞 <Q 𝑟 → (𝑞 (1st𝐴) ∨ 𝑟 ∈ (2nd𝐵))))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 104  wb 105  wo 710   = wceq 1373  wex 1515  wcel 2176  {cab 2191  wral 2484  wrex 2485  {crab 2488  Vcvv 2772  wss 3166  cop 3636   cuni 3850   cint 3885   class class class wbr 4044  cima 4678  Fun wfun 5265  ontowfo 5269  cfv 5271  1st c1st 6224  2nd c2nd 6225  Qcnq 7393   <Q cltq 7398  Pcnp 7404  <P cltp 7408
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 615  ax-in2 616  ax-io 711  ax-5 1470  ax-7 1471  ax-gen 1472  ax-ie1 1516  ax-ie2 1517  ax-8 1527  ax-10 1528  ax-11 1529  ax-i12 1530  ax-bndl 1532  ax-4 1533  ax-17 1549  ax-i9 1553  ax-ial 1557  ax-i5r 1558  ax-13 2178  ax-14 2179  ax-ext 2187  ax-coll 4159  ax-sep 4162  ax-nul 4170  ax-pow 4218  ax-pr 4253  ax-un 4480  ax-setind 4585  ax-iinf 4636
This theorem depends on definitions:  df-bi 117  df-dc 837  df-3or 982  df-3an 983  df-tru 1376  df-fal 1379  df-nf 1484  df-sb 1786  df-eu 2057  df-mo 2058  df-clab 2192  df-cleq 2198  df-clel 2201  df-nfc 2337  df-ne 2377  df-ral 2489  df-rex 2490  df-reu 2491  df-rab 2493  df-v 2774  df-sbc 2999  df-csb 3094  df-dif 3168  df-un 3170  df-in 3172  df-ss 3179  df-nul 3461  df-pw 3618  df-sn 3639  df-pr 3640  df-op 3642  df-uni 3851  df-int 3886  df-iun 3929  df-br 4045  df-opab 4106  df-mpt 4107  df-tr 4143  df-eprel 4336  df-id 4340  df-po 4343  df-iso 4344  df-iord 4413  df-on 4415  df-suc 4418  df-iom 4639  df-xp 4681  df-rel 4682  df-cnv 4683  df-co 4684  df-dm 4685  df-rn 4686  df-res 4687  df-ima 4688  df-iota 5232  df-fun 5273  df-fn 5274  df-f 5275  df-f1 5276  df-fo 5277  df-f1o 5278  df-fv 5279  df-ov 5947  df-oprab 5948  df-mpo 5949  df-1st 6226  df-2nd 6227  df-recs 6391  df-irdg 6456  df-1o 6502  df-oadd 6506  df-omul 6507  df-er 6620  df-ec 6622  df-qs 6626  df-ni 7417  df-pli 7418  df-mi 7419  df-lti 7420  df-plpq 7457  df-mpq 7458  df-enq 7460  df-nqqs 7461  df-plqqs 7462  df-mqqs 7463  df-1nqqs 7464  df-rq 7465  df-ltnqqs 7466  df-inp 7579  df-iltp 7583
This theorem is referenced by:  suplocexprlemex  7835
  Copyright terms: Public domain W3C validator