Metamath Proof Explorer


Theorem prdsxmetlem

Description: The product metric is an extended metric. (Contributed by Mario Carneiro, 20-Aug-2015)

Ref Expression
Hypotheses prdsdsf.y ⊒ π‘Œ = ( 𝑆 Xs ( π‘₯ ∈ 𝐼 ↦ 𝑅 ) )
prdsdsf.b ⊒ 𝐡 = ( Base β€˜ π‘Œ )
prdsdsf.v ⊒ 𝑉 = ( Base β€˜ 𝑅 )
prdsdsf.e ⊒ 𝐸 = ( ( dist β€˜ 𝑅 ) β†Ύ ( 𝑉 Γ— 𝑉 ) )
prdsdsf.d ⊒ 𝐷 = ( dist β€˜ π‘Œ )
prdsdsf.s ⊒ ( πœ‘ β†’ 𝑆 ∈ π‘Š )
prdsdsf.i ⊒ ( πœ‘ β†’ 𝐼 ∈ 𝑋 )
prdsdsf.r ⊒ ( ( πœ‘ ∧ π‘₯ ∈ 𝐼 ) β†’ 𝑅 ∈ 𝑍 )
prdsdsf.m ⊒ ( ( πœ‘ ∧ π‘₯ ∈ 𝐼 ) β†’ 𝐸 ∈ ( ∞Met β€˜ 𝑉 ) )
Assertion prdsxmetlem ( πœ‘ β†’ 𝐷 ∈ ( ∞Met β€˜ 𝐡 ) )

Proof

Step Hyp Ref Expression
1 prdsdsf.y ⊒ π‘Œ = ( 𝑆 Xs ( π‘₯ ∈ 𝐼 ↦ 𝑅 ) )
2 prdsdsf.b ⊒ 𝐡 = ( Base β€˜ π‘Œ )
3 prdsdsf.v ⊒ 𝑉 = ( Base β€˜ 𝑅 )
4 prdsdsf.e ⊒ 𝐸 = ( ( dist β€˜ 𝑅 ) β†Ύ ( 𝑉 Γ— 𝑉 ) )
5 prdsdsf.d ⊒ 𝐷 = ( dist β€˜ π‘Œ )
6 prdsdsf.s ⊒ ( πœ‘ β†’ 𝑆 ∈ π‘Š )
7 prdsdsf.i ⊒ ( πœ‘ β†’ 𝐼 ∈ 𝑋 )
8 prdsdsf.r ⊒ ( ( πœ‘ ∧ π‘₯ ∈ 𝐼 ) β†’ 𝑅 ∈ 𝑍 )
9 prdsdsf.m ⊒ ( ( πœ‘ ∧ π‘₯ ∈ 𝐼 ) β†’ 𝐸 ∈ ( ∞Met β€˜ 𝑉 ) )
10 2 fvexi ⊒ 𝐡 ∈ V
11 10 a1i ⊒ ( πœ‘ β†’ 𝐡 ∈ V )
12 1 2 3 4 5 6 7 8 9 prdsdsf ⊒ ( πœ‘ β†’ 𝐷 : ( 𝐡 Γ— 𝐡 ) ⟢ ( 0 [,] +∞ ) )
13 iccssxr ⊒ ( 0 [,] +∞ ) βŠ† ℝ*
14 fss ⊒ ( ( 𝐷 : ( 𝐡 Γ— 𝐡 ) ⟢ ( 0 [,] +∞ ) ∧ ( 0 [,] +∞ ) βŠ† ℝ* ) β†’ 𝐷 : ( 𝐡 Γ— 𝐡 ) ⟢ ℝ* )
15 12 13 14 sylancl ⊒ ( πœ‘ β†’ 𝐷 : ( 𝐡 Γ— 𝐡 ) ⟢ ℝ* )
16 12 fovcdmda ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ ( 𝑓 𝐷 𝑔 ) ∈ ( 0 [,] +∞ ) )
17 elxrge0 ⊒ ( ( 𝑓 𝐷 𝑔 ) ∈ ( 0 [,] +∞ ) ↔ ( ( 𝑓 𝐷 𝑔 ) ∈ ℝ* ∧ 0 ≀ ( 𝑓 𝐷 𝑔 ) ) )
18 17 simprbi ⊒ ( ( 𝑓 𝐷 𝑔 ) ∈ ( 0 [,] +∞ ) β†’ 0 ≀ ( 𝑓 𝐷 𝑔 ) )
19 16 18 syl ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ 0 ≀ ( 𝑓 𝐷 𝑔 ) )
20 6 adantr ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ 𝑆 ∈ π‘Š )
21 7 adantr ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ 𝐼 ∈ 𝑋 )
22 8 ralrimiva ⊒ ( πœ‘ β†’ βˆ€ π‘₯ ∈ 𝐼 𝑅 ∈ 𝑍 )
23 22 adantr ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ βˆ€ π‘₯ ∈ 𝐼 𝑅 ∈ 𝑍 )
24 simprl ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ 𝑓 ∈ 𝐡 )
25 simprr ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ 𝑔 ∈ 𝐡 )
26 1 2 20 21 23 24 25 3 4 5 prdsdsval3 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ ( 𝑓 𝐷 𝑔 ) = sup ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) , ℝ* , < ) )
27 26 breq1d ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ ( ( 𝑓 𝐷 𝑔 ) ≀ 0 ↔ sup ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) , ℝ* , < ) ≀ 0 ) )
28 9 adantlr ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ 𝐸 ∈ ( ∞Met β€˜ 𝑉 ) )
29 1 2 20 21 23 3 24 prdsbascl ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ βˆ€ π‘₯ ∈ 𝐼 ( 𝑓 β€˜ π‘₯ ) ∈ 𝑉 )
30 29 r19.21bi ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( 𝑓 β€˜ π‘₯ ) ∈ 𝑉 )
31 1 2 20 21 23 3 25 prdsbascl ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ βˆ€ π‘₯ ∈ 𝐼 ( 𝑔 β€˜ π‘₯ ) ∈ 𝑉 )
32 31 r19.21bi ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( 𝑔 β€˜ π‘₯ ) ∈ 𝑉 )
33 xmetcl ⊒ ( ( 𝐸 ∈ ( ∞Met β€˜ 𝑉 ) ∧ ( 𝑓 β€˜ π‘₯ ) ∈ 𝑉 ∧ ( 𝑔 β€˜ π‘₯ ) ∈ 𝑉 ) β†’ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ ℝ* )
34 28 30 32 33 syl3anc ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ ℝ* )
35 34 fmpttd ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) : 𝐼 ⟢ ℝ* )
36 35 frnd ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βŠ† ℝ* )
37 0xr ⊒ 0 ∈ ℝ*
38 37 a1i ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ 0 ∈ ℝ* )
39 38 snssd ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ { 0 } βŠ† ℝ* )
40 36 39 unssd ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) βŠ† ℝ* )
41 supxrleub ⊒ ( ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) βŠ† ℝ* ∧ 0 ∈ ℝ* ) β†’ ( sup ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) , ℝ* , < ) ≀ 0 ↔ βˆ€ 𝑧 ∈ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) 𝑧 ≀ 0 ) )
42 40 37 41 sylancl ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ ( sup ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) , ℝ* , < ) ≀ 0 ↔ βˆ€ 𝑧 ∈ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) 𝑧 ≀ 0 ) )
43 0le0 ⊒ 0 ≀ 0
44 c0ex ⊒ 0 ∈ V
45 breq1 ⊒ ( 𝑧 = 0 β†’ ( 𝑧 ≀ 0 ↔ 0 ≀ 0 ) )
46 44 45 ralsn ⊒ ( βˆ€ 𝑧 ∈ { 0 } 𝑧 ≀ 0 ↔ 0 ≀ 0 )
47 43 46 mpbir ⊒ βˆ€ 𝑧 ∈ { 0 } 𝑧 ≀ 0
48 ralunb ⊒ ( βˆ€ 𝑧 ∈ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) 𝑧 ≀ 0 ↔ ( βˆ€ 𝑧 ∈ ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) 𝑧 ≀ 0 ∧ βˆ€ 𝑧 ∈ { 0 } 𝑧 ≀ 0 ) )
49 47 48 mpbiran2 ⊒ ( βˆ€ 𝑧 ∈ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) 𝑧 ≀ 0 ↔ βˆ€ 𝑧 ∈ ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) 𝑧 ≀ 0 )
50 ovex ⊒ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ V
51 50 rgenw ⊒ βˆ€ π‘₯ ∈ 𝐼 ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ V
52 eqid ⊒ ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) = ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) )
53 breq1 ⊒ ( 𝑧 = ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) β†’ ( 𝑧 ≀ 0 ↔ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ 0 ) )
54 52 53 ralrnmptw ⊒ ( βˆ€ π‘₯ ∈ 𝐼 ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ V β†’ ( βˆ€ 𝑧 ∈ ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) 𝑧 ≀ 0 ↔ βˆ€ π‘₯ ∈ 𝐼 ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ 0 ) )
55 51 54 ax-mp ⊒ ( βˆ€ 𝑧 ∈ ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) 𝑧 ≀ 0 ↔ βˆ€ π‘₯ ∈ 𝐼 ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ 0 )
56 49 55 bitri ⊒ ( βˆ€ 𝑧 ∈ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) 𝑧 ≀ 0 ↔ βˆ€ π‘₯ ∈ 𝐼 ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ 0 )
57 xmetge0 ⊒ ( ( 𝐸 ∈ ( ∞Met β€˜ 𝑉 ) ∧ ( 𝑓 β€˜ π‘₯ ) ∈ 𝑉 ∧ ( 𝑔 β€˜ π‘₯ ) ∈ 𝑉 ) β†’ 0 ≀ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) )
58 28 30 32 57 syl3anc ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ 0 ≀ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) )
59 58 biantrud ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ 0 ↔ ( ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ 0 ∧ 0 ≀ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) ) )
60 xrletri3 ⊒ ( ( ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ ℝ* ∧ 0 ∈ ℝ* ) β†’ ( ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) = 0 ↔ ( ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ 0 ∧ 0 ≀ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) ) )
61 34 37 60 sylancl ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) = 0 ↔ ( ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ 0 ∧ 0 ≀ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) ) )
62 xmeteq0 ⊒ ( ( 𝐸 ∈ ( ∞Met β€˜ 𝑉 ) ∧ ( 𝑓 β€˜ π‘₯ ) ∈ 𝑉 ∧ ( 𝑔 β€˜ π‘₯ ) ∈ 𝑉 ) β†’ ( ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) = 0 ↔ ( 𝑓 β€˜ π‘₯ ) = ( 𝑔 β€˜ π‘₯ ) ) )
63 28 30 32 62 syl3anc ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) = 0 ↔ ( 𝑓 β€˜ π‘₯ ) = ( 𝑔 β€˜ π‘₯ ) ) )
64 59 61 63 3bitr2d ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ 0 ↔ ( 𝑓 β€˜ π‘₯ ) = ( 𝑔 β€˜ π‘₯ ) ) )
65 64 ralbidva ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ ( βˆ€ π‘₯ ∈ 𝐼 ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ 0 ↔ βˆ€ π‘₯ ∈ 𝐼 ( 𝑓 β€˜ π‘₯ ) = ( 𝑔 β€˜ π‘₯ ) ) )
66 eqid ⊒ ( π‘₯ ∈ 𝐼 ↦ 𝑅 ) = ( π‘₯ ∈ 𝐼 ↦ 𝑅 )
67 66 fnmpt ⊒ ( βˆ€ π‘₯ ∈ 𝐼 𝑅 ∈ 𝑍 β†’ ( π‘₯ ∈ 𝐼 ↦ 𝑅 ) Fn 𝐼 )
68 22 67 syl ⊒ ( πœ‘ β†’ ( π‘₯ ∈ 𝐼 ↦ 𝑅 ) Fn 𝐼 )
69 68 adantr ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ ( π‘₯ ∈ 𝐼 ↦ 𝑅 ) Fn 𝐼 )
70 1 2 20 21 69 24 prdsbasfn ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ 𝑓 Fn 𝐼 )
71 1 2 20 21 69 25 prdsbasfn ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ 𝑔 Fn 𝐼 )
72 eqfnfv ⊒ ( ( 𝑓 Fn 𝐼 ∧ 𝑔 Fn 𝐼 ) β†’ ( 𝑓 = 𝑔 ↔ βˆ€ π‘₯ ∈ 𝐼 ( 𝑓 β€˜ π‘₯ ) = ( 𝑔 β€˜ π‘₯ ) ) )
73 70 71 72 syl2anc ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ ( 𝑓 = 𝑔 ↔ βˆ€ π‘₯ ∈ 𝐼 ( 𝑓 β€˜ π‘₯ ) = ( 𝑔 β€˜ π‘₯ ) ) )
74 65 73 bitr4d ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ ( βˆ€ π‘₯ ∈ 𝐼 ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ 0 ↔ 𝑓 = 𝑔 ) )
75 56 74 bitrid ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ ( βˆ€ 𝑧 ∈ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) 𝑧 ≀ 0 ↔ 𝑓 = 𝑔 ) )
76 27 42 75 3bitrd ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ) ) β†’ ( ( 𝑓 𝐷 𝑔 ) ≀ 0 ↔ 𝑓 = 𝑔 ) )
77 26 3adantr3 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ) β†’ ( 𝑓 𝐷 𝑔 ) = sup ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) , ℝ* , < ) )
78 77 3adant3 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ( 𝑓 𝐷 𝑔 ) = sup ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) , ℝ* , < ) )
79 9 3ad2antl1 ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ 𝐸 ∈ ( ∞Met β€˜ 𝑉 ) )
80 29 3adantr3 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ) β†’ βˆ€ π‘₯ ∈ 𝐼 ( 𝑓 β€˜ π‘₯ ) ∈ 𝑉 )
81 80 3adant3 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ βˆ€ π‘₯ ∈ 𝐼 ( 𝑓 β€˜ π‘₯ ) ∈ 𝑉 )
82 81 r19.21bi ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( 𝑓 β€˜ π‘₯ ) ∈ 𝑉 )
83 31 3adantr3 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ) β†’ βˆ€ π‘₯ ∈ 𝐼 ( 𝑔 β€˜ π‘₯ ) ∈ 𝑉 )
84 83 3adant3 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ βˆ€ π‘₯ ∈ 𝐼 ( 𝑔 β€˜ π‘₯ ) ∈ 𝑉 )
85 84 r19.21bi ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( 𝑔 β€˜ π‘₯ ) ∈ 𝑉 )
86 79 82 85 33 syl3anc ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ ℝ* )
87 6 3ad2ant1 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ 𝑆 ∈ π‘Š )
88 7 3ad2ant1 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ 𝐼 ∈ 𝑋 )
89 22 3ad2ant1 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ βˆ€ π‘₯ ∈ 𝐼 𝑅 ∈ 𝑍 )
90 simp23 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ β„Ž ∈ 𝐡 )
91 1 2 87 88 89 3 90 prdsbascl ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ βˆ€ π‘₯ ∈ 𝐼 ( β„Ž β€˜ π‘₯ ) ∈ 𝑉 )
92 91 r19.21bi ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( β„Ž β€˜ π‘₯ ) ∈ 𝑉 )
93 xmetcl ⊒ ( ( 𝐸 ∈ ( ∞Met β€˜ 𝑉 ) ∧ ( β„Ž β€˜ π‘₯ ) ∈ 𝑉 ∧ ( 𝑓 β€˜ π‘₯ ) ∈ 𝑉 ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ∈ ℝ* )
94 79 92 82 93 syl3anc ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ∈ ℝ* )
95 simp3l ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ( β„Ž 𝐷 𝑓 ) ∈ ℝ )
96 95 adantr ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( β„Ž 𝐷 𝑓 ) ∈ ℝ )
97 xmetge0 ⊒ ( ( 𝐸 ∈ ( ∞Met β€˜ 𝑉 ) ∧ ( β„Ž β€˜ π‘₯ ) ∈ 𝑉 ∧ ( 𝑓 β€˜ π‘₯ ) ∈ 𝑉 ) β†’ 0 ≀ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) )
98 79 92 82 97 syl3anc ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ 0 ≀ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) )
99 94 fmpttd ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ) : 𝐼 ⟢ ℝ* )
100 99 frnd ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ) βŠ† ℝ* )
101 37 a1i ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ 0 ∈ ℝ* )
102 101 snssd ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ { 0 } βŠ† ℝ* )
103 100 102 unssd ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) βŠ† ℝ* )
104 ssun1 ⊒ ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ) βŠ† ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ) βˆͺ { 0 } )
105 ovex ⊒ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ∈ V
106 105 elabrex ⊒ ( π‘₯ ∈ 𝐼 β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ∈ { 𝑧 ∣ βˆƒ π‘₯ ∈ 𝐼 𝑧 = ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) } )
107 106 adantl ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ∈ { 𝑧 ∣ βˆƒ π‘₯ ∈ 𝐼 𝑧 = ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) } )
108 eqid ⊒ ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ) = ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) )
109 108 rnmpt ⊒ ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ) = { 𝑧 ∣ βˆƒ π‘₯ ∈ 𝐼 𝑧 = ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) }
110 107 109 eleqtrrdi ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ∈ ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ) )
111 104 110 sselid ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ∈ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) )
112 supxrub ⊒ ( ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) βŠ† ℝ* ∧ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ∈ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ≀ sup ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) , ℝ* , < ) )
113 103 111 112 syl2an2r ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ≀ sup ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) , ℝ* , < ) )
114 simp21 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ 𝑓 ∈ 𝐡 )
115 1 2 87 88 89 90 114 3 4 5 prdsdsval3 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ( β„Ž 𝐷 𝑓 ) = sup ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) , ℝ* , < ) )
116 115 adantr ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( β„Ž 𝐷 𝑓 ) = sup ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) , ℝ* , < ) )
117 113 116 breqtrrd ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ≀ ( β„Ž 𝐷 𝑓 ) )
118 xrrege0 ⊒ ( ( ( ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ∈ ℝ* ∧ ( β„Ž 𝐷 𝑓 ) ∈ ℝ ) ∧ ( 0 ≀ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ∧ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ≀ ( β„Ž 𝐷 𝑓 ) ) ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ∈ ℝ )
119 94 96 98 117 118 syl22anc ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) ∈ ℝ )
120 xmetcl ⊒ ( ( 𝐸 ∈ ( ∞Met β€˜ 𝑉 ) ∧ ( β„Ž β€˜ π‘₯ ) ∈ 𝑉 ∧ ( 𝑔 β€˜ π‘₯ ) ∈ 𝑉 ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ ℝ* )
121 79 92 85 120 syl3anc ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ ℝ* )
122 simp3r ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ( β„Ž 𝐷 𝑔 ) ∈ ℝ )
123 122 adantr ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( β„Ž 𝐷 𝑔 ) ∈ ℝ )
124 xmetge0 ⊒ ( ( 𝐸 ∈ ( ∞Met β€˜ 𝑉 ) ∧ ( β„Ž β€˜ π‘₯ ) ∈ 𝑉 ∧ ( 𝑔 β€˜ π‘₯ ) ∈ 𝑉 ) β†’ 0 ≀ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) )
125 79 92 85 124 syl3anc ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ 0 ≀ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) )
126 121 fmpttd ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) : 𝐼 ⟢ ℝ* )
127 126 frnd ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βŠ† ℝ* )
128 127 102 unssd ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) βŠ† ℝ* )
129 ssun1 ⊒ ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βŠ† ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } )
130 ovex ⊒ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ V
131 130 elabrex ⊒ ( π‘₯ ∈ 𝐼 β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ { 𝑧 ∣ βˆƒ π‘₯ ∈ 𝐼 𝑧 = ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) } )
132 131 adantl ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ { 𝑧 ∣ βˆƒ π‘₯ ∈ 𝐼 𝑧 = ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) } )
133 eqid ⊒ ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) = ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) )
134 133 rnmpt ⊒ ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) = { 𝑧 ∣ βˆƒ π‘₯ ∈ 𝐼 𝑧 = ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) }
135 132 134 eleqtrrdi ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) )
136 129 135 sselid ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) )
137 supxrub ⊒ ( ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) βŠ† ℝ* ∧ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ sup ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) , ℝ* , < ) )
138 128 136 137 syl2an2r ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ sup ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) , ℝ* , < ) )
139 simp22 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ 𝑔 ∈ 𝐡 )
140 1 2 87 88 89 90 139 3 4 5 prdsdsval3 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ( β„Ž 𝐷 𝑔 ) = sup ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) , ℝ* , < ) )
141 140 adantr ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( β„Ž 𝐷 𝑔 ) = sup ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) , ℝ* , < ) )
142 138 141 breqtrrd ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ ( β„Ž 𝐷 𝑔 ) )
143 xrrege0 ⊒ ( ( ( ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ ℝ* ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ∧ ( 0 ≀ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∧ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ ( β„Ž 𝐷 𝑔 ) ) ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ ℝ )
144 121 123 125 142 143 syl22anc ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ ℝ )
145 119 144 readdcld ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) + ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) ∈ ℝ )
146 79 82 85 57 syl3anc ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ 0 ≀ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) )
147 xmettri2 ⊒ ( ( 𝐸 ∈ ( ∞Met β€˜ 𝑉 ) ∧ ( ( β„Ž β€˜ π‘₯ ) ∈ 𝑉 ∧ ( 𝑓 β€˜ π‘₯ ) ∈ 𝑉 ∧ ( 𝑔 β€˜ π‘₯ ) ∈ 𝑉 ) ) β†’ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ ( ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) +𝑒 ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) )
148 79 92 82 85 147 syl13anc ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ ( ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) +𝑒 ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) )
149 119 144 rexaddd ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) +𝑒 ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) = ( ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) + ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) )
150 148 149 breqtrd ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ ( ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) + ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) )
151 xrrege0 ⊒ ( ( ( ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ ℝ* ∧ ( ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) + ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) ∈ ℝ ) ∧ ( 0 ≀ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∧ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ ( ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) + ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) ) ) β†’ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ ℝ )
152 86 145 146 150 151 syl22anc ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ ℝ )
153 readdcl ⊒ ( ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) β†’ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ∈ ℝ )
154 153 3ad2ant3 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ∈ ℝ )
155 154 adantr ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ∈ ℝ )
156 119 144 96 123 117 142 le2addd ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑓 β€˜ π‘₯ ) ) + ( ( β„Ž β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) )
157 152 145 155 150 156 letrd ⊒ ( ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) ∧ π‘₯ ∈ 𝐼 ) β†’ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) )
158 157 ralrimiva ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ βˆ€ π‘₯ ∈ 𝐼 ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) )
159 86 ralrimiva ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ βˆ€ π‘₯ ∈ 𝐼 ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ ℝ* )
160 breq1 ⊒ ( 𝑧 = ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) β†’ ( 𝑧 ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ↔ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ) )
161 52 160 ralrnmptw ⊒ ( βˆ€ π‘₯ ∈ 𝐼 ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ∈ ℝ* β†’ ( βˆ€ 𝑧 ∈ ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) 𝑧 ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ↔ βˆ€ π‘₯ ∈ 𝐼 ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ) )
162 159 161 syl ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ( βˆ€ 𝑧 ∈ ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) 𝑧 ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ↔ βˆ€ π‘₯ ∈ 𝐼 ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ) )
163 158 162 mpbird ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ βˆ€ 𝑧 ∈ ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) 𝑧 ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) )
164 12 3ad2ant1 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ 𝐷 : ( 𝐡 Γ— 𝐡 ) ⟢ ( 0 [,] +∞ ) )
165 164 90 114 fovcdmd ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ( β„Ž 𝐷 𝑓 ) ∈ ( 0 [,] +∞ ) )
166 elxrge0 ⊒ ( ( β„Ž 𝐷 𝑓 ) ∈ ( 0 [,] +∞ ) ↔ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ* ∧ 0 ≀ ( β„Ž 𝐷 𝑓 ) ) )
167 166 simprbi ⊒ ( ( β„Ž 𝐷 𝑓 ) ∈ ( 0 [,] +∞ ) β†’ 0 ≀ ( β„Ž 𝐷 𝑓 ) )
168 165 167 syl ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ 0 ≀ ( β„Ž 𝐷 𝑓 ) )
169 164 90 139 fovcdmd ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ( β„Ž 𝐷 𝑔 ) ∈ ( 0 [,] +∞ ) )
170 elxrge0 ⊒ ( ( β„Ž 𝐷 𝑔 ) ∈ ( 0 [,] +∞ ) ↔ ( ( β„Ž 𝐷 𝑔 ) ∈ ℝ* ∧ 0 ≀ ( β„Ž 𝐷 𝑔 ) ) )
171 170 simprbi ⊒ ( ( β„Ž 𝐷 𝑔 ) ∈ ( 0 [,] +∞ ) β†’ 0 ≀ ( β„Ž 𝐷 𝑔 ) )
172 169 171 syl ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ 0 ≀ ( β„Ž 𝐷 𝑔 ) )
173 95 122 168 172 addge0d ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ 0 ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) )
174 breq1 ⊒ ( 𝑧 = 0 β†’ ( 𝑧 ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ↔ 0 ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ) )
175 44 174 ralsn ⊒ ( βˆ€ 𝑧 ∈ { 0 } 𝑧 ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ↔ 0 ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) )
176 173 175 sylibr ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ βˆ€ 𝑧 ∈ { 0 } 𝑧 ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) )
177 ralunb ⊒ ( βˆ€ 𝑧 ∈ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) 𝑧 ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ↔ ( βˆ€ 𝑧 ∈ ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) 𝑧 ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ∧ βˆ€ 𝑧 ∈ { 0 } 𝑧 ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ) )
178 163 176 177 sylanbrc ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ βˆ€ 𝑧 ∈ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) 𝑧 ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) )
179 40 3adantr3 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ) β†’ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) βŠ† ℝ* )
180 179 3adant3 ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) βŠ† ℝ* )
181 154 rexrd ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ∈ ℝ* )
182 supxrleub ⊒ ( ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) βŠ† ℝ* ∧ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ∈ ℝ* ) β†’ ( sup ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) , ℝ* , < ) ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ↔ βˆ€ 𝑧 ∈ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) 𝑧 ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ) )
183 180 181 182 syl2anc ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ( sup ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) , ℝ* , < ) ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ↔ βˆ€ 𝑧 ∈ ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) 𝑧 ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) ) )
184 178 183 mpbird ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ sup ( ( ran ( π‘₯ ∈ 𝐼 ↦ ( ( 𝑓 β€˜ π‘₯ ) 𝐸 ( 𝑔 β€˜ π‘₯ ) ) ) βˆͺ { 0 } ) , ℝ* , < ) ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) )
185 78 184 eqbrtrd ⊒ ( ( πœ‘ ∧ ( 𝑓 ∈ 𝐡 ∧ 𝑔 ∈ 𝐡 ∧ β„Ž ∈ 𝐡 ) ∧ ( ( β„Ž 𝐷 𝑓 ) ∈ ℝ ∧ ( β„Ž 𝐷 𝑔 ) ∈ ℝ ) ) β†’ ( 𝑓 𝐷 𝑔 ) ≀ ( ( β„Ž 𝐷 𝑓 ) + ( β„Ž 𝐷 𝑔 ) ) )
186 11 15 19 76 185 isxmet2d ⊒ ( πœ‘ β†’ 𝐷 ∈ ( ∞Met β€˜ 𝐡 ) )