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

Theorem ishlg 28885
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 487 . . . . . 6 ((𝑎 = 𝐴𝑏 = 𝐵) → 𝑎 = 𝐴)
21neeq1d 3016 . . . . 5 ((𝑎 = 𝐴𝑏 = 𝐵) → (𝑎𝐶𝐴𝐶))
3 simpr 489 . . . . . 6 ((𝑎 = 𝐴𝑏 = 𝐵) → 𝑏 = 𝐵)
43neeq1d 3016 . . . . 5 ((𝑎 = 𝐴𝑏 = 𝐵) → (𝑏𝐶𝐵𝐶))
53oveq2d 7428 . . . . . . 7 ((𝑎 = 𝐴𝑏 = 𝐵) → (𝐶𝐼𝑏) = (𝐶𝐼𝐵))
61, 5eleq12d 2856 . . . . . 6 ((𝑎 = 𝐴𝑏 = 𝐵) → (𝑎 ∈ (𝐶𝐼𝑏) ↔ 𝐴 ∈ (𝐶𝐼𝐵)))
71oveq2d 7428 . . . . . . 7 ((𝑎 = 𝐴𝑏 = 𝐵) → (𝐶𝐼𝑎) = (𝐶𝐼𝐴))
83, 7eleq12d 2856 . . . . . 6 ((𝑎 = 𝐴𝑏 = 𝐵) → (𝑏 ∈ (𝐶𝐼𝑎) ↔ 𝐵 ∈ (𝐶𝐼𝐴)))
96, 8orbi12d 931 . . . . 5 ((𝑎 = 𝐴𝑏 = 𝐵) → ((𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎)) ↔ (𝐴 ∈ (𝐶𝐼𝐵) ∨ 𝐵 ∈ (𝐶𝐼𝐴))))
102, 4, 93anbi123d 1463 . . . 4 ((𝑎 = 𝐴𝑏 = 𝐵) → ((𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))) ↔ (𝐴𝐶𝐵𝐶 ∧ (𝐴 ∈ (𝐶𝐼𝐵) ∨ 𝐵 ∈ (𝐶𝐼𝐴)))))
11 eqid 2762 . . . 4 {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))} = {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))}
1210, 11brab2a 5753 . . 3 (𝐴{⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))}𝐵 ↔ ((𝐴𝑃𝐵𝑃) ∧ (𝐴𝐶𝐵𝐶 ∧ (𝐴 ∈ (𝐶𝐼𝐵) ∨ 𝐵 ∈ (𝐶𝐼𝐴)))))
1312a1i 11 . 2 (𝜑 → (𝐴{⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))}𝐵 ↔ ((𝐴𝑃𝐵𝑃) ∧ (𝐴𝐶𝐵𝐶 ∧ (𝐴 ∈ (𝐶𝐼𝐵) ∨ 𝐵 ∈ (𝐶𝐼𝐴))))))
14 ishlg.k . . . . 5 𝐾 = (hlG‘𝐺)
15 ishlg.g . . . . . 6 (𝜑𝐺𝑉)
16 elex 3475 . . . . . 6 (𝐺𝑉𝐺 ∈ V)
17 fveq2 6881 . . . . . . . . 9 (𝑔 = 𝐺 → (Base‘𝑔) = (Base‘𝐺))
18 ishlg.p . . . . . . . . 9 𝑃 = (Base‘𝐺)
1917, 18eqtr4di 2815 . . . . . . . 8 (𝑔 = 𝐺 → (Base‘𝑔) = 𝑃)
2019eleq2d 2848 . . . . . . . . . . 11 (𝑔 = 𝐺 → (𝑎 ∈ (Base‘𝑔) ↔ 𝑎𝑃))
2119eleq2d 2848 . . . . . . . . . . 11 (𝑔 = 𝐺 → (𝑏 ∈ (Base‘𝑔) ↔ 𝑏𝑃))
2220, 21anbi12d 643 . . . . . . . . . 10 (𝑔 = 𝐺 → ((𝑎 ∈ (Base‘𝑔) ∧ 𝑏 ∈ (Base‘𝑔)) ↔ (𝑎𝑃𝑏𝑃)))
23 fveq2 6881 . . . . . . . . . . . . . . 15 (𝑔 = 𝐺 → (Itv‘𝑔) = (Itv‘𝐺))
24 ishlg.i . . . . . . . . . . . . . . 15 𝐼 = (Itv‘𝐺)
2523, 24eqtr4di 2815 . . . . . . . . . . . . . 14 (𝑔 = 𝐺 → (Itv‘𝑔) = 𝐼)
2625oveqd 7429 . . . . . . . . . . . . 13 (𝑔 = 𝐺 → (𝑐(Itv‘𝑔)𝑏) = (𝑐𝐼𝑏))
2726eleq2d 2848 . . . . . . . . . . . 12 (𝑔 = 𝐺 → (𝑎 ∈ (𝑐(Itv‘𝑔)𝑏) ↔ 𝑎 ∈ (𝑐𝐼𝑏)))
2825oveqd 7429 . . . . . . . . . . . . 13 (𝑔 = 𝐺 → (𝑐(Itv‘𝑔)𝑎) = (𝑐𝐼𝑎))
2928eleq2d 2848 . . . . . . . . . . . 12 (𝑔 = 𝐺 → (𝑏 ∈ (𝑐(Itv‘𝑔)𝑎) ↔ 𝑏 ∈ (𝑐𝐼𝑎)))
3027, 29orbi12d 931 . . . . . . . . . . 11 (𝑔 = 𝐺 → ((𝑎 ∈ (𝑐(Itv‘𝑔)𝑏) ∨ 𝑏 ∈ (𝑐(Itv‘𝑔)𝑎)) ↔ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))))
31303anbi3d 1469 . . . . . . . . . 10 (𝑔 = 𝐺 → ((𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐(Itv‘𝑔)𝑏) ∨ 𝑏 ∈ (𝑐(Itv‘𝑔)𝑎))) ↔ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎)))))
3222, 31anbi12d 643 . . . . . . . . 9 (𝑔 = 𝐺 → (((𝑎 ∈ (Base‘𝑔) ∧ 𝑏 ∈ (Base‘𝑔)) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐(Itv‘𝑔)𝑏) ∨ 𝑏 ∈ (𝑐(Itv‘𝑔)𝑎)))) ↔ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))))))
3332opabbidv 5176 . . . . . . . 8 (𝑔 = 𝐺 → {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (Base‘𝑔) ∧ 𝑏 ∈ (Base‘𝑔)) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐(Itv‘𝑔)𝑏) ∨ 𝑏 ∈ (𝑐(Itv‘𝑔)𝑎))))} = {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))))})
3419, 33mpteq12dv 5197 . . . . . . 7 (𝑔 = 𝐺 → (𝑐 ∈ (Base‘𝑔) ↦ {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (Base‘𝑔) ∧ 𝑏 ∈ (Base‘𝑔)) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐(Itv‘𝑔)𝑏) ∨ 𝑏 ∈ (𝑐(Itv‘𝑔)𝑎))))}) = (𝑐𝑃 ↦ {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))))}))
35 df-hlg 28881 . . . . . . 7 hlG = (𝑔 ∈ V ↦ (𝑐 ∈ (Base‘𝑔) ↦ {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (Base‘𝑔) ∧ 𝑏 ∈ (Base‘𝑔)) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐(Itv‘𝑔)𝑏) ∨ 𝑏 ∈ (𝑐(Itv‘𝑔)𝑎))))}))
3634, 35, 18mptfvmpt 7226 . . . . . 6 (𝐺 ∈ V → (hlG‘𝐺) = (𝑐𝑃 ↦ {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))))}))
3715, 16, 363syl 19 . . . . 5 (𝜑 → (hlG‘𝐺) = (𝑐𝑃 ↦ {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))))}))
3814, 37eqtrid 2809 . . . 4 (𝜑𝐾 = (𝑐𝑃 ↦ {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))))}))
39 neeq2 3020 . . . . . . . 8 (𝑐 = 𝐶 → (𝑎𝑐𝑎𝐶))
40 neeq2 3020 . . . . . . . 8 (𝑐 = 𝐶 → (𝑏𝑐𝑏𝐶))
41 oveq1 7419 . . . . . . . . . 10 (𝑐 = 𝐶 → (𝑐𝐼𝑏) = (𝐶𝐼𝑏))
4241eleq2d 2848 . . . . . . . . 9 (𝑐 = 𝐶 → (𝑎 ∈ (𝑐𝐼𝑏) ↔ 𝑎 ∈ (𝐶𝐼𝑏)))
43 oveq1 7419 . . . . . . . . . 10 (𝑐 = 𝐶 → (𝑐𝐼𝑎) = (𝐶𝐼𝑎))
4443eleq2d 2848 . . . . . . . . 9 (𝑐 = 𝐶 → (𝑏 ∈ (𝑐𝐼𝑎) ↔ 𝑏 ∈ (𝐶𝐼𝑎)))
4542, 44orbi12d 931 . . . . . . . 8 (𝑐 = 𝐶 → ((𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎)) ↔ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))
4639, 40, 453anbi123d 1463 . . . . . . 7 (𝑐 = 𝐶 → ((𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))) ↔ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎)))))
4746anbi2d 641 . . . . . 6 (𝑐 = 𝐶 → (((𝑎𝑃𝑏𝑃) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎)))) ↔ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))))
4847opabbidv 5176 . . . . 5 (𝑐 = 𝐶 → {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))))} = {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))})
4948adantl 486 . . . 4 ((𝜑𝑐 = 𝐶) → {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝑐𝑏𝑐 ∧ (𝑎 ∈ (𝑐𝐼𝑏) ∨ 𝑏 ∈ (𝑐𝐼𝑎))))} = {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))})
50 ishlg.c . . . 4 (𝜑𝐶𝑃)
5118fvexi 6895 . . . . . . 7 𝑃 ∈ V
5251, 51xpex 7750 . . . . . 6 (𝑃 × 𝑃) ∈ V
53 opabssxp 5752 . . . . . 6 {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))} ⊆ (𝑃 × 𝑃)
5452, 53ssexi 5292 . . . . 5 {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))} ∈ V
5554a1i 11 . . . 4 (𝜑 → {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))} ∈ V)
5638, 49, 50, 55fvmptd 6997 . . 3 (𝜑 → (𝐾𝐶) = {⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))})
5756breqd 5119 . 2 (𝜑 → (𝐴(𝐾𝐶)𝐵𝐴{⟨𝑎, 𝑏⟩ ∣ ((𝑎𝑃𝑏𝑃) ∧ (𝑎𝐶𝑏𝐶 ∧ (𝑎 ∈ (𝐶𝐼𝑏) ∨ 𝑏 ∈ (𝐶𝐼𝑎))))}𝐵))
58 ishlg.a . . . 4 (𝜑𝐴𝑃)
59 ishlg.b . . . 4 (𝜑𝐵𝑃)
6058, 59jca 520 . . 3 (𝜑 → (𝐴𝑃𝐵𝑃))
6160biantrurd 541 . 2 (𝜑 → ((𝐴𝐶𝐵𝐶 ∧ (𝐴 ∈ (𝐶𝐼𝐵) ∨ 𝐵 ∈ (𝐶𝐼𝐴))) ↔ ((𝐴𝑃𝐵𝑃) ∧ (𝐴𝐶𝐵𝐶 ∧ (𝐴 ∈ (𝐶𝐼𝐵) ∨ 𝐵 ∈ (𝐶𝐼𝐴))))))
6213, 57, 613bitr4d 314 1 (𝜑 → (𝐴(𝐾𝐶)𝐵 ↔ (𝐴𝐶𝐵𝐶 ∧ (𝐴 ∈ (𝐶𝐼𝐵) ∨ 𝐵 ∈ (𝐶𝐼𝐴)))))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 400  wo 860  w3a 1102   = wceq 1569  wcel 2142  wne 2957  Vcvv 3454   class class class wbr 5108  {copab 5172  cmpt 5191   × cxp 5658  cfv 6536  (class class class)co 7412  Basecbs 17275  Itvcitv 28713  hlGchlg 28880
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1824  ax-4 1838  ax-5 1939  ax-6 1996  ax-7 2037  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5237  ax-sep 5256  ax-nul 5268  ax-pow 5335  ax-pr 5403  ax-un 7734
This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1104  df-tru 1572  df-fal 1582  df-ex 1809  df-nf 1813  df-sb 2096  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3079  df-rex 3089  df-reu 3369  df-rab 3416  df-v 3456  df-sbc 3744  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-nul 4286  df-if 4487  df-pw 4563  df-sn 4589  df-pr 4591  df-op 4595  df-uni 4872  df-iun 4957  df-br 5109  df-opab 5173  df-mpt 5192  df-id 5555  df-xp 5666  df-rel 5667  df-cnv 5668  df-co 5669  df-dm 5670  df-rn 5671  df-res 5672  df-ima 5673  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-ov 7415  df-hlg 28881
This theorem is used by:  hlcomb  28886  hlne1  28888  hlne2  28889  hlln  28890  hlid  28892  hltr  28893  hlbtwn  28894  btwnhl1  28895  btwnhl2  28896  btwnhl  28897  lnhl  28898  hlcgrex  28899  mirhl  28967  mirbtwnhl  28968  mirhl2  28969  opphllem4  29042  opphl  29046  hlpasch  29049  lnopp2hpgb  29056  cgracgr  29140  cgraswap  29142  flatcgra  29146  cgrahl  29149  cgracol  29150  cgranbtwn  35065
  Copyright terms: Public domain W3C validator