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

Theorem legval 26040
Description: Value of the less-than relationship. (Contributed by Thierry Arnoux, 21-Jun-2019.)
Hypotheses
Ref Expression
legval.p 𝑃 = (Base‘𝐺)
legval.d = (dist‘𝐺)
legval.i 𝐼 = (Itv‘𝐺)
legval.l = (≤G‘𝐺)
legval.g (𝜑𝐺 ∈ TarskiG)
Assertion
Ref Expression
legval (𝜑 = {⟨𝑒, 𝑓⟩ ∣ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))})
Distinct variable groups:   𝑒,𝑓,𝐺   𝑥,𝑦,𝑧,𝐼   𝑥,𝑒,𝑦,𝑧,𝑃,𝑓   ,𝑒,𝑓,𝑥,𝑦,𝑧
Allowed substitution hints:   𝜑(𝑥,𝑦,𝑧,𝑒,𝑓)   𝐺(𝑥,𝑦,𝑧)   𝐼(𝑒,𝑓)   (𝑥,𝑦,𝑧,𝑒,𝑓)

Proof of Theorem legval
Dummy variables 𝑑 𝑔 𝑖 𝑝 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 legval.l . 2 = (≤G‘𝐺)
2 legval.g . . 3 (𝜑𝐺 ∈ TarskiG)
3 elex 3450 . . 3 (𝐺 ∈ TarskiG → 𝐺 ∈ V)
4 legval.p . . . . . 6 𝑃 = (Base‘𝐺)
5 legval.d . . . . . 6 = (dist‘𝐺)
6 legval.i . . . . . 6 𝐼 = (Itv‘𝐺)
7 simp1 1127 . . . . . . . 8 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → 𝑝 = 𝑃)
87eqcomd 2799 . . . . . . 7 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → 𝑃 = 𝑝)
9 simp2 1128 . . . . . . . . . . . 12 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → 𝑑 = )
109eqcomd 2799 . . . . . . . . . . 11 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → = 𝑑)
1110oveqd 7024 . . . . . . . . . 10 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → (𝑥 𝑦) = (𝑥𝑑𝑦))
1211eqeq2d 2803 . . . . . . . . 9 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → (𝑓 = (𝑥 𝑦) ↔ 𝑓 = (𝑥𝑑𝑦)))
13 simp3 1129 . . . . . . . . . . . . . 14 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → 𝑖 = 𝐼)
1413eqcomd 2799 . . . . . . . . . . . . 13 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → 𝐼 = 𝑖)
1514oveqd 7024 . . . . . . . . . . . 12 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → (𝑥𝐼𝑦) = (𝑥𝑖𝑦))
1615eleq2d 2866 . . . . . . . . . . 11 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → (𝑧 ∈ (𝑥𝐼𝑦) ↔ 𝑧 ∈ (𝑥𝑖𝑦)))
1710oveqd 7024 . . . . . . . . . . . 12 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → (𝑥 𝑧) = (𝑥𝑑𝑧))
1817eqeq2d 2803 . . . . . . . . . . 11 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → (𝑒 = (𝑥 𝑧) ↔ 𝑒 = (𝑥𝑑𝑧)))
1916, 18anbi12d 630 . . . . . . . . . 10 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → ((𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)) ↔ (𝑧 ∈ (𝑥𝑖𝑦) ∧ 𝑒 = (𝑥𝑑𝑧))))
208, 19rexeqbidv 3359 . . . . . . . . 9 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → (∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)) ↔ ∃𝑧𝑝 (𝑧 ∈ (𝑥𝑖𝑦) ∧ 𝑒 = (𝑥𝑑𝑧))))
2112, 20anbi12d 630 . . . . . . . 8 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → ((𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧))) ↔ (𝑓 = (𝑥𝑑𝑦) ∧ ∃𝑧𝑝 (𝑧 ∈ (𝑥𝑖𝑦) ∧ 𝑒 = (𝑥𝑑𝑧)))))
228, 21rexeqbidv 3359 . . . . . . 7 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → (∃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧))) ↔ ∃𝑦𝑝 (𝑓 = (𝑥𝑑𝑦) ∧ ∃𝑧𝑝 (𝑧 ∈ (𝑥𝑖𝑦) ∧ 𝑒 = (𝑥𝑑𝑧)))))
238, 22rexeqbidv 3359 . . . . . 6 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → (∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧))) ↔ ∃𝑥𝑝𝑦𝑝 (𝑓 = (𝑥𝑑𝑦) ∧ ∃𝑧𝑝 (𝑧 ∈ (𝑥𝑖𝑦) ∧ 𝑒 = (𝑥𝑑𝑧)))))
244, 5, 6, 23sbcie3s 16358 . . . . 5 (𝑔 = 𝐺 → ([(Base‘𝑔) / 𝑝][(dist‘𝑔) / 𝑑][(Itv‘𝑔) / 𝑖]𝑥𝑝𝑦𝑝 (𝑓 = (𝑥𝑑𝑦) ∧ ∃𝑧𝑝 (𝑧 ∈ (𝑥𝑖𝑦) ∧ 𝑒 = (𝑥𝑑𝑧))) ↔ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))))
2524opabbidv 5022 . . . 4 (𝑔 = 𝐺 → {⟨𝑒, 𝑓⟩ ∣ [(Base‘𝑔) / 𝑝][(dist‘𝑔) / 𝑑][(Itv‘𝑔) / 𝑖]𝑥𝑝𝑦𝑝 (𝑓 = (𝑥𝑑𝑦) ∧ ∃𝑧𝑝 (𝑧 ∈ (𝑥𝑖𝑦) ∧ 𝑒 = (𝑥𝑑𝑧)))} = {⟨𝑒, 𝑓⟩ ∣ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))})
26 df-leg 26039 . . . 4 ≤G = (𝑔 ∈ V ↦ {⟨𝑒, 𝑓⟩ ∣ [(Base‘𝑔) / 𝑝][(dist‘𝑔) / 𝑑][(Itv‘𝑔) / 𝑖]𝑥𝑝𝑦𝑝 (𝑓 = (𝑥𝑑𝑦) ∧ ∃𝑧𝑝 (𝑧 ∈ (𝑥𝑖𝑦) ∧ 𝑒 = (𝑥𝑑𝑧)))})
275fvexi 6544 . . . . . . . . 9 ∈ V
2827imaex 7468 . . . . . . . 8 ( “ (𝑃 × 𝑃)) ∈ V
29 p0ex 5168 . . . . . . . 8 {∅} ∈ V
3028, 29unex 7317 . . . . . . 7 (( “ (𝑃 × 𝑃)) ∪ {∅}) ∈ V
3130a1i 11 . . . . . 6 (⊤ → (( “ (𝑃 × 𝑃)) ∪ {∅}) ∈ V)
32 simprr 769 . . . . . . . . . . . . 13 (((((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) ∧ 𝑑𝑃) ∧ (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑))) → 𝑒 = (𝑥 𝑑))
33 ovima0 7174 . . . . . . . . . . . . . 14 ((𝑥𝑃𝑑𝑃) → (𝑥 𝑑) ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}))
3433ad5ant14 754 . . . . . . . . . . . . 13 (((((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) ∧ 𝑑𝑃) ∧ (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑))) → (𝑥 𝑑) ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}))
3532, 34eqeltrd 2881 . . . . . . . . . . . 12 (((((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) ∧ 𝑑𝑃) ∧ (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑))) → 𝑒 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}))
36 simpllr 772 . . . . . . . . . . . . . 14 (((((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) ∧ 𝑑𝑃) ∧ (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑))) → (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧))))
3736simpld 495 . . . . . . . . . . . . 13 (((((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) ∧ 𝑑𝑃) ∧ (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑))) → 𝑓 = (𝑥 𝑦))
38 ovima0 7174 . . . . . . . . . . . . . 14 ((𝑥𝑃𝑦𝑃) → (𝑥 𝑦) ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}))
3938ad3antrrr 726 . . . . . . . . . . . . 13 (((((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) ∧ 𝑑𝑃) ∧ (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑))) → (𝑥 𝑦) ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}))
4037, 39eqeltrd 2881 . . . . . . . . . . . 12 (((((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) ∧ 𝑑𝑃) ∧ (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑))) → 𝑓 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}))
4135, 40jca 512 . . . . . . . . . . 11 (((((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) ∧ 𝑑𝑃) ∧ (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑))) → (𝑒 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}) ∧ 𝑓 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅})))
42 simprr 769 . . . . . . . . . . . 12 (((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) → ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))
43 eleq1w 2863 . . . . . . . . . . . . . 14 (𝑧 = 𝑑 → (𝑧 ∈ (𝑥𝐼𝑦) ↔ 𝑑 ∈ (𝑥𝐼𝑦)))
44 oveq2 7015 . . . . . . . . . . . . . . 15 (𝑧 = 𝑑 → (𝑥 𝑧) = (𝑥 𝑑))
4544eqeq2d 2803 . . . . . . . . . . . . . 14 (𝑧 = 𝑑 → (𝑒 = (𝑥 𝑧) ↔ 𝑒 = (𝑥 𝑑)))
4643, 45anbi12d 630 . . . . . . . . . . . . 13 (𝑧 = 𝑑 → ((𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)) ↔ (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑))))
4746cbvrexv 3401 . . . . . . . . . . . 12 (∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)) ↔ ∃𝑑𝑃 (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑)))
4842, 47sylib 219 . . . . . . . . . . 11 (((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) → ∃𝑑𝑃 (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑)))
4941, 48r19.29a 3249 . . . . . . . . . 10 (((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) → (𝑒 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}) ∧ 𝑓 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅})))
5049ex 413 . . . . . . . . 9 ((𝑥𝑃𝑦𝑃) → ((𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧))) → (𝑒 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}) ∧ 𝑓 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}))))
5150rexlimivv 3252 . . . . . . . 8 (∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧))) → (𝑒 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}) ∧ 𝑓 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅})))
5251adantl 482 . . . . . . 7 ((⊤ ∧ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) → (𝑒 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}) ∧ 𝑓 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅})))
5352simpld 495 . . . . . 6 ((⊤ ∧ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) → 𝑒 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}))
5452simprd 496 . . . . . 6 ((⊤ ∧ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) → 𝑓 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}))
5531, 31, 53, 54opabex2 7602 . . . . 5 (⊤ → {⟨𝑒, 𝑓⟩ ∣ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))} ∈ V)
5655mptru 1527 . . . 4 {⟨𝑒, 𝑓⟩ ∣ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))} ∈ V
5725, 26, 56fvmpt 6626 . . 3 (𝐺 ∈ V → (≤G‘𝐺) = {⟨𝑒, 𝑓⟩ ∣ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))})
582, 3, 573syl 18 . 2 (𝜑 → (≤G‘𝐺) = {⟨𝑒, 𝑓⟩ ∣ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))})
591, 58syl5eq 2841 1 (𝜑 = {⟨𝑒, 𝑓⟩ ∣ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))})
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 396  w3a 1078   = wceq 1520  wtru 1521  wcel 2079  wrex 3104  Vcvv 3432  [wsbc 3701  cun 3852  c0 4206  {csn 4466  {copab 5018   × cxp 5433  cima 5438  cfv 6217  (class class class)co 7007  Basecbs 16300  distcds 16391  TarskiGcstrkg 25886  Itvcitv 25892  ≤Gcleg 26038
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1775  ax-4 1789  ax-5 1886  ax-6 1945  ax-7 1990  ax-8 2081  ax-9 2089  ax-10 2110  ax-11 2124  ax-12 2139  ax-13 2342  ax-ext 2767  ax-sep 5088  ax-nul 5095  ax-pow 5150  ax-pr 5214  ax-un 7310
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 843  df-3an 1080  df-tru 1523  df-ex 1760  df-nf 1764  df-sb 2041  df-mo 2574  df-eu 2610  df-clab 2774  df-cleq 2786  df-clel 2861  df-nfc 2933  df-ne 2983  df-ral 3108  df-rex 3109  df-rab 3112  df-v 3434  df-sbc 3702  df-dif 3857  df-un 3859  df-in 3861  df-ss 3869  df-nul 4207  df-if 4376  df-pw 4449  df-sn 4467  df-pr 4469  df-op 4473  df-uni 4740  df-br 4957  df-opab 5019  df-mpt 5036  df-id 5340  df-xp 5441  df-rel 5442  df-cnv 5443  df-co 5444  df-dm 5445  df-rn 5446  df-res 5447  df-ima 5448  df-iota 6181  df-fun 6219  df-fv 6225  df-ov 7010  df-leg 26039
This theorem is referenced by:  legov  26041
  Copyright terms: Public domain W3C validator