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

Theorem rrxdstprj1 25365
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 𝑋 = { ∈ (ℝ ↑m 𝐼) ∣ 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 774 . . 3 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) → 𝐼𝑉)
2 simpr 484 . . 3 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) → 𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0)))
3 simplr 768 . . 3 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) → (𝐹𝑋𝐺𝑋))
4 rrxmval.1 . . . . . . . . 9 𝑋 = { ∈ (ℝ ↑m 𝐼) ∣ finSupp 0}
5 simprl 770 . . . . . . . . 9 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → 𝐹𝑋)
64, 5rrxfsupp 25358 . . . . . . . 8 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (𝐹 supp 0) ∈ Fin)
7 simprr 772 . . . . . . . . 9 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → 𝐺𝑋)
84, 7rrxfsupp 25358 . . . . . . . 8 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (𝐺 supp 0) ∈ Fin)
9 unfi 9095 . . . . . . . 8 (((𝐹 supp 0) ∈ Fin ∧ (𝐺 supp 0) ∈ Fin) → ((𝐹 supp 0) ∪ (𝐺 supp 0)) ∈ Fin)
106, 8, 9syl2anc 584 . . . . . . 7 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((𝐹 supp 0) ∪ (𝐺 supp 0)) ∈ Fin)
114, 5rrxsuppss 25359 . . . . . . . . . 10 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (𝐹 supp 0) ⊆ 𝐼)
124, 7rrxsuppss 25359 . . . . . . . . . 10 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (𝐺 supp 0) ⊆ 𝐼)
1311, 12unssd 4144 . . . . . . . . 9 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((𝐹 supp 0) ∪ (𝐺 supp 0)) ⊆ 𝐼)
1413sselda 3933 . . . . . . . 8 ((((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) → 𝑘𝐼)
154, 5rrxf 25357 . . . . . . . . . . 11 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → 𝐹:𝐼⟶ℝ)
1615ffvelcdmda 7029 . . . . . . . . . 10 ((((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝑘𝐼) → (𝐹𝑘) ∈ ℝ)
174, 7rrxf 25357 . . . . . . . . . . 11 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → 𝐺:𝐼⟶ℝ)
1817ffvelcdmda 7029 . . . . . . . . . 10 ((((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝑘𝐼) → (𝐺𝑘) ∈ ℝ)
1916, 18resubcld 11565 . . . . . . . . 9 ((((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝑘𝐼) → ((𝐹𝑘) − (𝐺𝑘)) ∈ ℝ)
2019resqcld 14048 . . . . . . . 8 ((((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝑘𝐼) → (((𝐹𝑘) − (𝐺𝑘))↑2) ∈ ℝ)
2114, 20syldan 591 . . . . . . 7 ((((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) → (((𝐹𝑘) − (𝐺𝑘))↑2) ∈ ℝ)
2219sqge0d 14060 . . . . . . . 8 ((((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝑘𝐼) → 0 ≤ (((𝐹𝑘) − (𝐺𝑘))↑2))
2314, 22syldan 591 . . . . . . 7 ((((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) → 0 ≤ (((𝐹𝑘) − (𝐺𝑘))↑2))
24 fveq2 6834 . . . . . . . . 9 (𝑘 = 𝐴 → (𝐹𝑘) = (𝐹𝐴))
25 fveq2 6834 . . . . . . . . 9 (𝑘 = 𝐴 → (𝐺𝑘) = (𝐺𝐴))
2624, 25oveq12d 7376 . . . . . . . 8 (𝑘 = 𝐴 → ((𝐹𝑘) − (𝐺𝑘)) = ((𝐹𝐴) − (𝐺𝐴)))
2726oveq1d 7373 . . . . . . 7 (𝑘 = 𝐴 → (((𝐹𝑘) − (𝐺𝑘))↑2) = (((𝐹𝐴) − (𝐺𝐴))↑2))
28 simplr 768 . . . . . . 7 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → 𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0)))
2910, 21, 23, 27, 28fsumge1 15720 . . . . . 6 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (((𝐹𝐴) − (𝐺𝐴))↑2) ≤ Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2))
3013, 28sseldd 3934 . . . . . . . . 9 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → 𝐴𝐼)
3115, 30ffvelcdmd 7030 . . . . . . . 8 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (𝐹𝐴) ∈ ℝ)
3217, 30ffvelcdmd 7030 . . . . . . . 8 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (𝐺𝐴) ∈ ℝ)
3331, 32resubcld 11565 . . . . . . 7 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((𝐹𝐴) − (𝐺𝐴)) ∈ ℝ)
34 absresq 15225 . . . . . . 7 (((𝐹𝐴) − (𝐺𝐴)) ∈ ℝ → ((abs‘((𝐹𝐴) − (𝐺𝐴)))↑2) = (((𝐹𝐴) − (𝐺𝐴))↑2))
3533, 34syl 17 . . . . . 6 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((abs‘((𝐹𝐴) − (𝐺𝐴)))↑2) = (((𝐹𝐴) − (𝐺𝐴))↑2))
3610, 21fsumrecl 15657 . . . . . . 7 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2) ∈ ℝ)
3710, 21, 23fsumge0 15718 . . . . . . 7 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → 0 ≤ Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2))
38 resqrtth 15178 . . . . . . 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 584 . . . . . 6 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2))↑2) = Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2))
4029, 35, 393brtr4d 5130 . . . . 5 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((abs‘((𝐹𝐴) − (𝐺𝐴)))↑2) ≤ ((√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2))↑2))
4133recnd 11160 . . . . . . 7 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((𝐹𝐴) − (𝐺𝐴)) ∈ ℂ)
4241abscld 15362 . . . . . 6 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (abs‘((𝐹𝐴) − (𝐺𝐴))) ∈ ℝ)
4336, 37resqrtcld 15341 . . . . . 6 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2)) ∈ ℝ)
4441absge0d 15370 . . . . . 6 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → 0 ≤ (abs‘((𝐹𝐴) − (𝐺𝐴))))
4536, 37sqrtge0d 15344 . . . . . 6 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → 0 ≤ (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2)))
4642, 43, 44, 45le2sqd 14180 . . . . 5 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((abs‘((𝐹𝐴) − (𝐺𝐴))) ≤ (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2)) ↔ ((abs‘((𝐹𝐴) − (𝐺𝐴)))↑2) ≤ ((√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2))↑2)))
4740, 46mpbird 257 . . . 4 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (abs‘((𝐹𝐴) − (𝐺𝐴))) ≤ (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2)))
48 rrxdstprj1.1 . . . . . 6 𝑀 = ((abs ∘ − ) ↾ (ℝ × ℝ))
4948remetdval 24733 . . . . 5 (((𝐹𝐴) ∈ ℝ ∧ (𝐺𝐴) ∈ ℝ) → ((𝐹𝐴)𝑀(𝐺𝐴)) = (abs‘((𝐹𝐴) − (𝐺𝐴))))
5031, 32, 49syl2anc 584 . . . 4 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((𝐹𝐴)𝑀(𝐺𝐴)) = (abs‘((𝐹𝐴) − (𝐺𝐴))))
51 rrxmval.d . . . . . . 7 𝐷 = (dist‘(ℝ^‘𝐼))
524, 51rrxmval 25361 . . . . . 6 ((𝐼𝑉𝐹𝑋𝐺𝑋) → (𝐹𝐷𝐺) = (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2)))
53523expb 1120 . . . . 5 ((𝐼𝑉 ∧ (𝐹𝑋𝐺𝑋)) → (𝐹𝐷𝐺) = (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2)))
5453adantlr 715 . . . 4 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → (𝐹𝐷𝐺) = (√‘Σ𝑘 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))(((𝐹𝑘) − (𝐺𝑘))↑2)))
5547, 50, 543brtr4d 5130 . . 3 (((𝐼𝑉𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ∧ (𝐹𝑋𝐺𝑋)) → ((𝐹𝐴)𝑀(𝐺𝐴)) ≤ (𝐹𝐷𝐺))
561, 2, 3, 55syl21anc 837 . 2 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0))) → ((𝐹𝐴)𝑀(𝐺𝐴)) ≤ (𝐹𝐷𝐺))
57 simplll 774 . . . . . . 7 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → 𝐼𝑉)
58 simplrl 776 . . . . . . 7 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → 𝐹𝑋)
59 ssun1 4130 . . . . . . . . . 10 (𝐹 supp 0) ⊆ ((𝐹 supp 0) ∪ (𝐺 supp 0))
6059a1i 11 . . . . . . . . 9 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → (𝐹 supp 0) ⊆ ((𝐹 supp 0) ∪ (𝐺 supp 0)))
6160sscond 4098 . . . . . . . 8 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ⊆ (𝐼 ∖ (𝐹 supp 0)))
6261sselda 3933 . . . . . . 7 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → 𝐴 ∈ (𝐼 ∖ (𝐹 supp 0)))
63 simpr 484 . . . . . . . . 9 ((𝐼𝑉𝐹𝑋) → 𝐹𝑋)
644, 63rrxf 25357 . . . . . . . 8 ((𝐼𝑉𝐹𝑋) → 𝐹:𝐼⟶ℝ)
65 ssidd 3957 . . . . . . . 8 ((𝐼𝑉𝐹𝑋) → (𝐹 supp 0) ⊆ (𝐹 supp 0))
66 simpl 482 . . . . . . . 8 ((𝐼𝑉𝐹𝑋) → 𝐼𝑉)
67 0red 11135 . . . . . . . 8 ((𝐼𝑉𝐹𝑋) → 0 ∈ ℝ)
6864, 65, 66, 67suppssr 8137 . . . . . . 7 (((𝐼𝑉𝐹𝑋) ∧ 𝐴 ∈ (𝐼 ∖ (𝐹 supp 0))) → (𝐹𝐴) = 0)
6957, 58, 62, 68syl21anc 837 . . . . . 6 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → (𝐹𝐴) = 0)
70 0red 11135 . . . . . 6 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → 0 ∈ ℝ)
7169, 70eqeltrd 2836 . . . . 5 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → (𝐹𝐴) ∈ ℝ)
72 simplrr 777 . . . . . . 7 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → 𝐺𝑋)
73 ssun2 4131 . . . . . . . . . 10 (𝐺 supp 0) ⊆ ((𝐹 supp 0) ∪ (𝐺 supp 0))
7473a1i 11 . . . . . . . . 9 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → (𝐺 supp 0) ⊆ ((𝐹 supp 0) ∪ (𝐺 supp 0)))
7574sscond 4098 . . . . . . . 8 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0))) ⊆ (𝐼 ∖ (𝐺 supp 0)))
7675sselda 3933 . . . . . . 7 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → 𝐴 ∈ (𝐼 ∖ (𝐺 supp 0)))
77 simpr 484 . . . . . . . . 9 ((𝐼𝑉𝐺𝑋) → 𝐺𝑋)
784, 77rrxf 25357 . . . . . . . 8 ((𝐼𝑉𝐺𝑋) → 𝐺:𝐼⟶ℝ)
79 ssidd 3957 . . . . . . . 8 ((𝐼𝑉𝐺𝑋) → (𝐺 supp 0) ⊆ (𝐺 supp 0))
80 simpl 482 . . . . . . . 8 ((𝐼𝑉𝐺𝑋) → 𝐼𝑉)
81 0red 11135 . . . . . . . 8 ((𝐼𝑉𝐺𝑋) → 0 ∈ ℝ)
8278, 79, 80, 81suppssr 8137 . . . . . . 7 (((𝐼𝑉𝐺𝑋) ∧ 𝐴 ∈ (𝐼 ∖ (𝐺 supp 0))) → (𝐺𝐴) = 0)
8357, 72, 76, 82syl21anc 837 . . . . . 6 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → (𝐺𝐴) = 0)
8483, 70eqeltrd 2836 . . . . 5 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → (𝐺𝐴) ∈ ℝ)
8571, 84, 49syl2anc 584 . . . 4 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → ((𝐹𝐴)𝑀(𝐺𝐴)) = (abs‘((𝐹𝐴) − (𝐺𝐴))))
8669, 83oveq12d 7376 . . . . . 6 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → ((𝐹𝐴) − (𝐺𝐴)) = (0 − 0))
87 0m0e0 12260 . . . . . 6 (0 − 0) = 0
8886, 87eqtrdi 2787 . . . . 5 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → ((𝐹𝐴) − (𝐺𝐴)) = 0)
8988abs00bd 15214 . . . 4 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → (abs‘((𝐹𝐴) − (𝐺𝐴))) = 0)
9085, 89eqtrd 2771 . . 3 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → ((𝐹𝐴)𝑀(𝐺𝐴)) = 0)
914, 51rrxmet 25364 . . . . 5 (𝐼𝑉𝐷 ∈ (Met‘𝑋))
9291ad3antrrr 730 . . . 4 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → 𝐷 ∈ (Met‘𝑋))
93 metge0 24289 . . . 4 ((𝐷 ∈ (Met‘𝑋) ∧ 𝐹𝑋𝐺𝑋) → 0 ≤ (𝐹𝐷𝐺))
9492, 58, 72, 93syl3anc 1373 . . 3 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → 0 ≤ (𝐹𝐷𝐺))
9590, 94eqbrtrd 5120 . 2 ((((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) ∧ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) → ((𝐹𝐴)𝑀(𝐺𝐴)) ≤ (𝐹𝐷𝐺))
96 simplr 768 . . . 4 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → 𝐴𝐼)
97 simprl 770 . . . . . . 7 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → 𝐹𝑋)
984, 97rrxsuppss 25359 . . . . . 6 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → (𝐹 supp 0) ⊆ 𝐼)
99 simprr 772 . . . . . . 7 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → 𝐺𝑋)
1004, 99rrxsuppss 25359 . . . . . 6 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → (𝐺 supp 0) ⊆ 𝐼)
10198, 100unssd 4144 . . . . 5 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → ((𝐹 supp 0) ∪ (𝐺 supp 0)) ⊆ 𝐼)
102 undif 4434 . . . . 5 (((𝐹 supp 0) ∪ (𝐺 supp 0)) ⊆ 𝐼 ↔ (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∪ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) = 𝐼)
103101, 102sylib 218 . . . 4 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∪ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) = 𝐼)
10496, 103eleqtrrd 2839 . . 3 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → 𝐴 ∈ (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∪ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))))
105 elun 4105 . . 3 (𝐴 ∈ (((𝐹 supp 0) ∪ (𝐺 supp 0)) ∪ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))) ↔ (𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0)) ∨ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))))
106104, 105sylib 218 . 2 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → (𝐴 ∈ ((𝐹 supp 0) ∪ (𝐺 supp 0)) ∨ 𝐴 ∈ (𝐼 ∖ ((𝐹 supp 0) ∪ (𝐺 supp 0)))))
10756, 95, 106mpjaodan 960 1 (((𝐼𝑉𝐴𝐼) ∧ (𝐹𝑋𝐺𝑋)) → ((𝐹𝐴)𝑀(𝐺𝐴)) ≤ (𝐹𝐷𝐺))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395  wo 847   = wceq 1541  wcel 2113  {crab 3399  cdif 3898  cun 3899  wss 3901   class class class wbr 5098   × cxp 5622  cres 5626  ccom 5628  cfv 6492  (class class class)co 7358   supp csupp 8102  m cmap 8763  Fincfn 8883   finSupp cfsupp 9264  cr 11025  0cc0 11026  cle 11167  cmin 11364  2c2 12200  cexp 13984  csqrt 15156  abscabs 15157  Σcsu 15609  distcds 17186  Metcmet 21295  ℝ^crrx 25339
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2184  ax-ext 2708  ax-rep 5224  ax-sep 5241  ax-nul 5251  ax-pow 5310  ax-pr 5377  ax-un 7680  ax-inf2 9550  ax-cnex 11082  ax-resscn 11083  ax-1cn 11084  ax-icn 11085  ax-addcl 11086  ax-addrcl 11087  ax-mulcl 11088  ax-mulrcl 11089  ax-mulcom 11090  ax-addass 11091  ax-mulass 11092  ax-distr 11093  ax-i2m1 11094  ax-1ne0 11095  ax-1rid 11096  ax-rnegex 11097  ax-rrecex 11098  ax-cnre 11099  ax-pre-lttri 11100  ax-pre-lttrn 11101  ax-pre-ltadd 11102  ax-pre-mulgt0 11103  ax-pre-sup 11104  ax-addf 11105  ax-mulf 11106
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2539  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2811  df-nfc 2885  df-ne 2933  df-nel 3037  df-ral 3052  df-rex 3061  df-rmo 3350  df-reu 3351  df-rab 3400  df-v 3442  df-sbc 3741  df-csb 3850  df-dif 3904  df-un 3906  df-in 3908  df-ss 3918  df-pss 3921  df-nul 4286  df-if 4480  df-pw 4556  df-sn 4581  df-pr 4583  df-tp 4585  df-op 4587  df-uni 4864  df-int 4903  df-iun 4948  df-br 5099  df-opab 5161  df-mpt 5180  df-tr 5206  df-id 5519  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5577  df-se 5578  df-we 5579  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-isom 6501  df-riota 7315  df-ov 7361  df-oprab 7362  df-mpo 7363  df-of 7622  df-om 7809  df-1st 7933  df-2nd 7934  df-supp 8103  df-tpos 8168  df-frecs 8223  df-wrecs 8254  df-recs 8303  df-rdg 8341  df-1o 8397  df-er 8635  df-map 8765  df-ixp 8836  df-en 8884  df-dom 8885  df-sdom 8886  df-fin 8887  df-fsupp 9265  df-sup 9345  df-oi 9415  df-card 9851  df-pnf 11168  df-mnf 11169  df-xr 11170  df-ltxr 11171  df-le 11172  df-sub 11366  df-neg 11367  df-div 11795  df-nn 12146  df-2 12208  df-3 12209  df-4 12210  df-5 12211  df-6 12212  df-7 12213  df-8 12214  df-9 12215  df-n0 12402  df-z 12489  df-dec 12608  df-uz 12752  df-rp 12906  df-xneg 13026  df-xadd 13027  df-xmul 13028  df-ico 13267  df-fz 13424  df-fzo 13571  df-seq 13925  df-exp 13985  df-hash 14254  df-cj 15022  df-re 15023  df-im 15024  df-sqrt 15158  df-abs 15159  df-clim 15411  df-sum 15610  df-struct 17074  df-sets 17091  df-slot 17109  df-ndx 17121  df-base 17137  df-ress 17158  df-plusg 17190  df-mulr 17191  df-starv 17192  df-sca 17193  df-vsca 17194  df-ip 17195  df-tset 17196  df-ple 17197  df-ds 17199  df-unif 17200  df-hom 17201  df-cco 17202  df-0g 17361  df-gsum 17362  df-prds 17367  df-pws 17369  df-mgm 18565  df-sgrp 18644  df-mnd 18660  df-mhm 18708  df-grp 18866  df-minusg 18867  df-sbg 18868  df-subg 19053  df-ghm 19142  df-cntz 19246  df-cmn 19711  df-abl 19712  df-mgp 20076  df-rng 20088  df-ur 20117  df-ring 20170  df-cring 20171  df-oppr 20273  df-dvdsr 20293  df-unit 20294  df-invr 20324  df-dvr 20337  df-rhm 20408  df-subrng 20479  df-subrg 20503  df-drng 20664  df-field 20665  df-staf 20772  df-srng 20773  df-lmod 20813  df-lss 20883  df-sra 21125  df-rgmod 21126  df-xmet 21302  df-met 21303  df-cnfld 21310  df-refld 21560  df-dsmm 21687  df-frlm 21702  df-nm 24526  df-tng 24528  df-tcph 25125  df-rrx 25341
This theorem is referenced by:  rrnprjdstle  46545
  Copyright terms: Public domain W3C validator