MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  ishlg Structured version   Visualization version   GIF version

Theorem ishlg 28655
Description: Rays : Definition 6.1 of [Schwabhauser] p. 43. With this definition, 𝐴(𝐾𝐶)𝐵 means that 𝐴 and 𝐵 are on the same ray with initial point 𝐶. This follows the same notation as Schwabhauser where rays are first defined as a relation. It is possible to recover the ray itself using e.g., ((𝐾𝐶) “ {𝐴}). (Contributed by Thierry Arnoux, 21-Dec-2019.)
Hypotheses
Ref Expression
ishlg.p 𝑃 = (Base‘𝐺)
ishlg.i 𝐼 = (Itv‘𝐺)
ishlg.k 𝐾 = (hlG‘𝐺)
ishlg.a (𝜑𝐴𝑃)
ishlg.b (𝜑𝐵𝑃)
ishlg.c (𝜑𝐶𝑃)
ishlg.g (𝜑𝐺𝑉)
Assertion
Ref Expression
ishlg (𝜑 → (𝐴(𝐾𝐶)𝐵 ↔ (𝐴𝐶𝐵𝐶 ∧ (𝐴 ∈ (𝐶𝐼𝐵) ∨ 𝐵 ∈ (𝐶𝐼𝐴)))))

Proof of Theorem ishlg
Dummy variables 𝑎 𝑏 𝑐 𝑔 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simpl 482 . . . . . 6 ((𝑎 = 𝐴𝑏 = 𝐵) → 𝑎 = 𝐴)
21neeq1d 2990 . . . . 5 ((𝑎 = 𝐴𝑏 = 𝐵) → (𝑎𝐶𝐴𝐶))
3 simpr 484 . . . . . 6 ((𝑎 = 𝐴𝑏 = 𝐵) → 𝑏 = 𝐵)
43neeq1d 2990 . . . . 5 ((𝑎 = 𝐴𝑏 = 𝐵) → (𝑏𝐶𝐵𝐶))
53oveq2d 7374 . . . . . . 7 ((𝑎 = 𝐴𝑏 = 𝐵) → (𝐶𝐼𝑏) = (𝐶𝐼𝐵))
61, 5eleq12d 2829 . . . . . 6 ((𝑎 = 𝐴𝑏 = 𝐵) → (𝑎 ∈ (𝐶𝐼𝑏) ↔ 𝐴 ∈ (𝐶𝐼𝐵)))
71oveq2d 7374 . . . . . . 7 ((𝑎 = 𝐴𝑏 = 𝐵) → (𝐶𝐼𝑎) = (𝐶𝐼𝐴))
83, 7eleq12d 2829 . . . . . 6 ((𝑎 = 𝐴𝑏 = 𝐵) → (𝑏 ∈ (𝐶𝐼𝑎) ↔ 𝐵 ∈ (𝐶𝐼𝐴)))
96, 8orbi12d 919 . . . . 5 ((𝑎 = 𝐴𝑏 = 𝐵) → ((𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎)) ↔ (𝐴 ∈ (𝐶𝐼𝐵) ∨ 𝐵 ∈ (𝐶𝐼𝐴))))
102, 4, 93anbi123d 1439 . . . 4 ((𝑎 = 𝐴𝑏 = 𝐵) → ((𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))) ↔ (𝐴𝐶𝐵𝐶 ∧ (𝐴 ∈ (𝐶𝐼𝐵) ∨ 𝐵 ∈ (𝐶𝐼𝐴)))))
11 eqid 2735 . . . 4 {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))} = {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))}
1210, 11brab2a 5716 . . 3 (𝐴{⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))}𝐵 ↔ ((𝐴𝑃𝐵𝑃) ∧ (𝐴𝐶𝐵𝐶 ∧ (𝐴 ∈ (𝐶𝐼𝐵) ∨ 𝐵 ∈ (𝐶𝐼𝐴)))))
1312a1i 11 . 2 (𝜑 → (𝐴{⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))}𝐵 ↔ ((𝐴𝑃𝐵𝑃) ∧ (𝐴𝐶𝐵𝐶 ∧ (𝐴 ∈ (𝐶𝐼𝐵) ∨ 𝐵 ∈ (𝐶𝐼𝐴))))))
14 ishlg.k . . . . 5 𝐾 = (hlG‘𝐺)
15 ishlg.g . . . . . 6 (𝜑𝐺𝑉)
16 elex 3460 . . . . . 6 (𝐺𝑉𝐺 ∈ V)
17 fveq2 6833 . . . . . . . . 9 (𝑔 = 𝐺 → (Base‘𝑔) = (Base‘𝐺))
18 ishlg.p . . . . . . . . 9 𝑃 = (Base‘𝐺)
1917, 18eqtr4di 2788 . . . . . . . 8 (𝑔 = 𝐺 → (Base‘𝑔) = 𝑃)
2019eleq2d 2821 . . . . . . . . . . 11 (𝑔 = 𝐺 → (𝑎 ∈ (Base‘𝑔) ↔ 𝑎𝑃))
2119eleq2d 2821 . . . . . . . . . . 11 (𝑔 = 𝐺 → (𝑏 ∈ (Base‘𝑔) ↔ 𝑏𝑃))
2220, 21anbi12d 633 . . . . . . . . . 10 (𝑔 = 𝐺 → ((𝑎 ∈ (Base‘𝑔) ∧ 𝑏 ∈ (Base‘𝑔)) ↔ (𝑎𝑃𝑏𝑃)))
23 fveq2 6833 . . . . . . . . . . . . . . 15 (𝑔 = 𝐺 → (Itv‘𝑔) = (Itv‘𝐺))
24 ishlg.i . . . . . . . . . . . . . . 15 𝐼 = (Itv‘𝐺)
2523, 24eqtr4di 2788 . . . . . . . . . . . . . 14 (𝑔 = 𝐺 → (Itv‘𝑔) = 𝐼)
2625oveqd 7375 . . . . . . . . . . . . 13 (𝑔 = 𝐺 → (𝑐(Itv‘𝑔)𝑏) = (𝑐𝐼𝑏))
2726eleq2d 2821 . . . . . . . . . . . 12 (𝑔 = 𝐺 → (𝑎 ∈ (𝑐(Itv‘𝑔)𝑏) ↔ 𝑎 ∈ (𝑐𝐼𝑏)))
2825oveqd 7375 . . . . . . . . . . . . 13 (𝑔 = 𝐺 → (𝑐(Itv‘𝑔)𝑎) = (𝑐𝐼𝑎))
2928eleq2d 2821 . . . . . . . . . . . 12 (𝑔 = 𝐺 → (𝑏 ∈ (𝑐(Itv‘𝑔)𝑎) ↔ 𝑏 ∈ (𝑐𝐼𝑎)))
3027, 29orbi12d 919 . . . . . . . . . . 11 (𝑔 = 𝐺 → ((𝑎 ∈ (𝑐(Itv‘𝑔)𝑏) ∨ 𝑏 ∈ (𝑐(Itv‘𝑔)𝑎)) ↔ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))))
31303anbi3d 1445 . . . . . . . . . 10 (𝑔 = 𝐺 → ((𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐(Itv‘𝑔)𝑏) ∨ 𝑏 ∈ (𝑐(Itv‘𝑔)𝑎))) ↔ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎)))))
3222, 31anbi12d 633 . . . . . . . . 9 (𝑔 = 𝐺 → (((𝑎 ∈ (Base‘𝑔) ∧ 𝑏 ∈ (Base‘𝑔)) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐(Itv‘𝑔)𝑏) ∨ 𝑏 ∈ (𝑐(Itv‘𝑔)𝑎)))) ↔ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))))))
3332opabbidv 5163 . . . . . . . 8 (𝑔 = 𝐺 → {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (Base‘𝑔) ∧ 𝑏 ∈ (Base‘𝑔)) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐(Itv‘𝑔)𝑏) ∨ 𝑏 ∈ (𝑐(Itv‘𝑔)𝑎))))} = {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))))})
3419, 33mpteq12dv 5184 . . . . . . 7 (𝑔 = 𝐺 → (𝑐 ∈ (Base‘𝑔) ↦ {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (Base‘𝑔) ∧ 𝑏 ∈ (Base‘𝑔)) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐(Itv‘𝑔)𝑏) ∨ 𝑏 ∈ (𝑐(Itv‘𝑔)𝑎))))}) = (𝑐𝑃 ↦ {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))))}))
35 df-hlg 28654 . . . . . . 7 hlG = (𝑔 ∈ V ↦ (𝑐 ∈ (Base‘𝑔) ↦ {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (Base‘𝑔) ∧ 𝑏 ∈ (Base‘𝑔)) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐(Itv‘𝑔)𝑏) ∨ 𝑏 ∈ (𝑐(Itv‘𝑔)𝑎))))}))
3634, 35, 18mptfvmpt 7174 . . . . . 6 (𝐺 ∈ V → (hlG‘𝐺) = (𝑐𝑃 ↦ {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))))}))
3715, 16, 363syl 18 . . . . 5 (𝜑 → (hlG‘𝐺) = (𝑐𝑃 ↦ {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))))}))
3814, 37eqtrid 2782 . . . 4 (𝜑𝐾 = (𝑐𝑃 ↦ {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))))}))
39 neeq2 2994 . . . . . . . 8 (𝑐 = 𝐶 → (𝑎𝑐𝑎𝐶))
40 neeq2 2994 . . . . . . . 8 (𝑐 = 𝐶 → (𝑏𝑐𝑏𝐶))
41 oveq1 7365 . . . . . . . . . 10 (𝑐 = 𝐶 → (𝑐𝐼𝑏) = (𝐶𝐼𝑏))
4241eleq2d 2821 . . . . . . . . 9 (𝑐 = 𝐶 → (𝑎 ∈ (𝑐𝐼𝑏) ↔ 𝑎 ∈ (𝐶𝐼𝑏)))
43 oveq1 7365 . . . . . . . . . 10 (𝑐 = 𝐶 → (𝑐𝐼𝑎) = (𝐶𝐼𝑎))
4443eleq2d 2821 . . . . . . . . 9 (𝑐 = 𝐶 → (𝑏 ∈ (𝑐𝐼𝑎) ↔ 𝑏 ∈ (𝐶𝐼𝑎)))
4542, 44orbi12d 919 . . . . . . . 8 (𝑐 = 𝐶 → ((𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎)) ↔ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))
4639, 40, 453anbi123d 1439 . . . . . . 7 (𝑐 = 𝐶 → ((𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))) ↔ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎)))))
4746anbi2d 631 . . . . . 6 (𝑐 = 𝐶 → (((𝑎𝑃𝑏𝑃) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎)))) ↔ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))))
4847opabbidv 5163 . . . . 5 (𝑐 = 𝐶 → {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))))} = {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))})
4948adantl 481 . . . 4 ((𝜑𝑐 = 𝐶) → {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))))} = {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))})
50 ishlg.c . . . 4 (𝜑𝐶𝑃)
5118fvexi 6847 . . . . . . 7 𝑃 ∈ V
5251, 51xpex 7698 . . . . . 6 (𝑃 × 𝑃) ∈ V
53 opabssxp 5715 . . . . . 6 {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))} ⊆ (𝑃 × 𝑃)
5452, 53ssexi 5266 . . . . 5 {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))} ∈ V
5554a1i 11 . . . 4 (𝜑 → {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))} ∈ V)
5638, 49, 50, 55fvmptd 6948 . . 3 (𝜑 → (𝐾𝐶) = {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))})
5756breqd 5108 . 2 (𝜑 → (𝐴(𝐾𝐶)𝐵𝐴{⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))}𝐵))
58 ishlg.a . . . 4 (𝜑𝐴𝑃)
59 ishlg.b . . . 4 (𝜑𝐵𝑃)
6058, 59jca 511 . . 3 (𝜑 → (𝐴𝑃𝐵𝑃))
6160biantrurd 532 . 2 (𝜑 → ((𝐴𝐶𝐵𝐶 ∧ (𝐴 ∈ (𝐶𝐼𝐵) ∨ 𝐵 ∈ (𝐶𝐼𝐴))) ↔ ((𝐴𝑃𝐵𝑃) ∧ (𝐴𝐶𝐵𝐶 ∧ (𝐴 ∈ (𝐶𝐼𝐵) ∨ 𝐵 ∈ (𝐶𝐼𝐴))))))
6213, 57, 613bitr4d 311 1 (𝜑 → (𝐴(𝐾𝐶)𝐵 ↔ (𝐴𝐶𝐵𝐶 ∧ (𝐴 ∈ (𝐶𝐼𝐵) ∨ 𝐵 ∈ (𝐶𝐼𝐴)))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  wo 848  w3a 1087   = wceq 1542  wcel 2114  wne 2931  Vcvv 3439   class class class wbr 5097  {copab 5159  cmpt 5178   × cxp 5621  cfv 6491  (class class class)co 7358  Basecbs 17138  Itvcitv 28486  hlGchlg 28653
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2183  ax-ext 2707  ax-rep 5223  ax-sep 5240  ax-nul 5250  ax-pow 5309  ax-pr 5376  ax-un 7680
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2538  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2810  df-nfc 2884  df-ne 2932  df-ral 3051  df-rex 3060  df-reu 3350  df-rab 3399  df-v 3441  df-sbc 3740  df-csb 3849  df-dif 3903  df-un 3905  df-in 3907  df-ss 3917  df-nul 4285  df-if 4479  df-pw 4555  df-sn 4580  df-pr 4582  df-op 4586  df-uni 4863  df-iun 4947  df-br 5098  df-opab 5160  df-mpt 5179  df-id 5518  df-xp 5629  df-rel 5630  df-cnv 5631  df-co 5632  df-dm 5633  df-rn 5634  df-res 5635  df-ima 5636  df-iota 6447  df-fun 6493  df-fn 6494  df-f 6495  df-f1 6496  df-fo 6497  df-f1o 6498  df-fv 6499  df-ov 7361  df-hlg 28654
This theorem is referenced by:  hlcomb  28656  hlne1  28658  hlne2  28659  hlln  28660  hlid  28662  hltr  28663  hlbtwn  28664  btwnhl1  28665  btwnhl2  28666  btwnhl  28667  lnhl  28668  hlcgrex  28669  mirhl  28732  mirbtwnhl  28733  mirhl2  28734  opphllem4  28803  opphl  28807  hlpasch  28809  lnopp2hpgb  28816  cgracgr  28871  cgraswap  28873  flatcgra  28877  cgrahl  28880  cgracol  28881
  Copyright terms: Public domain W3C validator