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

Theorem rrxdstprj1 23715
Description: The distance between two points in Euclidean space is greater than the distance between the projections onto one coordinate. (Contributed by Jeff Madsen, 2-Sep-2009.) (Revised by Mario Carneiro, 13-Sep-2015.) (Revised by Thierry Arnoux, 7-Jul-2019.)
Hypotheses
Ref Expression
rrxmval.1 𝑋 = { ∈ (ℝ ↑𝑚 𝐼) ∣ finSupp 0}
rrxmval.d 𝐷 = (dist‘(ℝ^‘𝐼))
rrxdstprj1.1 𝑀 = ((abs ∘ − ) ↾ (ℝ × ℝ))
Assertion
Ref Expression
rrxdstprj1 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → ((𝐹𝐴)𝑀(𝐺𝐴)) ≤ (𝐹𝐷𝐺))
Distinct variable groups:   ,𝐹   ,𝐺   ,𝐼   ,𝑉
Allowed substitution hints:   𝐴()   𝐷()   𝑀()   𝑋()

Proof of Theorem rrxdstprj1
Dummy variable 𝑘 is distinct from all other variables.
StepHypRef Expression
1 simplll 762 . . 3 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) → 𝐼𝑉)
2 simpr 477 . . 3 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) → 𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0)))
3 simplr 756 . . 3 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) → (𝐹𝑋𝐺𝑋))
4 rrxmval.1 . . . . . . . . 9 𝑋 = { ∈ (ℝ ↑𝑚 𝐼) ∣ finSupp 0}
5 simprl 758 . . . . . . . . 9 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → 𝐹𝑋)
64, 5rrxfsupp 23708 . . . . . . . 8 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (𝐹 supp 0) ∈ Fin)
7 simprr 760 . . . . . . . . 9 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → 𝐺𝑋)
84, 7rrxfsupp 23708 . . . . . . . 8 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (𝐺 supp 0) ∈ Fin)
9 unfi 8580 . . . . . . . 8 (((𝐹 supp 0) ∈ Fin ∧ (𝐺 supp 0) ∈ Fin) → ((𝐹 supp 0) ∪ (𝐺 supp 0)) ∈ Fin)
106, 8, 9syl2anc 576 . . . . . . 7 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((𝐹 supp 0) ∪ (𝐺 supp 0)) ∈ Fin)
114, 5rrxsuppss 23709 . . . . . . . . . 10 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (𝐹 supp 0) ⊆ 𝐼)
124, 7rrxsuppss 23709 . . . . . . . . . 10 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (𝐺 supp 0) ⊆ 𝐼)
1311, 12unssd 4051 . . . . . . . . 9 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((𝐹 supp 0) ∪ (𝐺 supp 0)) ⊆ 𝐼)
1413sselda 3859 . . . . . . . 8 ((((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) → 𝑘𝐼)
154, 5rrxf 23707 . . . . . . . . . . 11 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → 𝐹:𝐼⟶ℝ)
1615ffvelrnda 6676 . . . . . . . . . 10 ((((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝑘𝐼) → (𝐹𝑘) ∈ ℝ)
174, 7rrxf 23707 . . . . . . . . . . 11 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → 𝐺:𝐼⟶ℝ)
1817ffvelrnda 6676 . . . . . . . . . 10 ((((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝑘𝐼) → (𝐺𝑘) ∈ ℝ)
1916, 18resubcld 10869 . . . . . . . . 9 ((((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝑘𝐼) → ((𝐹𝑘) − (𝐺𝑘)) ∈ ℝ)
2019resqcld 13426 . . . . . . . 8 ((((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝑘𝐼) → (((𝐹𝑘) − (𝐺𝑘))↑2) ∈ ℝ)
2114, 20syldan 582 . . . . . . 7 ((((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) → (((𝐹𝑘) − (𝐺𝑘))↑2) ∈ ℝ)
2219sqge0d 13427 . . . . . . . 8 ((((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝑘𝐼) → 0 ≤ (((𝐹𝑘) − (𝐺𝑘))↑2))
2314, 22syldan 582 . . . . . . 7 ((((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) → 0 ≤ (((𝐹𝑘) − (𝐺𝑘))↑2))
24 fveq2 6499 . . . . . . . . 9 (𝑘 = 𝐴 → (𝐹𝑘) = (𝐹𝐴))
25 fveq2 6499 . . . . . . . . 9 (𝑘 = 𝐴 → (𝐺𝑘) = (𝐺𝐴))
2624, 25oveq12d 6994 . . . . . . . 8 (𝑘 = 𝐴 → ((𝐹𝑘) − (𝐺𝑘)) = ((𝐹𝐴) − (𝐺𝐴)))
2726oveq1d 6991 . . . . . . 7 (𝑘 = 𝐴 → (((𝐹𝑘) − (𝐺𝑘))↑2) = (((𝐹𝐴) − (𝐺𝐴))↑2))
28 simplr 756 . . . . . . 7 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → 𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0)))
2910, 21, 23, 27, 28fsumge1 15012 . . . . . 6 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (((𝐹𝐴) − (𝐺𝐴))↑2) ≤ Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2))
3013, 28sseldd 3860 . . . . . . . . 9 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → 𝐴𝐼)
3115, 30ffvelrnd 6677 . . . . . . . 8 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (𝐹𝐴) ∈ ℝ)
3217, 30ffvelrnd 6677 . . . . . . . 8 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (𝐺𝐴) ∈ ℝ)
3331, 32resubcld 10869 . . . . . . 7 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((𝐹𝐴) − (𝐺𝐴)) ∈ ℝ)
34 absresq 14523 . . . . . . 7 (((𝐹𝐴) − (𝐺𝐴)) ∈ ℝ → ((abs‘((𝐹𝐴) − (𝐺𝐴)))↑2) = (((𝐹𝐴) − (𝐺𝐴))↑2))
3533, 34syl 17 . . . . . 6 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((abs‘((𝐹𝐴) − (𝐺𝐴)))↑2) = (((𝐹𝐴) − (𝐺𝐴))↑2))
3610, 21fsumrecl 14951 . . . . . . 7 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2) ∈ ℝ)
3710, 21, 23fsumge0 15010 . . . . . . 7 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → 0 ≤ Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2))
38 resqrtth 14476 . . . . . . 7 ((Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2) ∈ ℝ ∧ 0 ≤ Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2)) → ((√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2))↑2) = Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2))
3936, 37, 38syl2anc 576 . . . . . 6 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2))↑2) = Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2))
4029, 35, 393brtr4d 4961 . . . . 5 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((abs‘((𝐹𝐴) − (𝐺𝐴)))↑2) ≤ ((√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2))↑2))
4133recnd 10468 . . . . . . 7 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((𝐹𝐴) − (𝐺𝐴)) ∈ ℂ)
4241abscld 14657 . . . . . 6 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (abs‘((𝐹𝐴) − (𝐺𝐴))) ∈ ℝ)
4336, 37resqrtcld 14638 . . . . . 6 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2)) ∈ ℝ)
4441absge0d 14665 . . . . . 6 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → 0 ≤ (abs‘((𝐹𝐴) − (𝐺𝐴))))
4536, 37sqrtge0d 14641 . . . . . 6 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → 0 ≤ (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2)))
4642, 43, 44, 45le2sqd 13435 . . . . 5 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((abs‘((𝐹𝐴) − (𝐺𝐴))) ≤ (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2)) ↔ ((abs‘((𝐹𝐴) − (𝐺𝐴)))↑2) ≤ ((√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2))↑2)))
4740, 46mpbird 249 . . . 4 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (abs‘((𝐹𝐴) − (𝐺𝐴))) ≤ (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2)))
48 rrxdstprj1.1 . . . . . 6 𝑀 = ((abs ∘ − ) ↾ (ℝ × ℝ))
4948remetdval 23100 . . . . 5 (((𝐹𝐴) ∈ ℝ ∧ (𝐺𝐴) ∈ ℝ) → ((𝐹𝐴)𝑀(𝐺𝐴)) = (abs‘((𝐹𝐴) − (𝐺𝐴))))
5031, 32, 49syl2anc 576 . . . 4 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((𝐹𝐴)𝑀(𝐺𝐴)) = (abs‘((𝐹𝐴) − (𝐺𝐴))))
51 rrxmval.d . . . . . . 7 𝐷 = (dist‘(ℝ^‘𝐼))
524, 51rrxmval 23711 . . . . . 6 ((𝐼𝑉𝐹𝑋𝐺𝑋) → (𝐹𝐷𝐺) = (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2)))
53523expb 1100 . . . . 5 ((𝐼𝑉 ∧ (𝐹𝑋𝐺𝑋)) → (𝐹𝐷𝐺) = (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2)))
5453adantlr 702 . . . 4 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (𝐹𝐷𝐺) = (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2)))
5547, 50, 543brtr4d 4961 . . 3 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((𝐹𝐴)𝑀(𝐺𝐴)) ≤ (𝐹𝐷𝐺))
561, 2, 3, 55syl21anc 825 . 2 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) → ((𝐹𝐴)𝑀(𝐺𝐴)) ≤ (𝐹𝐷𝐺))
57 simplll 762 . . . . . . 7 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → 𝐼𝑉)
58 simplrl 764 . . . . . . 7 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → 𝐹𝑋)
59 ssun1 4038 . . . . . . . . . 10 (𝐹 supp 0) ⊆ ((𝐹 supp 0) ∪ (𝐺 supp 0))
6059a1i 11 . . . . . . . . 9 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → (𝐹 supp 0) ⊆ ((𝐹 supp 0) ∪ (𝐺 supp 0)))
6160sscond 4009 . . . . . . . 8 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ⊆ (𝐼 ∖ (𝐹 supp 0)))
6261sselda 3859 . . . . . . 7 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → 𝐴 ∈ (𝐼 ∖ (𝐹 supp 0)))
63 simpr 477 . . . . . . . . 9 ((𝐼𝑉𝐹𝑋) → 𝐹𝑋)
644, 63rrxf 23707 . . . . . . . 8 ((𝐼𝑉𝐹𝑋) → 𝐹:𝐼⟶ℝ)
65 ssidd 3881 . . . . . . . 8 ((𝐼𝑉𝐹𝑋) → (𝐹 supp 0) ⊆ (𝐹 supp 0))
66 simpl 475 . . . . . . . 8 ((𝐼𝑉𝐹𝑋) → 𝐼𝑉)
67 0red 10443 . . . . . . . 8 ((𝐼𝑉𝐹𝑋) → 0 ∈ ℝ)
6864, 65, 66, 67suppssr 7664 . . . . . . 7 (((𝐼𝑉𝐹𝑋) ∧ 𝐴 ∈ (𝐼 ∖ (𝐹 supp 0))) → (𝐹𝐴) = 0)
6957, 58, 62, 68syl21anc 825 . . . . . 6 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → (𝐹𝐴) = 0)
70 0red 10443 . . . . . 6 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → 0 ∈ ℝ)
7169, 70eqeltrd 2867 . . . . 5 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → (𝐹𝐴) ∈ ℝ)
72 simplrr 765 . . . . . . 7 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → 𝐺𝑋)
73 ssun2 4039 . . . . . . . . . 10 (𝐺 supp 0) ⊆ ((𝐹 supp 0) ∪ (𝐺 supp 0))
7473a1i 11 . . . . . . . . 9 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → (𝐺 supp 0) ⊆ ((𝐹 supp 0) ∪ (𝐺 supp 0)))
7574sscond 4009 . . . . . . . 8 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ⊆ (𝐼 ∖ (𝐺 supp 0)))
7675sselda 3859 . . . . . . 7 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → 𝐴 ∈ (𝐼 ∖ (𝐺 supp 0)))
77 simpr 477 . . . . . . . . 9 ((𝐼𝑉𝐺𝑋) → 𝐺𝑋)
784, 77rrxf 23707 . . . . . . . 8 ((𝐼𝑉𝐺𝑋) → 𝐺:𝐼⟶ℝ)
79 ssidd 3881 . . . . . . . 8 ((𝐼𝑉𝐺𝑋) → (𝐺 supp 0) ⊆ (𝐺 supp 0))
80 simpl 475 . . . . . . . 8 ((𝐼𝑉𝐺𝑋) → 𝐼𝑉)
81 0red 10443 . . . . . . . 8 ((𝐼𝑉𝐺𝑋) → 0 ∈ ℝ)
8278, 79, 80, 81suppssr 7664 . . . . . . 7 (((𝐼𝑉𝐺𝑋) ∧ 𝐴 ∈ (𝐼 ∖ (𝐺 supp 0))) → (𝐺𝐴) = 0)
8357, 72, 76, 82syl21anc 825 . . . . . 6 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → (𝐺𝐴) = 0)
8483, 70eqeltrd 2867 . . . . 5 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → (𝐺𝐴) ∈ ℝ)
8571, 84, 49syl2anc 576 . . . 4 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → ((𝐹𝐴)𝑀(𝐺𝐴)) = (abs‘((𝐹𝐴) − (𝐺𝐴))))
8669, 83oveq12d 6994 . . . . . 6 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → ((𝐹𝐴) − (𝐺𝐴)) = (0 − 0))
87 0m0e0 11567 . . . . . 6 (0 − 0) = 0
8886, 87syl6eq 2831 . . . . 5 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → ((𝐹𝐴) − (𝐺𝐴)) = 0)
8988abs00bd 14512 . . . 4 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → (abs‘((𝐹𝐴) − (𝐺𝐴))) = 0)
9085, 89eqtrd 2815 . . 3 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → ((𝐹𝐴)𝑀(𝐺𝐴)) = 0)
914, 51rrxmet 23714 . . . . 5 (𝐼𝑉𝐷 ∈ (Met‘𝑋))
9291ad3antrrr 717 . . . 4 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → 𝐷 ∈ (Met‘𝑋))
93 metge0 22658 . . . 4 ((𝐷 ∈ (Met‘𝑋) ∧ 𝐹𝑋𝐺𝑋) → 0 ≤ (𝐹𝐷𝐺))
9492, 58, 72, 93syl3anc 1351 . . 3 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → 0 ≤ (𝐹𝐷𝐺))
9590, 94eqbrtrd 4951 . 2 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → ((𝐹𝐴)𝑀(𝐺𝐴)) ≤ (𝐹𝐷𝐺))
96 simplr 756 . . . 4 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → 𝐴𝐼)
97 simprl 758 . . . . . . 7 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → 𝐹𝑋)
984, 97rrxsuppss 23709 . . . . . 6 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → (𝐹 supp 0) ⊆ 𝐼)
99 simprr 760 . . . . . . 7 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → 𝐺𝑋)
1004, 99rrxsuppss 23709 . . . . . 6 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → (𝐺 supp 0) ⊆ 𝐼)
10198, 100unssd 4051 . . . . 5 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → ((𝐹 supp 0) ∪ (𝐺 supp 0)) ⊆ 𝐼)
102 undif 4313 . . . . 5 (((𝐹 supp 0) ∪ (𝐺 supp 0)) ⊆ 𝐼 ↔ (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∪ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) = 𝐼)
103101, 102sylib 210 . . . 4 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∪ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) = 𝐼)
10496, 103eleqtrrd 2870 . . 3 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → 𝐴 ∈ (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∪ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))))
105 elun 4015 . . 3 (𝐴 ∈ (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∪ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) ↔ (𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0)) ∨ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))))
106104, 105sylib 210 . 2 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → (𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0)) ∨ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))))
10756, 95, 106mpjaodan 941 1 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → ((𝐹𝐴)𝑀(𝐺𝐴)) ≤ (𝐹𝐷𝐺))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 387  wo 833   = wceq 1507  wcel 2050  {crab 3093  cdif 3827  cun 3828  wss 3830   class class class wbr 4929   × cxp 5405  cres 5409  ccom 5411  cfv 6188  (class class class)co 6976   supp csupp 7633  𝑚 cmap 8206  Fincfn 8306   finSupp cfsupp 8628  cr 10334  0cc0 10335  cle 10475  cmin 10670  2c2 11495  cexp 13244  csqrt 14453  abscabs 14454  Σcsu 14903  distcds 16430  Metcmet 20233  ℝ^crrx 23689
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1758  ax-4 1772  ax-5 1869  ax-6 1928  ax-7 1965  ax-8 2052  ax-9 2059  ax-10 2079  ax-11 2093  ax-12 2106  ax-13 2301  ax-ext 2751  ax-rep 5049  ax-sep 5060  ax-nul 5067  ax-pow 5119  ax-pr 5186  ax-un 7279  ax-inf2 8898  ax-cnex 10391  ax-resscn 10392  ax-1cn 10393  ax-icn 10394  ax-addcl 10395  ax-addrcl 10396  ax-mulcl 10397  ax-mulrcl 10398  ax-mulcom 10399  ax-addass 10400  ax-mulass 10401  ax-distr 10402  ax-i2m1 10403  ax-1ne0 10404  ax-1rid 10405  ax-rnegex 10406  ax-rrecex 10407  ax-cnre 10408  ax-pre-lttri 10409  ax-pre-lttrn 10410  ax-pre-ltadd 10411  ax-pre-mulgt0 10412  ax-pre-sup 10413  ax-addf 10414  ax-mulf 10415
This theorem depends on definitions:  df-bi 199  df-an 388  df-or 834  df-3or 1069  df-3an 1070  df-tru 1510  df-fal 1520  df-ex 1743  df-nf 1747  df-sb 2016  df-mo 2547  df-eu 2584  df-clab 2760  df-cleq 2772  df-clel 2847  df-nfc 2919  df-ne 2969  df-nel 3075  df-ral 3094  df-rex 3095  df-reu 3096  df-rmo 3097  df-rab 3098  df-v 3418  df-sbc 3683  df-csb 3788  df-dif 3833  df-un 3835  df-in 3837  df-ss 3844  df-pss 3846  df-nul 4180  df-if 4351  df-pw 4424  df-sn 4442  df-pr 4444  df-tp 4446  df-op 4448  df-uni 4713  df-int 4750  df-iun 4794  df-br 4930  df-opab 4992  df-mpt 5009  df-tr 5031  df-id 5312  df-eprel 5317  df-po 5326  df-so 5327  df-fr 5366  df-se 5367  df-we 5368  df-xp 5413  df-rel 5414  df-cnv 5415  df-co 5416  df-dm 5417  df-rn 5418  df-res 5419  df-ima 5420  df-pred 5986  df-ord 6032  df-on 6033  df-lim 6034  df-suc 6035  df-iota 6152  df-fun 6190  df-fn 6191  df-f 6192  df-f1 6193  df-fo 6194  df-f1o 6195  df-fv 6196  df-isom 6197  df-riota 6937  df-ov 6979  df-oprab 6980  df-mpo 6981  df-of 7227  df-om 7397  df-1st 7501  df-2nd 7502  df-supp 7634  df-tpos 7695  df-wrecs 7750  df-recs 7812  df-rdg 7850  df-1o 7905  df-oadd 7909  df-er 8089  df-map 8208  df-ixp 8260  df-en 8307  df-dom 8308  df-sdom 8309  df-fin 8310  df-fsupp 8629  df-sup 8701  df-oi 8769  df-card 9162  df-pnf 10476  df-mnf 10477  df-xr 10478  df-ltxr 10479  df-le 10480  df-sub 10672  df-neg 10673  df-div 11099  df-nn 11440  df-2 11503  df-3 11504  df-4 11505  df-5 11506  df-6 11507  df-7 11508  df-8 11509  df-9 11510  df-n0 11708  df-z 11794  df-dec 11912  df-uz 12059  df-rp 12205  df-xneg 12324  df-xadd 12325  df-xmul 12326  df-ico 12560  df-fz 12709  df-fzo 12850  df-seq 13185  df-exp 13245  df-hash 13506  df-cj 14319  df-re 14320  df-im 14321  df-sqrt 14455  df-abs 14456  df-clim 14706  df-sum 14904  df-struct 16341  df-ndx 16342  df-slot 16343  df-base 16345  df-sets 16346  df-ress 16347  df-plusg 16434  df-mulr 16435  df-starv 16436  df-sca 16437  df-vsca 16438  df-ip 16439  df-tset 16440  df-ple 16441  df-ds 16443  df-unif 16444  df-hom 16445  df-cco 16446  df-0g 16571  df-gsum 16572  df-prds 16577  df-pws 16579  df-mgm 17710  df-sgrp 17752  df-mnd 17763  df-mhm 17803  df-grp 17894  df-minusg 17895  df-sbg 17896  df-subg 18060  df-ghm 18127  df-cntz 18218  df-cmn 18668  df-abl 18669  df-mgp 18963  df-ur 18975  df-ring 19022  df-cring 19023  df-oppr 19096  df-dvdsr 19114  df-unit 19115  df-invr 19145  df-dvr 19156  df-rnghom 19190  df-drng 19227  df-field 19228  df-subrg 19256  df-staf 19338  df-srng 19339  df-lmod 19358  df-lss 19426  df-sra 19666  df-rgmod 19667  df-xmet 20240  df-met 20241  df-cnfld 20248  df-refld 20451  df-dsmm 20578  df-frlm 20593  df-nm 22895  df-tng 22897  df-tcph 23476  df-rrx 23691
This theorem is referenced by:  rrnprjdstle  42015
  Copyright terms: Public domain W3C validator