Metamath Proof Explorer


Theorem prdsplusg

Description: Addition in a structure product. (Contributed by Stefan O'Rear, 3-Jan-2015) (Revised by Mario Carneiro, 15-Aug-2015) (Revised by Thierry Arnoux, 16-Jun-2019) (Revised by Zhi Wang, 18-Aug-2024)

Ref Expression
Hypotheses prdsbas.p ⊢ P = S ⨉ 𝑠 R
prdsbas.s ⊢ φ → S ∈ V
prdsbas.r ⊢ φ → R ∈ W
prdsbas.b ⊢ B = Base P
prdsbas.i ⊢ φ → dom ⁡ R = I
prdsplusg.b ⊢ + ˙ = + P
Assertion prdsplusg ⊢ φ → + ˙ = f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x

Proof

Step Hyp Ref Expression
1 prdsbas.p ⊢ P = S ⨉ 𝑠 R
2 prdsbas.s ⊢ φ → S ∈ V
3 prdsbas.r ⊢ φ → R ∈ W
4 prdsbas.b ⊢ B = Base P
5 prdsbas.i ⊢ φ → dom ⁡ R = I
6 prdsplusg.b ⊢ + ˙ = + P
7 eqid ⊢ Base S = Base S
8 1 2 3 4 5 prdsbas ⊢ φ → B = ⨉ x ∈ I Base R ⁡ x
9 eqidd ⊢ φ → f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x = f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x
10 eqidd ⊢ φ → f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x ⋅ R ⁡ x g ⁡ x = f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x ⋅ R ⁡ x g ⁡ x
11 eqidd ⊢ φ → f ∈ Base S , g ∈ B ⟼ x ∈ I ⟼ f ⋅ R ⁡ x g ⁡ x = f ∈ Base S , g ∈ B ⟼ x ∈ I ⟼ f ⋅ R ⁡ x g ⁡ x
12 eqidd ⊢ φ → f ∈ B , g ∈ B ⟼ ∑ S x ∈ I f ⁡ x ⋅ 𝑖 ⁡ R ⁡ x g ⁡ x = f ∈ B , g ∈ B ⟼ ∑ S x ∈ I f ⁡ x ⋅ 𝑖 ⁡ R ⁡ x g ⁡ x
13 eqidd ⊢ φ → ∏ 𝑡 ⁡ TopOpen ∘ R = ∏ 𝑡 ⁡ TopOpen ∘ R
14 eqidd ⊢ φ → f g | f g ⊆ B ∧ ∀ x ∈ I f ⁡ x ≤ R ⁡ x g ⁡ x = f g | f g ⊆ B ∧ ∀ x ∈ I f ⁡ x ≤ R ⁡ x g ⁡ x
15 eqidd ⊢ φ → f ∈ B , g ∈ B ⟼ sup ran ⁡ x ∈ I ⟼ f ⁡ x dist ⁡ R ⁡ x g ⁡ x ∪ 0 ℝ * < = f ∈ B , g ∈ B ⟼ sup ran ⁡ x ∈ I ⟼ f ⁡ x dist ⁡ R ⁡ x g ⁡ x ∪ 0 ℝ * <
16 eqidd ⊢ φ → f ∈ B , g ∈ B ⟼ ⨉ x ∈ I f ⁡ x Hom ⁡ R ⁡ x g ⁡ x = f ∈ B , g ∈ B ⟼ ⨉ x ∈ I f ⁡ x Hom ⁡ R ⁡ x g ⁡ x
17 eqidd ⊢ φ → a ∈ B × B , c ∈ B ⟼ d ∈ 2 nd ⁡ a f ∈ B , g ∈ B ⟼ ⨉ x ∈ I f ⁡ x Hom ⁡ R ⁡ x g ⁡ x c , e ∈ f ∈ B , g ∈ B ⟼ ⨉ x ∈ I f ⁡ x Hom ⁡ R ⁡ x g ⁡ x ⁡ a ⟼ x ∈ I ⟼ d ⁡ x 1 st ⁡ a ⁡ x 2 nd ⁡ a ⁡ x comp ⁡ R ⁡ x c ⁡ x e ⁡ x = a ∈ B × B , c ∈ B ⟼ d ∈ 2 nd ⁡ a f ∈ B , g ∈ B ⟼ ⨉ x ∈ I f ⁡ x Hom ⁡ R ⁡ x g ⁡ x c , e ∈ f ∈ B , g ∈ B ⟼ ⨉ x ∈ I f ⁡ x Hom ⁡ R ⁡ x g ⁡ x ⁡ a ⟼ x ∈ I ⟼ d ⁡ x 1 st ⁡ a ⁡ x 2 nd ⁡ a ⁡ x comp ⁡ R ⁡ x c ⁡ x e ⁡ x
18 1 7 5 8 9 10 11 12 13 14 15 16 17 2 3 prdsval ⊢ φ → P = Base ndx B + ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ⋅ ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x ⋅ R ⁡ x g ⁡ x ∪ Scalar ⁡ ndx S ⋅ ndx f ∈ Base S , g ∈ B ⟼ x ∈ I ⟼ f ⋅ R ⁡ x g ⁡ x ⋅ 𝑖 ⁡ ndx f ∈ B , g ∈ B ⟼ ∑ S x ∈ I f ⁡ x ⋅ 𝑖 ⁡ R ⁡ x g ⁡ x ∪ TopSet ⁡ ndx ∏ 𝑡 ⁡ TopOpen ∘ R ≤ ndx f g | f g ⊆ B ∧ ∀ x ∈ I f ⁡ x ≤ R ⁡ x g ⁡ x dist ⁡ ndx f ∈ B , g ∈ B ⟼ sup ran ⁡ x ∈ I ⟼ f ⁡ x dist ⁡ R ⁡ x g ⁡ x ∪ 0 ℝ * < ∪ Hom ⁡ ndx f ∈ B , g ∈ B ⟼ ⨉ x ∈ I f ⁡ x Hom ⁡ R ⁡ x g ⁡ x comp ⁡ ndx a ∈ B × B , c ∈ B ⟼ d ∈ 2 nd ⁡ a f ∈ B , g ∈ B ⟼ ⨉ x ∈ I f ⁡ x Hom ⁡ R ⁡ x g ⁡ x c , e ∈ f ∈ B , g ∈ B ⟼ ⨉ x ∈ I f ⁡ x Hom ⁡ R ⁡ x g ⁡ x ⁡ a ⟼ x ∈ I ⟼ d ⁡ x 1 st ⁡ a ⁡ x 2 nd ⁡ a ⁡ x comp ⁡ R ⁡ x c ⁡ x e ⁡ x
19 plusgid ⊢ + 𝑔 = Slot + ndx
20 ovssunirn ⊢ f ⁡ x + R ⁡ x g ⁡ x ⊆ ⋃ ran ⁡ + R ⁡ x
21 19 strfvss ⊢ + R ⁡ x ⊆ ⋃ ran ⁡ R ⁡ x
22 fvssunirn ⊢ R ⁡ x ⊆ ⋃ ran ⁡ R
23 rnss ⊢ R ⁡ x ⊆ ⋃ ran ⁡ R → ran ⁡ R ⁡ x ⊆ ran ⁡ ⋃ ran ⁡ R
24 uniss ⊢ ran ⁡ R ⁡ x ⊆ ran ⁡ ⋃ ran ⁡ R → ⋃ ran ⁡ R ⁡ x ⊆ ⋃ ran ⁡ ⋃ ran ⁡ R
25 22 23 24 mp2b ⊢ ⋃ ran ⁡ R ⁡ x ⊆ ⋃ ran ⁡ ⋃ ran ⁡ R
26 21 25 sstri ⊢ + R ⁡ x ⊆ ⋃ ran ⁡ ⋃ ran ⁡ R
27 rnss ⊢ + R ⁡ x ⊆ ⋃ ran ⁡ ⋃ ran ⁡ R → ran ⁡ + R ⁡ x ⊆ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R
28 uniss ⊢ ran ⁡ + R ⁡ x ⊆ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R → ⋃ ran ⁡ + R ⁡ x ⊆ ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R
29 26 27 28 mp2b ⊢ ⋃ ran ⁡ + R ⁡ x ⊆ ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R
30 20 29 sstri ⊢ f ⁡ x + R ⁡ x g ⁡ x ⊆ ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R
31 ovex ⊢ f ⁡ x + R ⁡ x g ⁡ x ∈ V
32 31 elpw ⊢ f ⁡ x + R ⁡ x g ⁡ x ∈ 𝒫 ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R ↔ f ⁡ x + R ⁡ x g ⁡ x ⊆ ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R
33 30 32 mpbir ⊢ f ⁡ x + R ⁡ x g ⁡ x ∈ 𝒫 ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R
34 33 a1i ⊢ φ ∧ x ∈ I → f ⁡ x + R ⁡ x g ⁡ x ∈ 𝒫 ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R
35 34 fmpttd ⊢ φ → x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x : I ⟶ 𝒫 ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R
36 rnexg ⊢ R ∈ W → ran ⁡ R ∈ V
37 uniexg ⊢ ran ⁡ R ∈ V → ⋃ ran ⁡ R ∈ V
38 3 36 37 3syl ⊢ φ → ⋃ ran ⁡ R ∈ V
39 rnexg ⊢ ⋃ ran ⁡ R ∈ V → ran ⁡ ⋃ ran ⁡ R ∈ V
40 uniexg ⊢ ran ⁡ ⋃ ran ⁡ R ∈ V → ⋃ ran ⁡ ⋃ ran ⁡ R ∈ V
41 38 39 40 3syl ⊢ φ → ⋃ ran ⁡ ⋃ ran ⁡ R ∈ V
42 rnexg ⊢ ⋃ ran ⁡ ⋃ ran ⁡ R ∈ V → ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R ∈ V
43 uniexg ⊢ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R ∈ V → ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R ∈ V
44 pwexg ⊢ ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R ∈ V → 𝒫 ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R ∈ V
45 41 42 43 44 4syl ⊢ φ → 𝒫 ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R ∈ V
46 3 dmexd ⊢ φ → dom ⁡ R ∈ V
47 5 46 eqeltrrd ⊢ φ → I ∈ V
48 45 47 elmapd ⊢ φ → x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ∈ 𝒫 ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R I ↔ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x : I ⟶ 𝒫 ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R
49 35 48 mpbird ⊢ φ → x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ∈ 𝒫 ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R I
50 49 ralrimivw ⊢ φ → ∀ g ∈ B x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ∈ 𝒫 ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R I
51 50 ralrimivw ⊢ φ → ∀ f ∈ B ∀ g ∈ B x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ∈ 𝒫 ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R I
52 eqid ⊢ f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x = f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x
53 52 fmpo ⊢ ∀ f ∈ B ∀ g ∈ B x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ∈ 𝒫 ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R I ↔ f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x : B × B ⟶ 𝒫 ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R I
54 51 53 sylib ⊢ φ → f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x : B × B ⟶ 𝒫 ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R I
55 4 fvexi ⊢ B ∈ V
56 55 55 xpex ⊢ B × B ∈ V
57 ovex ⊢ 𝒫 ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R I ∈ V
58 fex2 ⊢ f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x : B × B ⟶ 𝒫 ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R I ∧ B × B ∈ V ∧ 𝒫 ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R I ∈ V → f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ∈ V
59 56 57 58 mp3an23 ⊢ f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x : B × B ⟶ 𝒫 ⋃ ran ⁡ ⋃ ran ⁡ ⋃ ran ⁡ R I → f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ∈ V
60 54 59 syl ⊢ φ → f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ∈ V
61 snsstp2 ⊢ + ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ⊆ Base ndx B + ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ⋅ ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x ⋅ R ⁡ x g ⁡ x
62 ssun1 ⊢ Base ndx B + ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ⋅ ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x ⋅ R ⁡ x g ⁡ x ⊆ Base ndx B + ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ⋅ ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x ⋅ R ⁡ x g ⁡ x ∪ Scalar ⁡ ndx S ⋅ ndx f ∈ Base S , g ∈ B ⟼ x ∈ I ⟼ f ⋅ R ⁡ x g ⁡ x ⋅ 𝑖 ⁡ ndx f ∈ B , g ∈ B ⟼ ∑ S x ∈ I f ⁡ x ⋅ 𝑖 ⁡ R ⁡ x g ⁡ x
63 61 62 sstri ⊢ + ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ⊆ Base ndx B + ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ⋅ ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x ⋅ R ⁡ x g ⁡ x ∪ Scalar ⁡ ndx S ⋅ ndx f ∈ Base S , g ∈ B ⟼ x ∈ I ⟼ f ⋅ R ⁡ x g ⁡ x ⋅ 𝑖 ⁡ ndx f ∈ B , g ∈ B ⟼ ∑ S x ∈ I f ⁡ x ⋅ 𝑖 ⁡ R ⁡ x g ⁡ x
64 ssun1 ⊢ Base ndx B + ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ⋅ ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x ⋅ R ⁡ x g ⁡ x ∪ Scalar ⁡ ndx S ⋅ ndx f ∈ Base S , g ∈ B ⟼ x ∈ I ⟼ f ⋅ R ⁡ x g ⁡ x ⋅ 𝑖 ⁡ ndx f ∈ B , g ∈ B ⟼ ∑ S x ∈ I f ⁡ x ⋅ 𝑖 ⁡ R ⁡ x g ⁡ x ⊆ Base ndx B + ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ⋅ ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x ⋅ R ⁡ x g ⁡ x ∪ Scalar ⁡ ndx S ⋅ ndx f ∈ Base S , g ∈ B ⟼ x ∈ I ⟼ f ⋅ R ⁡ x g ⁡ x ⋅ 𝑖 ⁡ ndx f ∈ B , g ∈ B ⟼ ∑ S x ∈ I f ⁡ x ⋅ 𝑖 ⁡ R ⁡ x g ⁡ x ∪ TopSet ⁡ ndx ∏ 𝑡 ⁡ TopOpen ∘ R ≤ ndx f g | f g ⊆ B ∧ ∀ x ∈ I f ⁡ x ≤ R ⁡ x g ⁡ x dist ⁡ ndx f ∈ B , g ∈ B ⟼ sup ran ⁡ x ∈ I ⟼ f ⁡ x dist ⁡ R ⁡ x g ⁡ x ∪ 0 ℝ * < ∪ Hom ⁡ ndx f ∈ B , g ∈ B ⟼ ⨉ x ∈ I f ⁡ x Hom ⁡ R ⁡ x g ⁡ x comp ⁡ ndx a ∈ B × B , c ∈ B ⟼ d ∈ 2 nd ⁡ a f ∈ B , g ∈ B ⟼ ⨉ x ∈ I f ⁡ x Hom ⁡ R ⁡ x g ⁡ x c , e ∈ f ∈ B , g ∈ B ⟼ ⨉ x ∈ I f ⁡ x Hom ⁡ R ⁡ x g ⁡ x ⁡ a ⟼ x ∈ I ⟼ d ⁡ x 1 st ⁡ a ⁡ x 2 nd ⁡ a ⁡ x comp ⁡ R ⁡ x c ⁡ x e ⁡ x
65 63 64 sstri ⊢ + ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ⊆ Base ndx B + ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x ⋅ ndx f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x ⋅ R ⁡ x g ⁡ x ∪ Scalar ⁡ ndx S ⋅ ndx f ∈ Base S , g ∈ B ⟼ x ∈ I ⟼ f ⋅ R ⁡ x g ⁡ x ⋅ 𝑖 ⁡ ndx f ∈ B , g ∈ B ⟼ ∑ S x ∈ I f ⁡ x ⋅ 𝑖 ⁡ R ⁡ x g ⁡ x ∪ TopSet ⁡ ndx ∏ 𝑡 ⁡ TopOpen ∘ R ≤ ndx f g | f g ⊆ B ∧ ∀ x ∈ I f ⁡ x ≤ R ⁡ x g ⁡ x dist ⁡ ndx f ∈ B , g ∈ B ⟼ sup ran ⁡ x ∈ I ⟼ f ⁡ x dist ⁡ R ⁡ x g ⁡ x ∪ 0 ℝ * < ∪ Hom ⁡ ndx f ∈ B , g ∈ B ⟼ ⨉ x ∈ I f ⁡ x Hom ⁡ R ⁡ x g ⁡ x comp ⁡ ndx a ∈ B × B , c ∈ B ⟼ d ∈ 2 nd ⁡ a f ∈ B , g ∈ B ⟼ ⨉ x ∈ I f ⁡ x Hom ⁡ R ⁡ x g ⁡ x c , e ∈ f ∈ B , g ∈ B ⟼ ⨉ x ∈ I f ⁡ x Hom ⁡ R ⁡ x g ⁡ x ⁡ a ⟼ x ∈ I ⟼ d ⁡ x 1 st ⁡ a ⁡ x 2 nd ⁡ a ⁡ x comp ⁡ R ⁡ x c ⁡ x e ⁡ x
66 18 6 19 60 65 prdsbaslem ⊢ φ → + ˙ = f ∈ B , g ∈ B ⟼ x ∈ I ⟼ f ⁡ x + R ⁡ x g ⁡ x