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

Theorem legval 28811
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 3478 . . 3 (𝐺 ∈ TarskiG → 𝐺 ∈ V)
4 legval.p . . . . . 6 𝑃 = (Base‘𝐺)
5 legval.d . . . . . 6 = (dist‘𝐺)
6 legval.i . . . . . 6 𝐼 = (Itv‘𝐺)
7 simp1 1152 . . . . . . . 8 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → 𝑝 = 𝑃)
87eqcomd 2771 . . . . . . 7 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → 𝑃 = 𝑝)
9 simp2 1153 . . . . . . . . . . . 12 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → 𝑑 = )
109eqcomd 2771 . . . . . . . . . . 11 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → = 𝑑)
1110oveqd 7417 . . . . . . . . . 10 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → (𝑥 𝑦) = (𝑥𝑑𝑦))
1211eqeq2d 2776 . . . . . . . . 9 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → (𝑓 = (𝑥 𝑦) ↔ 𝑓 = (𝑥𝑑𝑦)))
13 simp3 1154 . . . . . . . . . . . . . 14 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → 𝑖 = 𝐼)
1413eqcomd 2771 . . . . . . . . . . . . 13 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → 𝐼 = 𝑖)
1514oveqd 7417 . . . . . . . . . . . 12 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → (𝑥𝐼𝑦) = (𝑥𝑖𝑦))
1615eleq2d 2851 . . . . . . . . . . 11 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → (𝑧 ∈ (𝑥𝐼𝑦) ↔ 𝑧 ∈ (𝑥𝑖𝑦)))
1710oveqd 7417 . . . . . . . . . . . 12 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → (𝑥 𝑧) = (𝑥𝑑𝑧))
1817eqeq2d 2776 . . . . . . . . . . 11 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → (𝑒 = (𝑥 𝑧) ↔ 𝑒 = (𝑥𝑑𝑧)))
1916, 18anbi12d 643 . . . . . . . . . 10 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → ((𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)) ↔ (𝑧 ∈ (𝑥𝑖𝑦) ∧ 𝑒 = (𝑥𝑑𝑧))))
208, 19rexeqbidv 3340 . . . . . . . . 9 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → (∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)) ↔ ∃𝑧𝑝 (𝑧 ∈ (𝑥𝑖𝑦) ∧ 𝑒 = (𝑥𝑑𝑧))))
2112, 20anbi12d 643 . . . . . . . 8 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → ((𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧))) ↔ (𝑓 = (𝑥𝑑𝑦) ∧ ∃𝑧𝑝 (𝑧 ∈ (𝑥𝑖𝑦) ∧ 𝑒 = (𝑥𝑑𝑧)))))
228, 21rexeqbidv 3340 . . . . . . 7 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → (∃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧))) ↔ ∃𝑦𝑝 (𝑓 = (𝑥𝑑𝑦) ∧ ∃𝑧𝑝 (𝑧 ∈ (𝑥𝑖𝑦) ∧ 𝑒 = (𝑥𝑑𝑧)))))
238, 22rexeqbidv 3340 . . . . . 6 ((𝑝 = 𝑃𝑑 = 𝑖 = 𝐼) → (∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧))) ↔ ∃𝑥𝑝𝑦𝑝 (𝑓 = (𝑥𝑑𝑦) ∧ ∃𝑧𝑝 (𝑧 ∈ (𝑥𝑖𝑦) ∧ 𝑒 = (𝑥𝑑𝑧)))))
244, 5, 6, 23sbcie3s 17212 . . . . 5 (𝑔 = 𝐺 → ([(Base‘𝑔) / 𝑝][(dist‘𝑔) / 𝑑][(Itv‘𝑔) / 𝑖]𝑥𝑝𝑦𝑝 (𝑓 = (𝑥𝑑𝑦) ∧ ∃𝑧𝑝 (𝑧 ∈ (𝑥𝑖𝑦) ∧ 𝑒 = (𝑥𝑑𝑧))) ↔ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))))
2524opabbidv 5171 . . . 4 (𝑔 = 𝐺 → {⟨𝑒, 𝑓⟩ ∣ [(Base‘𝑔) / 𝑝][(dist‘𝑔) / 𝑑][(Itv‘𝑔) / 𝑖]𝑥𝑝𝑦𝑝 (𝑓 = (𝑥𝑑𝑦) ∧ ∃𝑧𝑝 (𝑧 ∈ (𝑥𝑖𝑦) ∧ 𝑒 = (𝑥𝑑𝑧)))} = {⟨𝑒, 𝑓⟩ ∣ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))})
26 df-leg 28810 . . . 4 ≤G = (𝑔 ∈ V ↦ {⟨𝑒, 𝑓⟩ ∣ [(Base‘𝑔) / 𝑝][(dist‘𝑔) / 𝑑][(Itv‘𝑔) / 𝑖]𝑥𝑝𝑦𝑝 (𝑓 = (𝑥𝑑𝑦) ∧ ∃𝑧𝑝 (𝑧 ∈ (𝑥𝑖𝑦) ∧ 𝑒 = (𝑥𝑑𝑧)))})
275fvexi 6885 . . . . . . . . 9 ∈ V
2827imaex 7899 . . . . . . . 8 ( “ (𝑃 × 𝑃)) ∈ V
29 p0ex 5346 . . . . . . . 8 {∅} ∈ V
3028, 29unex 7731 . . . . . . 7 (( “ (𝑃 × 𝑃)) ∪ {∅}) ∈ V
3130a1i 11 . . . . . 6 (⊤ → (( “ (𝑃 × 𝑃)) ∪ {∅}) ∈ V)
32 simprr 784 . . . . . . . . . . . . 13 (((((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) ∧ 𝑑𝑃) ∧ (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑))) → 𝑒 = (𝑥 𝑑))
33 ovima0 7579 . . . . . . . . . . . . . 14 ((𝑥𝑃𝑑𝑃) → (𝑥 𝑑) ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}))
3433ad5ant14 769 . . . . . . . . . . . . 13 (((((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) ∧ 𝑑𝑃) ∧ (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑))) → (𝑥 𝑑) ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}))
3532, 34eqeltrd 2865 . . . . . . . . . . . 12 (((((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) ∧ 𝑑𝑃) ∧ (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑))) → 𝑒 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}))
36 simpllr 787 . . . . . . . . . . . . . 14 (((((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) ∧ 𝑑𝑃) ∧ (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑))) → (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧))))
3736simpld 499 . . . . . . . . . . . . 13 (((((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) ∧ 𝑑𝑃) ∧ (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑))) → 𝑓 = (𝑥 𝑦))
38 ovima0 7579 . . . . . . . . . . . . . 14 ((𝑥𝑃𝑦𝑃) → (𝑥 𝑦) ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}))
3938ad3antrrr 742 . . . . . . . . . . . . 13 (((((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) ∧ 𝑑𝑃) ∧ (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑))) → (𝑥 𝑦) ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}))
4037, 39eqeltrd 2865 . . . . . . . . . . . 12 (((((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) ∧ 𝑑𝑃) ∧ (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑))) → 𝑓 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}))
4135, 40jca 520 . . . . . . . . . . 11 (((((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) ∧ 𝑑𝑃) ∧ (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑))) → (𝑒 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}) ∧ 𝑓 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅})))
42 simprr 784 . . . . . . . . . . . 12 (((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) → ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))
43 eleq1w 2848 . . . . . . . . . . . . . 14 (𝑧 = 𝑑 → (𝑧 ∈ (𝑥𝐼𝑦) ↔ 𝑑 ∈ (𝑥𝐼𝑦)))
44 oveq2 7408 . . . . . . . . . . . . . . 15 (𝑧 = 𝑑 → (𝑥 𝑧) = (𝑥 𝑑))
4544eqeq2d 2776 . . . . . . . . . . . . . 14 (𝑧 = 𝑑 → (𝑒 = (𝑥 𝑧) ↔ 𝑒 = (𝑥 𝑑)))
4643, 45anbi12d 643 . . . . . . . . . . . . 13 (𝑧 = 𝑑 → ((𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)) ↔ (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑))))
4746cbvrexvw 3244 . . . . . . . . . . . 12 (∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)) ↔ ∃𝑑𝑃 (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑)))
4842, 47sylib 221 . . . . . . . . . . 11 (((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) → ∃𝑑𝑃 (𝑑 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑑)))
4941, 48r19.29a 3173 . . . . . . . . . 10 (((𝑥𝑃𝑦𝑃) ∧ (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) → (𝑒 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}) ∧ 𝑓 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅})))
5049ex 417 . . . . . . . . 9 ((𝑥𝑃𝑦𝑃) → ((𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧))) → (𝑒 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}) ∧ 𝑓 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}))))
5150rexlimivv 3207 . . . . . . . 8 (∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧))) → (𝑒 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}) ∧ 𝑓 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅})))
5251adantl 486 . . . . . . 7 ((⊤ ∧ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) → (𝑒 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}) ∧ 𝑓 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅})))
5352simpld 499 . . . . . 6 ((⊤ ∧ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) → 𝑒 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}))
5452simprd 500 . . . . . 6 ((⊤ ∧ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))) → 𝑓 ∈ (( “ (𝑃 × 𝑃)) ∪ {∅}))
5531, 31, 53, 54opabex2 8042 . . . . 5 (⊤ → {⟨𝑒, 𝑓⟩ ∣ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))} ∈ V)
5655mptru 1570 . . . 4 {⟨𝑒, 𝑓⟩ ∣ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))} ∈ V
5725, 26, 56fvmpt 6979 . . 3 (𝐺 ∈ V → (≤G‘𝐺) = {⟨𝑒, 𝑓⟩ ∣ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))})
582, 3, 573syl 19 . 2 (𝜑 → (≤G‘𝐺) = {⟨𝑒, 𝑓⟩ ∣ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))})
591, 58eqtrid 2812 1 (𝜑 = {⟨𝑒, 𝑓⟩ ∣ ∃𝑥𝑃𝑦𝑃 (𝑓 = (𝑥 𝑦) ∧ ∃𝑧𝑃 (𝑧 ∈ (𝑥𝐼𝑦) ∧ 𝑒 = (𝑥 𝑧)))})
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 400  w3a 1101   = wceq 1563  wtru 1564  wcel 2145  wrex 3089  Vcvv 3457  [wsbc 3747  cun 3905  c0 4288  {csn 4585  {copab 5167   × cxp 5650  cima 5655  cfv 6525  (class class class)co 7400  Basecbs 17259  distcds 17309  TarskiGcstrkg 28654  Itvcitv 28660  ≤Gcleg 28809
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1818  ax-4 1832  ax-5 1933  ax-6 1990  ax-7 2031  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2737  ax-sep 5251  ax-nul 5261  ax-pow 5327  ax-pr 5395  ax-un 7722
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1103  df-tru 1566  df-fal 1576  df-ex 1803  df-nf 1807  df-sb 2094  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-ral 3080  df-rex 3090  df-rab 3418  df-v 3459  df-sbc 3748  df-dif 3910  df-un 3912  df-in 3914  df-ss 3924  df-nul 4289  df-if 4484  df-pw 4560  df-sn 4586  df-pr 4588  df-op 4592  df-uni 4869  df-br 5106  df-opab 5168  df-mpt 5187  df-id 5547  df-xp 5658  df-rel 5659  df-cnv 5660  df-co 5661  df-dm 5662  df-rn 5663  df-res 5664  df-ima 5665  df-iota 6481  df-fun 6527  df-fv 6533  df-ov 7403  df-leg 28810
This theorem is referenced by:  legov  28812
  Copyright terms: Public domain W3C validator