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

Theorem metustexhalf 24065
Description: For any element 𝐴 of the filter base generated by the metric 𝐷, the half element (corresponding to half the distance) is also in this base. (Contributed by Thierry Arnoux, 28-Nov-2017.) (Revised by Thierry Arnoux, 11-Feb-2018.)
Hypothesis
Ref Expression
metust.1 𝐹 = ran (π‘Ž ∈ ℝ+ ↦ (◑𝐷 β€œ (0[,)π‘Ž)))
Assertion
Ref Expression
metustexhalf (((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) β†’ βˆƒπ‘£ ∈ 𝐹 (𝑣 ∘ 𝑣) βŠ† 𝐴)
Distinct variable groups:   𝐷,π‘Ž   𝑋,π‘Ž   𝐴,π‘Ž   𝐹,π‘Ž,𝑣   𝑣,𝐴   𝑣,𝐷   𝑣,𝐹   𝑣,𝑋

Proof of Theorem metustexhalf
Dummy variables 𝑏 𝑝 π‘ž π‘Ÿ are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simp-4r 783 . . . 4 (((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) β†’ 𝐷 ∈ (PsMetβ€˜π‘‹))
2 simplr 768 . . . . . 6 (((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) β†’ π‘Ž ∈ ℝ+)
32rphalfcld 13028 . . . . 5 (((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) β†’ (π‘Ž / 2) ∈ ℝ+)
4 eqidd 2734 . . . . 5 (((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) β†’ (◑𝐷 β€œ (0[,)(π‘Ž / 2))) = (◑𝐷 β€œ (0[,)(π‘Ž / 2))))
5 oveq2 7417 . . . . . . 7 (𝑏 = (π‘Ž / 2) β†’ (0[,)𝑏) = (0[,)(π‘Ž / 2)))
65imaeq2d 6060 . . . . . 6 (𝑏 = (π‘Ž / 2) β†’ (◑𝐷 β€œ (0[,)𝑏)) = (◑𝐷 β€œ (0[,)(π‘Ž / 2))))
76rspceeqv 3634 . . . . 5 (((π‘Ž / 2) ∈ ℝ+ ∧ (◑𝐷 β€œ (0[,)(π‘Ž / 2))) = (◑𝐷 β€œ (0[,)(π‘Ž / 2)))) β†’ βˆƒπ‘ ∈ ℝ+ (◑𝐷 β€œ (0[,)(π‘Ž / 2))) = (◑𝐷 β€œ (0[,)𝑏)))
83, 4, 7syl2anc 585 . . . 4 (((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) β†’ βˆƒπ‘ ∈ ℝ+ (◑𝐷 β€œ (0[,)(π‘Ž / 2))) = (◑𝐷 β€œ (0[,)𝑏)))
9 metust.1 . . . . . . 7 𝐹 = ran (π‘Ž ∈ ℝ+ ↦ (◑𝐷 β€œ (0[,)π‘Ž)))
10 oveq2 7417 . . . . . . . . . 10 (π‘Ž = 𝑏 β†’ (0[,)π‘Ž) = (0[,)𝑏))
1110imaeq2d 6060 . . . . . . . . 9 (π‘Ž = 𝑏 β†’ (◑𝐷 β€œ (0[,)π‘Ž)) = (◑𝐷 β€œ (0[,)𝑏)))
1211cbvmptv 5262 . . . . . . . 8 (π‘Ž ∈ ℝ+ ↦ (◑𝐷 β€œ (0[,)π‘Ž))) = (𝑏 ∈ ℝ+ ↦ (◑𝐷 β€œ (0[,)𝑏)))
1312rneqi 5937 . . . . . . 7 ran (π‘Ž ∈ ℝ+ ↦ (◑𝐷 β€œ (0[,)π‘Ž))) = ran (𝑏 ∈ ℝ+ ↦ (◑𝐷 β€œ (0[,)𝑏)))
149, 13eqtri 2761 . . . . . 6 𝐹 = ran (𝑏 ∈ ℝ+ ↦ (◑𝐷 β€œ (0[,)𝑏)))
1514metustel 24059 . . . . 5 (𝐷 ∈ (PsMetβ€˜π‘‹) β†’ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∈ 𝐹 ↔ βˆƒπ‘ ∈ ℝ+ (◑𝐷 β€œ (0[,)(π‘Ž / 2))) = (◑𝐷 β€œ (0[,)𝑏))))
1615biimpar 479 . . . 4 ((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ βˆƒπ‘ ∈ ℝ+ (◑𝐷 β€œ (0[,)(π‘Ž / 2))) = (◑𝐷 β€œ (0[,)𝑏))) β†’ (◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∈ 𝐹)
171, 8, 16syl2anc 585 . . 3 (((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) β†’ (◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∈ 𝐹)
18 relco 6108 . . . . 5 Rel ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))
1918a1i 11 . . . 4 (((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) β†’ Rel ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2)))))
20 cossxp 6272 . . . . . . . . . 10 ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2)))) βŠ† (dom (◑𝐷 β€œ (0[,)(π‘Ž / 2))) Γ— ran (◑𝐷 β€œ (0[,)(π‘Ž / 2))))
21 cnvimass 6081 . . . . . . . . . . . . . 14 (◑𝐷 β€œ (0[,)(π‘Ž / 2))) βŠ† dom 𝐷
22 psmetf 23812 . . . . . . . . . . . . . 14 (𝐷 ∈ (PsMetβ€˜π‘‹) β†’ 𝐷:(𝑋 Γ— 𝑋)βŸΆβ„*)
2321, 22fssdm 6738 . . . . . . . . . . . . 13 (𝐷 ∈ (PsMetβ€˜π‘‹) β†’ (◑𝐷 β€œ (0[,)(π‘Ž / 2))) βŠ† (𝑋 Γ— 𝑋))
24 dmss 5903 . . . . . . . . . . . . . 14 ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) βŠ† (𝑋 Γ— 𝑋) β†’ dom (◑𝐷 β€œ (0[,)(π‘Ž / 2))) βŠ† dom (𝑋 Γ— 𝑋))
25 rnss 5939 . . . . . . . . . . . . . 14 ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) βŠ† (𝑋 Γ— 𝑋) β†’ ran (◑𝐷 β€œ (0[,)(π‘Ž / 2))) βŠ† ran (𝑋 Γ— 𝑋))
26 xpss12 5692 . . . . . . . . . . . . . 14 ((dom (◑𝐷 β€œ (0[,)(π‘Ž / 2))) βŠ† dom (𝑋 Γ— 𝑋) ∧ ran (◑𝐷 β€œ (0[,)(π‘Ž / 2))) βŠ† ran (𝑋 Γ— 𝑋)) β†’ (dom (◑𝐷 β€œ (0[,)(π‘Ž / 2))) Γ— ran (◑𝐷 β€œ (0[,)(π‘Ž / 2)))) βŠ† (dom (𝑋 Γ— 𝑋) Γ— ran (𝑋 Γ— 𝑋)))
2724, 25, 26syl2anc 585 . . . . . . . . . . . . 13 ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) βŠ† (𝑋 Γ— 𝑋) β†’ (dom (◑𝐷 β€œ (0[,)(π‘Ž / 2))) Γ— ran (◑𝐷 β€œ (0[,)(π‘Ž / 2)))) βŠ† (dom (𝑋 Γ— 𝑋) Γ— ran (𝑋 Γ— 𝑋)))
2823, 27syl 17 . . . . . . . . . . . 12 (𝐷 ∈ (PsMetβ€˜π‘‹) β†’ (dom (◑𝐷 β€œ (0[,)(π‘Ž / 2))) Γ— ran (◑𝐷 β€œ (0[,)(π‘Ž / 2)))) βŠ† (dom (𝑋 Γ— 𝑋) Γ— ran (𝑋 Γ— 𝑋)))
2928adantl 483 . . . . . . . . . . 11 ((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) β†’ (dom (◑𝐷 β€œ (0[,)(π‘Ž / 2))) Γ— ran (◑𝐷 β€œ (0[,)(π‘Ž / 2)))) βŠ† (dom (𝑋 Γ— 𝑋) Γ— ran (𝑋 Γ— 𝑋)))
30 dmxp 5929 . . . . . . . . . . . . 13 (𝑋 β‰  βˆ… β†’ dom (𝑋 Γ— 𝑋) = 𝑋)
31 rnxp 6170 . . . . . . . . . . . . 13 (𝑋 β‰  βˆ… β†’ ran (𝑋 Γ— 𝑋) = 𝑋)
3230, 31xpeq12d 5708 . . . . . . . . . . . 12 (𝑋 β‰  βˆ… β†’ (dom (𝑋 Γ— 𝑋) Γ— ran (𝑋 Γ— 𝑋)) = (𝑋 Γ— 𝑋))
3332adantr 482 . . . . . . . . . . 11 ((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) β†’ (dom (𝑋 Γ— 𝑋) Γ— ran (𝑋 Γ— 𝑋)) = (𝑋 Γ— 𝑋))
3429, 33sseqtrd 4023 . . . . . . . . . 10 ((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) β†’ (dom (◑𝐷 β€œ (0[,)(π‘Ž / 2))) Γ— ran (◑𝐷 β€œ (0[,)(π‘Ž / 2)))) βŠ† (𝑋 Γ— 𝑋))
3520, 34sstrid 3994 . . . . . . . . 9 ((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) β†’ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2)))) βŠ† (𝑋 Γ— 𝑋))
3635ad3antrrr 729 . . . . . . . 8 (((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) β†’ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2)))) βŠ† (𝑋 Γ— 𝑋))
3736sselda 3983 . . . . . . 7 ((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) β†’ βŸ¨π‘, π‘žβŸ© ∈ (𝑋 Γ— 𝑋))
38 opelxp 5713 . . . . . . 7 (βŸ¨π‘, π‘žβŸ© ∈ (𝑋 Γ— 𝑋) ↔ (𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋))
3937, 38sylib 217 . . . . . 6 ((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) β†’ (𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋))
40 simpll 766 . . . . . . 7 (((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ (𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋)) β†’ ((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))))
41 simprl 770 . . . . . . 7 (((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ (𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋)) β†’ 𝑝 ∈ 𝑋)
42 simprr 772 . . . . . . 7 (((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ (𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋)) β†’ π‘ž ∈ 𝑋)
43 simplr 768 . . . . . . 7 (((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ (𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋)) β†’ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2)))))
44 simplll 774 . . . . . . . . . . . . . . 15 (((((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋))
4544simp1d 1143 . . . . . . . . . . . . . 14 (((((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ ((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))))
4645, 1syl 17 . . . . . . . . . . . . 13 (((((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ 𝐷 ∈ (PsMetβ€˜π‘‹))
4745, 2syl 17 . . . . . . . . . . . . 13 (((((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ π‘Ž ∈ ℝ+)
4846, 47jca 513 . . . . . . . . . . . 12 (((((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+))
4944simp2d 1144 . . . . . . . . . . . 12 (((((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ 𝑝 ∈ 𝑋)
5044simp3d 1145 . . . . . . . . . . . 12 (((((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ π‘ž ∈ 𝑋)
5148, 49, 503jca 1129 . . . . . . . . . . 11 (((((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ ((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋))
52 simplr 768 . . . . . . . . . . 11 (((((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ π‘Ÿ ∈ 𝑋)
53 simprl 770 . . . . . . . . . . 11 (((((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ 𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ)
54 simprr 772 . . . . . . . . . . 11 (((((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)
55 simpll 766 . . . . . . . . . . . . . . 15 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ ((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋))
5655simp1d 1143 . . . . . . . . . . . . . 14 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+))
5756simpld 496 . . . . . . . . . . . . 13 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ 𝐷 ∈ (PsMetβ€˜π‘‹))
5822ffund 6722 . . . . . . . . . . . . 13 (𝐷 ∈ (PsMetβ€˜π‘‹) β†’ Fun 𝐷)
5957, 58syl 17 . . . . . . . . . . . 12 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ Fun 𝐷)
6055simp2d 1144 . . . . . . . . . . . . . 14 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ 𝑝 ∈ 𝑋)
6155simp3d 1145 . . . . . . . . . . . . . 14 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ π‘ž ∈ 𝑋)
6260, 61opelxpd 5716 . . . . . . . . . . . . 13 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ βŸ¨π‘, π‘žβŸ© ∈ (𝑋 Γ— 𝑋))
6322fdmd 6729 . . . . . . . . . . . . . 14 (𝐷 ∈ (PsMetβ€˜π‘‹) β†’ dom 𝐷 = (𝑋 Γ— 𝑋))
6457, 63syl 17 . . . . . . . . . . . . 13 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ dom 𝐷 = (𝑋 Γ— 𝑋))
6562, 64eleqtrrd 2837 . . . . . . . . . . . 12 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ βŸ¨π‘, π‘žβŸ© ∈ dom 𝐷)
66 0xr 11261 . . . . . . . . . . . . . 14 0 ∈ ℝ*
6766a1i 11 . . . . . . . . . . . . 13 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ 0 ∈ ℝ*)
6856simprd 497 . . . . . . . . . . . . . 14 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ π‘Ž ∈ ℝ+)
6968rpxrd 13017 . . . . . . . . . . . . 13 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ π‘Ž ∈ ℝ*)
7057, 22syl 17 . . . . . . . . . . . . . 14 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ 𝐷:(𝑋 Γ— 𝑋)βŸΆβ„*)
7170, 62ffvelcdmd 7088 . . . . . . . . . . . . 13 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (π·β€˜βŸ¨π‘, π‘žβŸ©) ∈ ℝ*)
72 psmetge0 23818 . . . . . . . . . . . . . . 15 ((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) β†’ 0 ≀ (π‘π·π‘ž))
7357, 60, 61, 72syl3anc 1372 . . . . . . . . . . . . . 14 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ 0 ≀ (π‘π·π‘ž))
74 df-ov 7412 . . . . . . . . . . . . . 14 (π‘π·π‘ž) = (π·β€˜βŸ¨π‘, π‘žβŸ©)
7573, 74breqtrdi 5190 . . . . . . . . . . . . 13 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ 0 ≀ (π·β€˜βŸ¨π‘, π‘žβŸ©))
7674, 71eqeltrid 2838 . . . . . . . . . . . . . . 15 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (π‘π·π‘ž) ∈ ℝ*)
77 0red 11217 . . . . . . . . . . . . . . . . . . 19 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ 0 ∈ ℝ)
7868rpred 13016 . . . . . . . . . . . . . . . . . . . . 21 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ π‘Ž ∈ ℝ)
7978rehalfcld 12459 . . . . . . . . . . . . . . . . . . . 20 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (π‘Ž / 2) ∈ ℝ)
8079rexrd 11264 . . . . . . . . . . . . . . . . . . 19 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (π‘Ž / 2) ∈ ℝ*)
81 df-ov 7412 . . . . . . . . . . . . . . . . . . . 20 (π‘π·π‘Ÿ) = (π·β€˜βŸ¨π‘, π‘ŸβŸ©)
82 simplr 768 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ π‘Ÿ ∈ 𝑋)
8360, 82opelxpd 5716 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ βŸ¨π‘, π‘ŸβŸ© ∈ (𝑋 Γ— 𝑋))
8483, 64eleqtrrd 2837 . . . . . . . . . . . . . . . . . . . . 21 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ βŸ¨π‘, π‘ŸβŸ© ∈ dom 𝐷)
85 simprl 770 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ 𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ)
86 df-br 5150 . . . . . . . . . . . . . . . . . . . . . 22 (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ↔ βŸ¨π‘, π‘ŸβŸ© ∈ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))
8785, 86sylib 217 . . . . . . . . . . . . . . . . . . . . 21 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ βŸ¨π‘, π‘ŸβŸ© ∈ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))
88 fvimacnv 7055 . . . . . . . . . . . . . . . . . . . . . 22 ((Fun 𝐷 ∧ βŸ¨π‘, π‘ŸβŸ© ∈ dom 𝐷) β†’ ((π·β€˜βŸ¨π‘, π‘ŸβŸ©) ∈ (0[,)(π‘Ž / 2)) ↔ βŸ¨π‘, π‘ŸβŸ© ∈ (◑𝐷 β€œ (0[,)(π‘Ž / 2)))))
8988biimpar 479 . . . . . . . . . . . . . . . . . . . . 21 (((Fun 𝐷 ∧ βŸ¨π‘, π‘ŸβŸ© ∈ dom 𝐷) ∧ βŸ¨π‘, π‘ŸβŸ© ∈ (◑𝐷 β€œ (0[,)(π‘Ž / 2)))) β†’ (π·β€˜βŸ¨π‘, π‘ŸβŸ©) ∈ (0[,)(π‘Ž / 2)))
9059, 84, 87, 89syl21anc 837 . . . . . . . . . . . . . . . . . . . 20 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (π·β€˜βŸ¨π‘, π‘ŸβŸ©) ∈ (0[,)(π‘Ž / 2)))
9181, 90eqeltrid 2838 . . . . . . . . . . . . . . . . . . 19 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (π‘π·π‘Ÿ) ∈ (0[,)(π‘Ž / 2)))
92 elico2 13388 . . . . . . . . . . . . . . . . . . . . 21 ((0 ∈ ℝ ∧ (π‘Ž / 2) ∈ ℝ*) β†’ ((π‘π·π‘Ÿ) ∈ (0[,)(π‘Ž / 2)) ↔ ((π‘π·π‘Ÿ) ∈ ℝ ∧ 0 ≀ (π‘π·π‘Ÿ) ∧ (π‘π·π‘Ÿ) < (π‘Ž / 2))))
9392biimpa 478 . . . . . . . . . . . . . . . . . . . 20 (((0 ∈ ℝ ∧ (π‘Ž / 2) ∈ ℝ*) ∧ (π‘π·π‘Ÿ) ∈ (0[,)(π‘Ž / 2))) β†’ ((π‘π·π‘Ÿ) ∈ ℝ ∧ 0 ≀ (π‘π·π‘Ÿ) ∧ (π‘π·π‘Ÿ) < (π‘Ž / 2)))
9493simp1d 1143 . . . . . . . . . . . . . . . . . . 19 (((0 ∈ ℝ ∧ (π‘Ž / 2) ∈ ℝ*) ∧ (π‘π·π‘Ÿ) ∈ (0[,)(π‘Ž / 2))) β†’ (π‘π·π‘Ÿ) ∈ ℝ)
9577, 80, 91, 94syl21anc 837 . . . . . . . . . . . . . . . . . 18 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (π‘π·π‘Ÿ) ∈ ℝ)
96 df-ov 7412 . . . . . . . . . . . . . . . . . . . 20 (π‘Ÿπ·π‘ž) = (π·β€˜βŸ¨π‘Ÿ, π‘žβŸ©)
9782, 61opelxpd 5716 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ βŸ¨π‘Ÿ, π‘žβŸ© ∈ (𝑋 Γ— 𝑋))
9897, 64eleqtrrd 2837 . . . . . . . . . . . . . . . . . . . . 21 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ βŸ¨π‘Ÿ, π‘žβŸ© ∈ dom 𝐷)
99 simprr 772 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)
100 df-br 5150 . . . . . . . . . . . . . . . . . . . . . 22 (π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž ↔ βŸ¨π‘Ÿ, π‘žβŸ© ∈ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))
10199, 100sylib 217 . . . . . . . . . . . . . . . . . . . . 21 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ βŸ¨π‘Ÿ, π‘žβŸ© ∈ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))
102 fvimacnv 7055 . . . . . . . . . . . . . . . . . . . . . 22 ((Fun 𝐷 ∧ βŸ¨π‘Ÿ, π‘žβŸ© ∈ dom 𝐷) β†’ ((π·β€˜βŸ¨π‘Ÿ, π‘žβŸ©) ∈ (0[,)(π‘Ž / 2)) ↔ βŸ¨π‘Ÿ, π‘žβŸ© ∈ (◑𝐷 β€œ (0[,)(π‘Ž / 2)))))
103102biimpar 479 . . . . . . . . . . . . . . . . . . . . 21 (((Fun 𝐷 ∧ βŸ¨π‘Ÿ, π‘žβŸ© ∈ dom 𝐷) ∧ βŸ¨π‘Ÿ, π‘žβŸ© ∈ (◑𝐷 β€œ (0[,)(π‘Ž / 2)))) β†’ (π·β€˜βŸ¨π‘Ÿ, π‘žβŸ©) ∈ (0[,)(π‘Ž / 2)))
10459, 98, 101, 103syl21anc 837 . . . . . . . . . . . . . . . . . . . 20 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (π·β€˜βŸ¨π‘Ÿ, π‘žβŸ©) ∈ (0[,)(π‘Ž / 2)))
10596, 104eqeltrid 2838 . . . . . . . . . . . . . . . . . . 19 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (π‘Ÿπ·π‘ž) ∈ (0[,)(π‘Ž / 2)))
106 elico2 13388 . . . . . . . . . . . . . . . . . . . . 21 ((0 ∈ ℝ ∧ (π‘Ž / 2) ∈ ℝ*) β†’ ((π‘Ÿπ·π‘ž) ∈ (0[,)(π‘Ž / 2)) ↔ ((π‘Ÿπ·π‘ž) ∈ ℝ ∧ 0 ≀ (π‘Ÿπ·π‘ž) ∧ (π‘Ÿπ·π‘ž) < (π‘Ž / 2))))
107106biimpa 478 . . . . . . . . . . . . . . . . . . . 20 (((0 ∈ ℝ ∧ (π‘Ž / 2) ∈ ℝ*) ∧ (π‘Ÿπ·π‘ž) ∈ (0[,)(π‘Ž / 2))) β†’ ((π‘Ÿπ·π‘ž) ∈ ℝ ∧ 0 ≀ (π‘Ÿπ·π‘ž) ∧ (π‘Ÿπ·π‘ž) < (π‘Ž / 2)))
108107simp1d 1143 . . . . . . . . . . . . . . . . . . 19 (((0 ∈ ℝ ∧ (π‘Ž / 2) ∈ ℝ*) ∧ (π‘Ÿπ·π‘ž) ∈ (0[,)(π‘Ž / 2))) β†’ (π‘Ÿπ·π‘ž) ∈ ℝ)
10977, 80, 105, 108syl21anc 837 . . . . . . . . . . . . . . . . . 18 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (π‘Ÿπ·π‘ž) ∈ ℝ)
11095, 109rexaddd 13213 . . . . . . . . . . . . . . . . 17 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ ((π‘π·π‘Ÿ) +𝑒 (π‘Ÿπ·π‘ž)) = ((π‘π·π‘Ÿ) + (π‘Ÿπ·π‘ž)))
11195, 109readdcld 11243 . . . . . . . . . . . . . . . . 17 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ ((π‘π·π‘Ÿ) + (π‘Ÿπ·π‘ž)) ∈ ℝ)
112110, 111eqeltrd 2834 . . . . . . . . . . . . . . . 16 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ ((π‘π·π‘Ÿ) +𝑒 (π‘Ÿπ·π‘ž)) ∈ ℝ)
113112rexrd 11264 . . . . . . . . . . . . . . 15 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ ((π‘π·π‘Ÿ) +𝑒 (π‘Ÿπ·π‘ž)) ∈ ℝ*)
114 psmettri 23817 . . . . . . . . . . . . . . . 16 ((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ (𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋 ∧ π‘Ÿ ∈ 𝑋)) β†’ (π‘π·π‘ž) ≀ ((π‘π·π‘Ÿ) +𝑒 (π‘Ÿπ·π‘ž)))
11557, 60, 61, 82, 114syl13anc 1373 . . . . . . . . . . . . . . 15 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (π‘π·π‘ž) ≀ ((π‘π·π‘Ÿ) +𝑒 (π‘Ÿπ·π‘ž)))
11693simp3d 1145 . . . . . . . . . . . . . . . . . 18 (((0 ∈ ℝ ∧ (π‘Ž / 2) ∈ ℝ*) ∧ (π‘π·π‘Ÿ) ∈ (0[,)(π‘Ž / 2))) β†’ (π‘π·π‘Ÿ) < (π‘Ž / 2))
11777, 80, 91, 116syl21anc 837 . . . . . . . . . . . . . . . . 17 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (π‘π·π‘Ÿ) < (π‘Ž / 2))
118107simp3d 1145 . . . . . . . . . . . . . . . . . 18 (((0 ∈ ℝ ∧ (π‘Ž / 2) ∈ ℝ*) ∧ (π‘Ÿπ·π‘ž) ∈ (0[,)(π‘Ž / 2))) β†’ (π‘Ÿπ·π‘ž) < (π‘Ž / 2))
11977, 80, 105, 118syl21anc 837 . . . . . . . . . . . . . . . . 17 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (π‘Ÿπ·π‘ž) < (π‘Ž / 2))
12095, 109, 78, 117, 119lt2halvesd 12460 . . . . . . . . . . . . . . . 16 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ ((π‘π·π‘Ÿ) + (π‘Ÿπ·π‘ž)) < π‘Ž)
121110, 120eqbrtrd 5171 . . . . . . . . . . . . . . 15 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ ((π‘π·π‘Ÿ) +𝑒 (π‘Ÿπ·π‘ž)) < π‘Ž)
12276, 113, 69, 115, 121xrlelttrd 13139 . . . . . . . . . . . . . 14 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (π‘π·π‘ž) < π‘Ž)
12374, 122eqbrtrrid 5185 . . . . . . . . . . . . 13 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (π·β€˜βŸ¨π‘, π‘žβŸ©) < π‘Ž)
12467, 69, 71, 75, 123elicod 13374 . . . . . . . . . . . 12 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (π·β€˜βŸ¨π‘, π‘žβŸ©) ∈ (0[,)π‘Ž))
125 fvimacnv 7055 . . . . . . . . . . . . . 14 ((Fun 𝐷 ∧ βŸ¨π‘, π‘žβŸ© ∈ dom 𝐷) β†’ ((π·β€˜βŸ¨π‘, π‘žβŸ©) ∈ (0[,)π‘Ž) ↔ βŸ¨π‘, π‘žβŸ© ∈ (◑𝐷 β€œ (0[,)π‘Ž))))
126125biimpa 478 . . . . . . . . . . . . 13 (((Fun 𝐷 ∧ βŸ¨π‘, π‘žβŸ© ∈ dom 𝐷) ∧ (π·β€˜βŸ¨π‘, π‘žβŸ©) ∈ (0[,)π‘Ž)) β†’ βŸ¨π‘, π‘žβŸ© ∈ (◑𝐷 β€œ (0[,)π‘Ž)))
127 df-br 5150 . . . . . . . . . . . . 13 (𝑝(◑𝐷 β€œ (0[,)π‘Ž))π‘ž ↔ βŸ¨π‘, π‘žβŸ© ∈ (◑𝐷 β€œ (0[,)π‘Ž)))
128126, 127sylibr 233 . . . . . . . . . . . 12 (((Fun 𝐷 ∧ βŸ¨π‘, π‘žβŸ© ∈ dom 𝐷) ∧ (π·β€˜βŸ¨π‘, π‘žβŸ©) ∈ (0[,)π‘Ž)) β†’ 𝑝(◑𝐷 β€œ (0[,)π‘Ž))π‘ž)
12959, 65, 124, 128syl21anc 837 . . . . . . . . . . 11 (((((𝐷 ∈ (PsMetβ€˜π‘‹) ∧ π‘Ž ∈ ℝ+) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ 𝑝(◑𝐷 β€œ (0[,)π‘Ž))π‘ž)
13051, 52, 53, 54, 129syl22anc 838 . . . . . . . . . 10 (((((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ 𝑝(◑𝐷 β€œ (0[,)π‘Ž))π‘ž)
13145simprd 497 . . . . . . . . . . 11 (((((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž)))
132131breqd 5160 . . . . . . . . . 10 (((((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ (π‘π΄π‘ž ↔ 𝑝(◑𝐷 β€œ (0[,)π‘Ž))π‘ž))
133130, 132mpbird 257 . . . . . . . . 9 (((((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ π‘Ÿ ∈ 𝑋) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ π‘π΄π‘ž)
134 simpr 486 . . . . . . . . . . . . 13 (((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) β†’ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2)))))
135 df-br 5150 . . . . . . . . . . . . 13 (𝑝((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))π‘ž ↔ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2)))))
136134, 135sylibr 233 . . . . . . . . . . . 12 (((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) β†’ 𝑝((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))π‘ž)
137 vex 3479 . . . . . . . . . . . . 13 𝑝 ∈ V
138 vex 3479 . . . . . . . . . . . . 13 π‘ž ∈ V
139137, 138brco 5871 . . . . . . . . . . . 12 (𝑝((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))π‘ž ↔ βˆƒπ‘Ÿ(𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž))
140136, 139sylib 217 . . . . . . . . . . 11 (((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) β†’ βˆƒπ‘Ÿ(𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž))
14123adantl 483 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) β†’ (◑𝐷 β€œ (0[,)(π‘Ž / 2))) βŠ† (𝑋 Γ— 𝑋))
142141, 25syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) β†’ ran (◑𝐷 β€œ (0[,)(π‘Ž / 2))) βŠ† ran (𝑋 Γ— 𝑋))
14331adantr 482 . . . . . . . . . . . . . . . . . . . . 21 ((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) β†’ ran (𝑋 Γ— 𝑋) = 𝑋)
144142, 143sseqtrd 4023 . . . . . . . . . . . . . . . . . . . 20 ((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) β†’ ran (◑𝐷 β€œ (0[,)(π‘Ž / 2))) βŠ† 𝑋)
145144adantr 482 . . . . . . . . . . . . . . . . . . 19 (((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ) β†’ ran (◑𝐷 β€œ (0[,)(π‘Ž / 2))) βŠ† 𝑋)
146 vex 3479 . . . . . . . . . . . . . . . . . . . . 21 π‘Ÿ ∈ V
147137, 146brelrn 5942 . . . . . . . . . . . . . . . . . . . 20 (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ β†’ π‘Ÿ ∈ ran (◑𝐷 β€œ (0[,)(π‘Ž / 2))))
148147adantl 483 . . . . . . . . . . . . . . . . . . 19 (((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ) β†’ π‘Ÿ ∈ ran (◑𝐷 β€œ (0[,)(π‘Ž / 2))))
149145, 148sseldd 3984 . . . . . . . . . . . . . . . . . 18 (((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ) β†’ π‘Ÿ ∈ 𝑋)
150149adantrr 716 . . . . . . . . . . . . . . . . 17 (((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)) β†’ π‘Ÿ ∈ 𝑋)
151150ex 414 . . . . . . . . . . . . . . . 16 ((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) β†’ ((𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž) β†’ π‘Ÿ ∈ 𝑋))
152151ancrd 553 . . . . . . . . . . . . . . 15 ((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) β†’ ((𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž) β†’ (π‘Ÿ ∈ 𝑋 ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž))))
153152eximdv 1921 . . . . . . . . . . . . . 14 ((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) β†’ (βˆƒπ‘Ÿ(𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž) β†’ βˆƒπ‘Ÿ(π‘Ÿ ∈ 𝑋 ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž))))
154153ad3antrrr 729 . . . . . . . . . . . . 13 (((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) β†’ (βˆƒπ‘Ÿ(𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž) β†’ βˆƒπ‘Ÿ(π‘Ÿ ∈ 𝑋 ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž))))
1551543ad2ant1 1134 . . . . . . . . . . . 12 ((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) β†’ (βˆƒπ‘Ÿ(𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž) β†’ βˆƒπ‘Ÿ(π‘Ÿ ∈ 𝑋 ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž))))
156155adantr 482 . . . . . . . . . . 11 (((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) β†’ (βˆƒπ‘Ÿ(𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž) β†’ βˆƒπ‘Ÿ(π‘Ÿ ∈ 𝑋 ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž))))
157140, 156mpd 15 . . . . . . . . . 10 (((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) β†’ βˆƒπ‘Ÿ(π‘Ÿ ∈ 𝑋 ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)))
158 df-rex 3072 . . . . . . . . . 10 (βˆƒπ‘Ÿ ∈ 𝑋 (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž) ↔ βˆƒπ‘Ÿ(π‘Ÿ ∈ 𝑋 ∧ (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž)))
159157, 158sylibr 233 . . . . . . . . 9 (((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) β†’ βˆƒπ‘Ÿ ∈ 𝑋 (𝑝(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘Ÿ ∧ π‘Ÿ(◑𝐷 β€œ (0[,)(π‘Ž / 2)))π‘ž))
160133, 159r19.29a 3163 . . . . . . . 8 (((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) β†’ π‘π΄π‘ž)
161 df-br 5150 . . . . . . . 8 (π‘π΄π‘ž ↔ βŸ¨π‘, π‘žβŸ© ∈ 𝐴)
162160, 161sylib 217 . . . . . . 7 (((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ 𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) β†’ βŸ¨π‘, π‘žβŸ© ∈ 𝐴)
16340, 41, 42, 43, 162syl31anc 1374 . . . . . 6 (((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) ∧ (𝑝 ∈ 𝑋 ∧ π‘ž ∈ 𝑋)) β†’ βŸ¨π‘, π‘žβŸ© ∈ 𝐴)
16439, 163mpdan 686 . . . . 5 ((((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) ∧ βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2))))) β†’ βŸ¨π‘, π‘žβŸ© ∈ 𝐴)
165164ex 414 . . . 4 (((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) β†’ (βŸ¨π‘, π‘žβŸ© ∈ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2)))) β†’ βŸ¨π‘, π‘žβŸ© ∈ 𝐴))
16619, 165relssdv 5789 . . 3 (((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) β†’ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2)))) βŠ† 𝐴)
167 id 22 . . . . . 6 (𝑣 = (◑𝐷 β€œ (0[,)(π‘Ž / 2))) β†’ 𝑣 = (◑𝐷 β€œ (0[,)(π‘Ž / 2))))
168167, 167coeq12d 5865 . . . . 5 (𝑣 = (◑𝐷 β€œ (0[,)(π‘Ž / 2))) β†’ (𝑣 ∘ 𝑣) = ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2)))))
169168sseq1d 4014 . . . 4 (𝑣 = (◑𝐷 β€œ (0[,)(π‘Ž / 2))) β†’ ((𝑣 ∘ 𝑣) βŠ† 𝐴 ↔ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2)))) βŠ† 𝐴))
170169rspcev 3613 . . 3 (((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∈ 𝐹 ∧ ((◑𝐷 β€œ (0[,)(π‘Ž / 2))) ∘ (◑𝐷 β€œ (0[,)(π‘Ž / 2)))) βŠ† 𝐴) β†’ βˆƒπ‘£ ∈ 𝐹 (𝑣 ∘ 𝑣) βŠ† 𝐴)
17117, 166, 170syl2anc 585 . 2 (((((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) ∧ π‘Ž ∈ ℝ+) ∧ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))) β†’ βˆƒπ‘£ ∈ 𝐹 (𝑣 ∘ 𝑣) βŠ† 𝐴)
1729metustel 24059 . . . 4 (𝐷 ∈ (PsMetβ€˜π‘‹) β†’ (𝐴 ∈ 𝐹 ↔ βˆƒπ‘Ž ∈ ℝ+ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))))
173172adantl 483 . . 3 ((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) β†’ (𝐴 ∈ 𝐹 ↔ βˆƒπ‘Ž ∈ ℝ+ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž))))
174173biimpa 478 . 2 (((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) β†’ βˆƒπ‘Ž ∈ ℝ+ 𝐴 = (◑𝐷 β€œ (0[,)π‘Ž)))
175171, 174r19.29a 3163 1 (((𝑋 β‰  βˆ… ∧ 𝐷 ∈ (PsMetβ€˜π‘‹)) ∧ 𝐴 ∈ 𝐹) β†’ βˆƒπ‘£ ∈ 𝐹 (𝑣 ∘ 𝑣) βŠ† 𝐴)
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ↔ wb 205   ∧ wa 397   ∧ w3a 1088   = wceq 1542  βˆƒwex 1782   ∈ wcel 2107   β‰  wne 2941  βˆƒwrex 3071   βŠ† wss 3949  βˆ…c0 4323  βŸ¨cop 4635   class class class wbr 5149   ↦ cmpt 5232   Γ— cxp 5675  β—‘ccnv 5676  dom cdm 5677  ran crn 5678   β€œ cima 5680   ∘ ccom 5681  Rel wrel 5682  Fun wfun 6538  βŸΆwf 6540  β€˜cfv 6544  (class class class)co 7409  β„cr 11109  0cc0 11110   + caddc 11113  β„*cxr 11247   < clt 11248   ≀ cle 11249   / cdiv 11871  2c2 12267  β„+crp 12974   +𝑒 cxad 13090  [,)cico 13326  PsMetcpsmet 20928
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-sep 5300  ax-nul 5307  ax-pow 5364  ax-pr 5428  ax-un 7725  ax-cnex 11166  ax-resscn 11167  ax-1cn 11168  ax-icn 11169  ax-addcl 11170  ax-addrcl 11171  ax-mulcl 11172  ax-mulrcl 11173  ax-mulcom 11174  ax-addass 11175  ax-mulass 11176  ax-distr 11177  ax-i2m1 11178  ax-1ne0 11179  ax-1rid 11180  ax-rnegex 11181  ax-rrecex 11182  ax-cnre 11183  ax-pre-lttri 11184  ax-pre-lttrn 11185  ax-pre-ltadd 11186  ax-pre-mulgt0 11187
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3377  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3779  df-csb 3895  df-dif 3952  df-un 3954  df-in 3956  df-ss 3966  df-nul 4324  df-if 4530  df-pw 4605  df-sn 4630  df-pr 4632  df-op 4636  df-uni 4910  df-iun 5000  df-br 5150  df-opab 5212  df-mpt 5233  df-id 5575  df-po 5589  df-so 5590  df-xp 5683  df-rel 5684  df-cnv 5685  df-co 5686  df-dm 5687  df-rn 5688  df-res 5689  df-ima 5690  df-iota 6496  df-fun 6546  df-fn 6547  df-f 6548  df-f1 6549  df-fo 6550  df-f1o 6551  df-fv 6552  df-riota 7365  df-ov 7412  df-oprab 7413  df-mpo 7414  df-1st 7975  df-2nd 7976  df-er 8703  df-map 8822  df-en 8940  df-dom 8941  df-sdom 8942  df-pnf 11250  df-mnf 11251  df-xr 11252  df-ltxr 11253  df-le 11254  df-sub 11446  df-neg 11447  df-div 11872  df-2 12275  df-rp 12975  df-xneg 13092  df-xadd 13093  df-xmul 13094  df-ico 13330  df-psmet 20936
This theorem is referenced by:  metust  24067
  Copyright terms: Public domain W3C validator