| Step | Hyp | Ref
| Expression |
| 1 | | prdsbas.p |
. . 3
⊢ 𝑃 = (𝑆Xs𝑅) |
| 2 | | eqid 2737 |
. . 3
⊢
(Base‘𝑆) =
(Base‘𝑆) |
| 3 | | prdsbas.i |
. . 3
⊢ (𝜑 → dom 𝑅 = 𝐼) |
| 4 | | prdsbas.s |
. . . 4
⊢ (𝜑 → 𝑆 ∈ 𝑉) |
| 5 | | prdsbas.r |
. . . 4
⊢ (𝜑 → 𝑅 ∈ 𝑊) |
| 6 | | prdsbas.b |
. . . 4
⊢ 𝐵 = (Base‘𝑃) |
| 7 | 1, 4, 5, 6, 3 | prdsbas 17502 |
. . 3
⊢ (𝜑 → 𝐵 = X𝑥 ∈ 𝐼 (Base‘(𝑅‘𝑥))) |
| 8 | | eqid 2737 |
. . . 4
⊢
(+g‘𝑃) = (+g‘𝑃) |
| 9 | 1, 4, 5, 6, 3, 8 | prdsplusg 17503 |
. . 3
⊢ (𝜑 → (+g‘𝑃) = (𝑓 ∈ 𝐵, 𝑔 ∈ 𝐵 ↦ (𝑥 ∈ 𝐼 ↦ ((𝑓‘𝑥)(+g‘(𝑅‘𝑥))(𝑔‘𝑥))))) |
| 10 | | eqid 2737 |
. . . 4
⊢
(.r‘𝑃) = (.r‘𝑃) |
| 11 | 1, 4, 5, 6, 3, 10 | prdsmulr 17504 |
. . 3
⊢ (𝜑 → (.r‘𝑃) = (𝑓 ∈ 𝐵, 𝑔 ∈ 𝐵 ↦ (𝑥 ∈ 𝐼 ↦ ((𝑓‘𝑥)(.r‘(𝑅‘𝑥))(𝑔‘𝑥))))) |
| 12 | | eqid 2737 |
. . . 4
⊢ (
·𝑠 ‘𝑃) = ( ·𝑠
‘𝑃) |
| 13 | 1, 4, 5, 6, 3, 2, 12 | prdsvsca 17505 |
. . 3
⊢ (𝜑 → (
·𝑠 ‘𝑃) = (𝑓 ∈ (Base‘𝑆), 𝑔 ∈ 𝐵 ↦ (𝑥 ∈ 𝐼 ↦ (𝑓( ·𝑠
‘(𝑅‘𝑥))(𝑔‘𝑥))))) |
| 14 | | eqidd 2738 |
. . 3
⊢ (𝜑 → (𝑓 ∈ 𝐵, 𝑔 ∈ 𝐵 ↦ (𝑆 Σg (𝑥 ∈ 𝐼 ↦ ((𝑓‘𝑥)(·𝑖‘(𝑅‘𝑥))(𝑔‘𝑥))))) = (𝑓 ∈ 𝐵, 𝑔 ∈ 𝐵 ↦ (𝑆 Σg (𝑥 ∈ 𝐼 ↦ ((𝑓‘𝑥)(·𝑖‘(𝑅‘𝑥))(𝑔‘𝑥)))))) |
| 15 | | eqid 2737 |
. . . 4
⊢
(TopSet‘𝑃) =
(TopSet‘𝑃) |
| 16 | 1, 4, 5, 6, 3, 15 | prdstset 17511 |
. . 3
⊢ (𝜑 → (TopSet‘𝑃) =
(∏t‘(TopOpen ∘ 𝑅))) |
| 17 | | eqid 2737 |
. . . 4
⊢
(le‘𝑃) =
(le‘𝑃) |
| 18 | 1, 4, 5, 6, 3, 17 | prdsle 17507 |
. . 3
⊢ (𝜑 → (le‘𝑃) = {〈𝑓, 𝑔〉 ∣ ({𝑓, 𝑔} ⊆ 𝐵 ∧ ∀𝑥 ∈ 𝐼 (𝑓‘𝑥)(le‘(𝑅‘𝑥))(𝑔‘𝑥))}) |
| 19 | | eqid 2737 |
. . . 4
⊢
(dist‘𝑃) =
(dist‘𝑃) |
| 20 | 1, 4, 5, 6, 3, 19 | prdsds 17509 |
. . 3
⊢ (𝜑 → (dist‘𝑃) = (𝑓 ∈ 𝐵, 𝑔 ∈ 𝐵 ↦ sup((ran (𝑥 ∈ 𝐼 ↦ ((𝑓‘𝑥)(dist‘(𝑅‘𝑥))(𝑔‘𝑥))) ∪ {0}), ℝ*, <
))) |
| 21 | | prdshom.h |
. . . 4
⊢ 𝐻 = (Hom ‘𝑃) |
| 22 | 1, 4, 5, 6, 3, 21 | prdshom 17512 |
. . 3
⊢ (𝜑 → 𝐻 = (𝑓 ∈ 𝐵, 𝑔 ∈ 𝐵 ↦ X𝑥 ∈ 𝐼 ((𝑓‘𝑥)(Hom ‘(𝑅‘𝑥))(𝑔‘𝑥)))) |
| 23 | | eqidd 2738 |
. . 3
⊢ (𝜑 → (𝑎 ∈ (𝐵 × 𝐵), 𝑐 ∈ 𝐵 ↦ (𝑑 ∈ ((2nd ‘𝑎)𝐻𝑐), 𝑒 ∈ (𝐻‘𝑎) ↦ (𝑥 ∈ 𝐼 ↦ ((𝑑‘𝑥)(〈((1st ‘𝑎)‘𝑥), ((2nd ‘𝑎)‘𝑥)〉(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥))))) = (𝑎 ∈ (𝐵 × 𝐵), 𝑐 ∈ 𝐵 ↦ (𝑑 ∈ ((2nd ‘𝑎)𝐻𝑐), 𝑒 ∈ (𝐻‘𝑎) ↦ (𝑥 ∈ 𝐼 ↦ ((𝑑‘𝑥)(〈((1st ‘𝑎)‘𝑥), ((2nd ‘𝑎)‘𝑥)〉(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥)))))) |
| 24 | 1, 2, 3, 7, 9, 11,
13, 14, 16, 18, 20, 22, 23, 4, 5 | prdsval 17500 |
. 2
⊢ (𝜑 → 𝑃 = (({〈(Base‘ndx), 𝐵〉,
〈(+g‘ndx), (+g‘𝑃)〉, 〈(.r‘ndx),
(.r‘𝑃)〉} ∪ {〈(Scalar‘ndx),
𝑆〉, 〈(
·𝑠 ‘ndx), (
·𝑠 ‘𝑃)〉,
〈(·𝑖‘ndx), (𝑓 ∈ 𝐵, 𝑔 ∈ 𝐵 ↦ (𝑆 Σg (𝑥 ∈ 𝐼 ↦ ((𝑓‘𝑥)(·𝑖‘(𝑅‘𝑥))(𝑔‘𝑥)))))〉}) ∪ ({〈(TopSet‘ndx),
(TopSet‘𝑃)〉,
〈(le‘ndx), (le‘𝑃)〉, 〈(dist‘ndx),
(dist‘𝑃)〉} ∪
{〈(Hom ‘ndx), 𝐻〉, 〈(comp‘ndx), (𝑎 ∈ (𝐵 × 𝐵), 𝑐 ∈ 𝐵 ↦ (𝑑 ∈ ((2nd ‘𝑎)𝐻𝑐), 𝑒 ∈ (𝐻‘𝑎) ↦ (𝑥 ∈ 𝐼 ↦ ((𝑑‘𝑥)(〈((1st ‘𝑎)‘𝑥), ((2nd ‘𝑎)‘𝑥)〉(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥)))))〉}))) |
| 25 | | prdsco.o |
. 2
⊢ ∙ =
(comp‘𝑃) |
| 26 | | ccoid 17458 |
. 2
⊢ comp =
Slot (comp‘ndx) |
| 27 | 6 | fvexi 6920 |
. . . . 5
⊢ 𝐵 ∈ V |
| 28 | 27, 27 | xpex 7773 |
. . . 4
⊢ (𝐵 × 𝐵) ∈ V |
| 29 | 28, 27 | mpoex 8104 |
. . 3
⊢ (𝑎 ∈ (𝐵 × 𝐵), 𝑐 ∈ 𝐵 ↦ (𝑑 ∈ ((2nd ‘𝑎)𝐻𝑐), 𝑒 ∈ (𝐻‘𝑎) ↦ (𝑥 ∈ 𝐼 ↦ ((𝑑‘𝑥)(〈((1st ‘𝑎)‘𝑥), ((2nd ‘𝑎)‘𝑥)〉(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥))))) ∈ V |
| 30 | 29 | a1i 11 |
. 2
⊢ (𝜑 → (𝑎 ∈ (𝐵 × 𝐵), 𝑐 ∈ 𝐵 ↦ (𝑑 ∈ ((2nd ‘𝑎)𝐻𝑐), 𝑒 ∈ (𝐻‘𝑎) ↦ (𝑥 ∈ 𝐼 ↦ ((𝑑‘𝑥)(〈((1st ‘𝑎)‘𝑥), ((2nd ‘𝑎)‘𝑥)〉(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥))))) ∈ V) |
| 31 | | snsspr2 4815 |
. . . 4
⊢
{〈(comp‘ndx), (𝑎 ∈ (𝐵 × 𝐵), 𝑐 ∈ 𝐵 ↦ (𝑑 ∈ ((2nd ‘𝑎)𝐻𝑐), 𝑒 ∈ (𝐻‘𝑎) ↦ (𝑥 ∈ 𝐼 ↦ ((𝑑‘𝑥)(〈((1st ‘𝑎)‘𝑥), ((2nd ‘𝑎)‘𝑥)〉(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥)))))〉} ⊆ {〈(Hom ‘ndx),
𝐻〉,
〈(comp‘ndx), (𝑎
∈ (𝐵 × 𝐵), 𝑐 ∈ 𝐵 ↦ (𝑑 ∈ ((2nd ‘𝑎)𝐻𝑐), 𝑒 ∈ (𝐻‘𝑎) ↦ (𝑥 ∈ 𝐼 ↦ ((𝑑‘𝑥)(〈((1st ‘𝑎)‘𝑥), ((2nd ‘𝑎)‘𝑥)〉(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥)))))〉} |
| 32 | | ssun2 4179 |
. . . 4
⊢
{〈(Hom ‘ndx), 𝐻〉, 〈(comp‘ndx), (𝑎 ∈ (𝐵 × 𝐵), 𝑐 ∈ 𝐵 ↦ (𝑑 ∈ ((2nd ‘𝑎)𝐻𝑐), 𝑒 ∈ (𝐻‘𝑎) ↦ (𝑥 ∈ 𝐼 ↦ ((𝑑‘𝑥)(〈((1st ‘𝑎)‘𝑥), ((2nd ‘𝑎)‘𝑥)〉(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥)))))〉} ⊆
({〈(TopSet‘ndx), (TopSet‘𝑃)〉, 〈(le‘ndx),
(le‘𝑃)〉,
〈(dist‘ndx), (dist‘𝑃)〉} ∪ {〈(Hom ‘ndx),
𝐻〉,
〈(comp‘ndx), (𝑎
∈ (𝐵 × 𝐵), 𝑐 ∈ 𝐵 ↦ (𝑑 ∈ ((2nd ‘𝑎)𝐻𝑐), 𝑒 ∈ (𝐻‘𝑎) ↦ (𝑥 ∈ 𝐼 ↦ ((𝑑‘𝑥)(〈((1st ‘𝑎)‘𝑥), ((2nd ‘𝑎)‘𝑥)〉(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥)))))〉}) |
| 33 | 31, 32 | sstri 3993 |
. . 3
⊢
{〈(comp‘ndx), (𝑎 ∈ (𝐵 × 𝐵), 𝑐 ∈ 𝐵 ↦ (𝑑 ∈ ((2nd ‘𝑎)𝐻𝑐), 𝑒 ∈ (𝐻‘𝑎) ↦ (𝑥 ∈ 𝐼 ↦ ((𝑑‘𝑥)(〈((1st ‘𝑎)‘𝑥), ((2nd ‘𝑎)‘𝑥)〉(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥)))))〉} ⊆
({〈(TopSet‘ndx), (TopSet‘𝑃)〉, 〈(le‘ndx),
(le‘𝑃)〉,
〈(dist‘ndx), (dist‘𝑃)〉} ∪ {〈(Hom ‘ndx),
𝐻〉,
〈(comp‘ndx), (𝑎
∈ (𝐵 × 𝐵), 𝑐 ∈ 𝐵 ↦ (𝑑 ∈ ((2nd ‘𝑎)𝐻𝑐), 𝑒 ∈ (𝐻‘𝑎) ↦ (𝑥 ∈ 𝐼 ↦ ((𝑑‘𝑥)(〈((1st ‘𝑎)‘𝑥), ((2nd ‘𝑎)‘𝑥)〉(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥)))))〉}) |
| 34 | | ssun2 4179 |
. . 3
⊢
({〈(TopSet‘ndx), (TopSet‘𝑃)〉, 〈(le‘ndx),
(le‘𝑃)〉,
〈(dist‘ndx), (dist‘𝑃)〉} ∪ {〈(Hom ‘ndx),
𝐻〉,
〈(comp‘ndx), (𝑎
∈ (𝐵 × 𝐵), 𝑐 ∈ 𝐵 ↦ (𝑑 ∈ ((2nd ‘𝑎)𝐻𝑐), 𝑒 ∈ (𝐻‘𝑎) ↦ (𝑥 ∈ 𝐼 ↦ ((𝑑‘𝑥)(〈((1st ‘𝑎)‘𝑥), ((2nd ‘𝑎)‘𝑥)〉(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥)))))〉}) ⊆
(({〈(Base‘ndx), 𝐵〉, 〈(+g‘ndx),
(+g‘𝑃)〉, 〈(.r‘ndx),
(.r‘𝑃)〉} ∪ {〈(Scalar‘ndx),
𝑆〉, 〈(
·𝑠 ‘ndx), (
·𝑠 ‘𝑃)〉,
〈(·𝑖‘ndx), (𝑓 ∈ 𝐵, 𝑔 ∈ 𝐵 ↦ (𝑆 Σg (𝑥 ∈ 𝐼 ↦ ((𝑓‘𝑥)(·𝑖‘(𝑅‘𝑥))(𝑔‘𝑥)))))〉}) ∪ ({〈(TopSet‘ndx),
(TopSet‘𝑃)〉,
〈(le‘ndx), (le‘𝑃)〉, 〈(dist‘ndx),
(dist‘𝑃)〉} ∪
{〈(Hom ‘ndx), 𝐻〉, 〈(comp‘ndx), (𝑎 ∈ (𝐵 × 𝐵), 𝑐 ∈ 𝐵 ↦ (𝑑 ∈ ((2nd ‘𝑎)𝐻𝑐), 𝑒 ∈ (𝐻‘𝑎) ↦ (𝑥 ∈ 𝐼 ↦ ((𝑑‘𝑥)(〈((1st ‘𝑎)‘𝑥), ((2nd ‘𝑎)‘𝑥)〉(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥)))))〉})) |
| 35 | 33, 34 | sstri 3993 |
. 2
⊢
{〈(comp‘ndx), (𝑎 ∈ (𝐵 × 𝐵), 𝑐 ∈ 𝐵 ↦ (𝑑 ∈ ((2nd ‘𝑎)𝐻𝑐), 𝑒 ∈ (𝐻‘𝑎) ↦ (𝑥 ∈ 𝐼 ↦ ((𝑑‘𝑥)(〈((1st ‘𝑎)‘𝑥), ((2nd ‘𝑎)‘𝑥)〉(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥)))))〉} ⊆
(({〈(Base‘ndx), 𝐵〉, 〈(+g‘ndx),
(+g‘𝑃)〉, 〈(.r‘ndx),
(.r‘𝑃)〉} ∪ {〈(Scalar‘ndx),
𝑆〉, 〈(
·𝑠 ‘ndx), (
·𝑠 ‘𝑃)〉,
〈(·𝑖‘ndx), (𝑓 ∈ 𝐵, 𝑔 ∈ 𝐵 ↦ (𝑆 Σg (𝑥 ∈ 𝐼 ↦ ((𝑓‘𝑥)(·𝑖‘(𝑅‘𝑥))(𝑔‘𝑥)))))〉}) ∪ ({〈(TopSet‘ndx),
(TopSet‘𝑃)〉,
〈(le‘ndx), (le‘𝑃)〉, 〈(dist‘ndx),
(dist‘𝑃)〉} ∪
{〈(Hom ‘ndx), 𝐻〉, 〈(comp‘ndx), (𝑎 ∈ (𝐵 × 𝐵), 𝑐 ∈ 𝐵 ↦ (𝑑 ∈ ((2nd ‘𝑎)𝐻𝑐), 𝑒 ∈ (𝐻‘𝑎) ↦ (𝑥 ∈ 𝐼 ↦ ((𝑑‘𝑥)(〈((1st ‘𝑎)‘𝑥), ((2nd ‘𝑎)‘𝑥)〉(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥)))))〉})) |
| 36 | 24, 25, 26, 30, 35 | prdsbaslem 17498 |
1
⊢ (𝜑 → ∙ = (𝑎 ∈ (𝐵 × 𝐵), 𝑐 ∈ 𝐵 ↦ (𝑑 ∈ ((2nd ‘𝑎)𝐻𝑐), 𝑒 ∈ (𝐻‘𝑎) ↦ (𝑥 ∈ 𝐼 ↦ ((𝑑‘𝑥)(〈((1st ‘𝑎)‘𝑥), ((2nd ‘𝑎)‘𝑥)〉(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥)))))) |