prdssca - Metamath Proof Explorer

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

Theorem prdssca 17265

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

**Hypotheses**
Ref	Expression
prdsbas.p	⊢ 𝑃 = (𝑆X_s𝑅)
prdsbas.s	⊢ (𝜑 → 𝑆 ∈ 𝑉)
prdsbas.r	⊢ (𝜑 → 𝑅 ∈ 𝑊)

**Assertion**
Ref	Expression
prdssca	⊢ (𝜑 → 𝑆 = (Scalar‘𝑃))

Proof of Theorem prdssca Dummy variables 𝑎 𝑐 𝑑 𝑒 𝑓 𝑔 𝑥 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		prdsbas.p	. . . 4 ⊢ 𝑃 = (𝑆X_s𝑅)
2		eqid 2737	. . . 4 ⊢ (Base‘𝑆) = (Base‘𝑆)
3		eqidd 2738	. . . 4 ⊢ (𝜑 → dom 𝑅 = dom 𝑅)
4		eqidd 2738	. . . 4 ⊢ (𝜑 → X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) = X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)))
5		eqidd 2738	. . . 4 ⊢ (𝜑 → (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(+_g‘(𝑅‘𝑥))(𝑔‘𝑥)))) = (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(+_g‘(𝑅‘𝑥))(𝑔‘𝑥)))))
6		eqidd 2738	. . . 4 ⊢ (𝜑 → (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(._r‘(𝑅‘𝑥))(𝑔‘𝑥)))) = (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(._r‘(𝑅‘𝑥))(𝑔‘𝑥)))))
7		eqidd 2738	. . . 4 ⊢ (𝜑 → (𝑓 ∈ (Base‘𝑆), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ (𝑓( ·_𝑠 ‘(𝑅‘𝑥))(𝑔‘𝑥)))) = (𝑓 ∈ (Base‘𝑆), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ (𝑓( ·_𝑠 ‘(𝑅‘𝑥))(𝑔‘𝑥)))))
8		eqidd 2738	. . . 4 ⊢ (𝜑 → (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑆 Σ_g (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(·_𝑖‘(𝑅‘𝑥))(𝑔‘𝑥))))) = (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑆 Σ_g (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(·_𝑖‘(𝑅‘𝑥))(𝑔‘𝑥))))))
9		eqidd 2738	. . . 4 ⊢ (𝜑 → (∏_t‘(TopOpen ∘ 𝑅)) = (∏_t‘(TopOpen ∘ 𝑅)))
10		eqidd 2738	. . . 4 ⊢ (𝜑 → {⟨𝑓, 𝑔⟩ ∣ ({𝑓, 𝑔} ⊆ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ∧ ∀𝑥 ∈ dom 𝑅(𝑓‘𝑥)(le‘(𝑅‘𝑥))(𝑔‘𝑥))} = {⟨𝑓, 𝑔⟩ ∣ ({𝑓, 𝑔} ⊆ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ∧ ∀𝑥 ∈ dom 𝑅(𝑓‘𝑥)(le‘(𝑅‘𝑥))(𝑔‘𝑥))})
11		eqidd 2738	. . . 4 ⊢ (𝜑 → (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ sup((ran (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(dist‘(𝑅‘𝑥))(𝑔‘𝑥))) ∪ {0}), ℝ^, < )) = (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ sup((ran (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(dist‘(𝑅‘𝑥))(𝑔‘𝑥))) ∪ {0}), ℝ^, < )))
12		eqidd 2738	. . . 4 ⊢ (𝜑 → (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ X𝑥 ∈ dom 𝑅((𝑓‘𝑥)(Hom ‘(𝑅‘𝑥))(𝑔‘𝑥))) = (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ X𝑥 ∈ dom 𝑅((𝑓‘𝑥)(Hom ‘(𝑅‘𝑥))(𝑔‘𝑥))))
13		eqidd 2738	. . . 4 ⊢ (𝜑 → (𝑎 ∈ (X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) × X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥))), 𝑐 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑑 ∈ ((2^nd ‘𝑎)(𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ X𝑥 ∈ dom 𝑅((𝑓‘𝑥)(Hom ‘(𝑅‘𝑥))(𝑔‘𝑥)))𝑐), 𝑒 ∈ ((𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ X𝑥 ∈ dom 𝑅((𝑓‘𝑥)(Hom ‘(𝑅‘𝑥))(𝑔‘𝑥)))‘𝑎) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑑‘𝑥)(⟨((1^st ‘𝑎)‘𝑥), ((2^nd ‘𝑎)‘𝑥)⟩(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥))))) = (𝑎 ∈ (X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) × X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥))), 𝑐 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑑 ∈ ((2^nd ‘𝑎)(𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ X𝑥 ∈ dom 𝑅((𝑓‘𝑥)(Hom ‘(𝑅‘𝑥))(𝑔‘𝑥)))𝑐), 𝑒 ∈ ((𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ X𝑥 ∈ dom 𝑅((𝑓‘𝑥)(Hom ‘(𝑅‘𝑥))(𝑔‘𝑥)))‘𝑎) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑑‘𝑥)(⟨((1^st ‘𝑎)‘𝑥), ((2^nd ‘𝑎)‘𝑥)⟩(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥))))))
14		prdsbas.s	. . . 4 ⊢ (𝜑 → 𝑆 ∈ 𝑉)
15		prdsbas.r	. . . 4 ⊢ (𝜑 → 𝑅 ∈ 𝑊)
16	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15	prdsval 17264	. . 3 ⊢ (𝜑 → 𝑃 = (({⟨(Base‘ndx), X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥))⟩, ⟨(+_g‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(+_g‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩, ⟨(._r‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(._r‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩} ∪ {⟨(Scalar‘ndx), 𝑆⟩, ⟨( ·_𝑠 ‘ndx), (𝑓 ∈ (Base‘𝑆), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ (𝑓( ·_𝑠 ‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩, ⟨(·_𝑖‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑆 Σ_g (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(·_𝑖‘(𝑅‘𝑥))(𝑔‘𝑥)))))⟩}) ∪ ({⟨(TopSet‘ndx), (∏_t‘(TopOpen ∘ 𝑅))⟩, ⟨(le‘ndx), {⟨𝑓, 𝑔⟩ ∣ ({𝑓, 𝑔} ⊆ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ∧ ∀𝑥 ∈ dom 𝑅(𝑓‘𝑥)(le‘(𝑅‘𝑥))(𝑔‘𝑥))}⟩, ⟨(dist‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ sup((ran (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(dist‘(𝑅‘𝑥))(𝑔‘𝑥))) ∪ {0}), ℝ^*, < ))⟩} ∪ {⟨(Hom ‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ X𝑥 ∈ dom 𝑅((𝑓‘𝑥)(Hom ‘(𝑅‘𝑥))(𝑔‘𝑥)))⟩, ⟨(comp‘ndx), (𝑎 ∈ (X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) × X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥))), 𝑐 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑑 ∈ ((2^nd ‘𝑎)(𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ X𝑥 ∈ dom 𝑅((𝑓‘𝑥)(Hom ‘(𝑅‘𝑥))(𝑔‘𝑥)))𝑐), 𝑒 ∈ ((𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ X𝑥 ∈ dom 𝑅((𝑓‘𝑥)(Hom ‘(𝑅‘𝑥))(𝑔‘𝑥)))‘𝑎) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑑‘𝑥)(⟨((1^st ‘𝑎)‘𝑥), ((2^nd ‘𝑎)‘𝑥)⟩(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥)))))⟩})))
17		eqid 2737	. . 3 ⊢ (Scalar‘𝑃) = (Scalar‘𝑃)
18		scaid 17123	. . 3 ⊢ Scalar = Slot (Scalar‘ndx)
19		snsstp1 4768	. . . . 5 ⊢ {⟨(Scalar‘ndx), 𝑆⟩} ⊆ {⟨(Scalar‘ndx), 𝑆⟩, ⟨( ·_𝑠 ‘ndx), (𝑓 ∈ (Base‘𝑆), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ (𝑓( ·_𝑠 ‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩, ⟨(·_𝑖‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑆 Σ_g (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(·_𝑖‘(𝑅‘𝑥))(𝑔‘𝑥)))))⟩}
20		ssun2 4125	. . . . 5 ⊢ {⟨(Scalar‘ndx), 𝑆⟩, ⟨( ·_𝑠 ‘ndx), (𝑓 ∈ (Base‘𝑆), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ (𝑓( ·_𝑠 ‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩, ⟨(·_𝑖‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑆 Σ_g (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(·_𝑖‘(𝑅‘𝑥))(𝑔‘𝑥)))))⟩} ⊆ ({⟨(Base‘ndx), X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥))⟩, ⟨(+_g‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(+_g‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩, ⟨(._r‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(._r‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩} ∪ {⟨(Scalar‘ndx), 𝑆⟩, ⟨( ·_𝑠 ‘ndx), (𝑓 ∈ (Base‘𝑆), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ (𝑓( ·_𝑠 ‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩, ⟨(·_𝑖‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑆 Σ_g (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(·_𝑖‘(𝑅‘𝑥))(𝑔‘𝑥)))))⟩})
21	19, 20	sstri 3945	. . . 4 ⊢ {⟨(Scalar‘ndx), 𝑆⟩} ⊆ ({⟨(Base‘ndx), X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥))⟩, ⟨(+_g‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(+_g‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩, ⟨(._r‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(._r‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩} ∪ {⟨(Scalar‘ndx), 𝑆⟩, ⟨( ·_𝑠 ‘ndx), (𝑓 ∈ (Base‘𝑆), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ (𝑓( ·_𝑠 ‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩, ⟨(·_𝑖‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑆 Σ_g (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(·_𝑖‘(𝑅‘𝑥))(𝑔‘𝑥)))))⟩})
22		ssun1 4124	. . . 4 ⊢ ({⟨(Base‘ndx), X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥))⟩, ⟨(+_g‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(+_g‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩, ⟨(._r‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(._r‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩} ∪ {⟨(Scalar‘ndx), 𝑆⟩, ⟨( ·_𝑠 ‘ndx), (𝑓 ∈ (Base‘𝑆), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ (𝑓( ·_𝑠 ‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩, ⟨(·_𝑖‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑆 Σ_g (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(·_𝑖‘(𝑅‘𝑥))(𝑔‘𝑥)))))⟩}) ⊆ (({⟨(Base‘ndx), X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥))⟩, ⟨(+_g‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(+_g‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩, ⟨(._r‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(._r‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩} ∪ {⟨(Scalar‘ndx), 𝑆⟩, ⟨( ·_𝑠 ‘ndx), (𝑓 ∈ (Base‘𝑆), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ (𝑓( ·_𝑠 ‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩, ⟨(·_𝑖‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑆 Σ_g (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(·_𝑖‘(𝑅‘𝑥))(𝑔‘𝑥)))))⟩}) ∪ ({⟨(TopSet‘ndx), (∏_t‘(TopOpen ∘ 𝑅))⟩, ⟨(le‘ndx), {⟨𝑓, 𝑔⟩ ∣ ({𝑓, 𝑔} ⊆ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ∧ ∀𝑥 ∈ dom 𝑅(𝑓‘𝑥)(le‘(𝑅‘𝑥))(𝑔‘𝑥))}⟩, ⟨(dist‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ sup((ran (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(dist‘(𝑅‘𝑥))(𝑔‘𝑥))) ∪ {0}), ℝ^*, < ))⟩} ∪ {⟨(Hom ‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ X𝑥 ∈ dom 𝑅((𝑓‘𝑥)(Hom ‘(𝑅‘𝑥))(𝑔‘𝑥)))⟩, ⟨(comp‘ndx), (𝑎 ∈ (X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) × X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥))), 𝑐 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑑 ∈ ((2^nd ‘𝑎)(𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ X𝑥 ∈ dom 𝑅((𝑓‘𝑥)(Hom ‘(𝑅‘𝑥))(𝑔‘𝑥)))𝑐), 𝑒 ∈ ((𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ X𝑥 ∈ dom 𝑅((𝑓‘𝑥)(Hom ‘(𝑅‘𝑥))(𝑔‘𝑥)))‘𝑎) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑑‘𝑥)(⟨((1^st ‘𝑎)‘𝑥), ((2^nd ‘𝑎)‘𝑥)⟩(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥)))))⟩}))
23	21, 22	sstri 3945	. . 3 ⊢ {⟨(Scalar‘ndx), 𝑆⟩} ⊆ (({⟨(Base‘ndx), X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥))⟩, ⟨(+_g‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(+_g‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩, ⟨(._r‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(._r‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩} ∪ {⟨(Scalar‘ndx), 𝑆⟩, ⟨( ·_𝑠 ‘ndx), (𝑓 ∈ (Base‘𝑆), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑥 ∈ dom 𝑅 ↦ (𝑓( ·_𝑠 ‘(𝑅‘𝑥))(𝑔‘𝑥))))⟩, ⟨(·_𝑖‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑆 Σ_g (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(·_𝑖‘(𝑅‘𝑥))(𝑔‘𝑥)))))⟩}) ∪ ({⟨(TopSet‘ndx), (∏_t‘(TopOpen ∘ 𝑅))⟩, ⟨(le‘ndx), {⟨𝑓, 𝑔⟩ ∣ ({𝑓, 𝑔} ⊆ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ∧ ∀𝑥 ∈ dom 𝑅(𝑓‘𝑥)(le‘(𝑅‘𝑥))(𝑔‘𝑥))}⟩, ⟨(dist‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ sup((ran (𝑥 ∈ dom 𝑅 ↦ ((𝑓‘𝑥)(dist‘(𝑅‘𝑥))(𝑔‘𝑥))) ∪ {0}), ℝ^*, < ))⟩} ∪ {⟨(Hom ‘ndx), (𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ X𝑥 ∈ dom 𝑅((𝑓‘𝑥)(Hom ‘(𝑅‘𝑥))(𝑔‘𝑥)))⟩, ⟨(comp‘ndx), (𝑎 ∈ (X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) × X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥))), 𝑐 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ (𝑑 ∈ ((2^nd ‘𝑎)(𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ X𝑥 ∈ dom 𝑅((𝑓‘𝑥)(Hom ‘(𝑅‘𝑥))(𝑔‘𝑥)))𝑐), 𝑒 ∈ ((𝑓 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)), 𝑔 ∈ X𝑥 ∈ dom 𝑅(Base‘(𝑅‘𝑥)) ↦ X𝑥 ∈ dom 𝑅((𝑓‘𝑥)(Hom ‘(𝑅‘𝑥))(𝑔‘𝑥)))‘𝑎) ↦ (𝑥 ∈ dom 𝑅 ↦ ((𝑑‘𝑥)(⟨((1^st ‘𝑎)‘𝑥), ((2^nd ‘𝑎)‘𝑥)⟩(comp‘(𝑅‘𝑥))(𝑐‘𝑥))(𝑒‘𝑥)))))⟩}))
24	16, 17, 18, 14, 23	prdsbaslem 17262	. 2 ⊢ (𝜑 → (Scalar‘𝑃) = 𝑆)
25	24	eqcomd 2743	1 ⊢ (𝜑 → 𝑆 = (Scalar‘𝑃))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 397 = wceq 1541 ∈ wcel 2106 ∀wral 3062 ∪ cun 3900 ⊆ wss 3902 {csn 4578 {cpr 4580 {ctp 4582 ⟨cop 4584 class class class wbr 5097 {copab 5159 ↦ cmpt 5180 × cxp 5623 dom cdm 5625 ran crn 5626 ∘ ccom 5629 ‘cfv 6484 (class class class)co 7342 ∈ cmpo 7344 1^st c1st 7902 2^nd c2nd 7903 Xcixp 8761 supcsup 9302 0cc0 10977 ℝ^*cxr 11114 < clt 11115 ndxcnx 16992 Basecbs 17010 +_gcplusg 17060 ._rcmulr 17061 Scalarcsca 17063 ·_𝑠 cvsca 17064 ·_𝑖cip 17065 TopSetcts 17066 lecple 17067 distcds 17069 Hom chom 17071 compcco 17072 TopOpenctopn 17230 ∏_tcpt 17247 Σ_g cgsu 17249 X_scprds 17254

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1913 ax-6 1971 ax-7 2011 ax-8 2108 ax-9 2116 ax-10 2137 ax-11 2154 ax-12 2171 ax-ext 2708 ax-sep 5248 ax-nul 5255 ax-pow 5313 ax-pr 5377 ax-un 7655 ax-cnex 11033 ax-resscn 11034 ax-1cn 11035 ax-icn 11036 ax-addcl 11037 ax-addrcl 11038 ax-mulcl 11039 ax-mulrcl 11040 ax-mulcom 11041 ax-addass 11042 ax-mulass 11043 ax-distr 11044 ax-i2m1 11045 ax-1ne0 11046 ax-1rid 11047 ax-rnegex 11048 ax-rrecex 11049 ax-cnre 11050 ax-pre-lttri 11051 ax-pre-lttrn 11052 ax-pre-ltadd 11053 ax-pre-mulgt0 11054

This theorem depends on definitions: df-bi 206 df-an 398 df-or 846 df-3or 1088 df-3an 1089 df-tru 1544 df-fal 1554 df-ex 1782 df-nf 1786 df-sb 2068 df-mo 2539 df-eu 2568 df-clab 2715 df-cleq 2729 df-clel 2815 df-nfc 2887 df-ne 2942 df-nel 3048 df-ral 3063 df-rex 3072 df-reu 3351 df-rab 3405 df-v 3444 df-sbc 3732 df-csb 3848 df-dif 3905 df-un 3907 df-in 3909 df-ss 3919 df-pss 3921 df-nul 4275 df-if 4479 df-pw 4554 df-sn 4579 df-pr 4581 df-tp 4583 df-op 4585 df-uni 4858 df-iun 4948 df-br 5098 df-opab 5160 df-mpt 5181 df-tr 5215 df-id 5523 df-eprel 5529 df-po 5537 df-so 5538 df-fr 5580 df-we 5582 df-xp 5631 df-rel 5632 df-cnv 5633 df-co 5634 df-dm 5635 df-rn 5636 df-res 5637 df-ima 5638 df-pred 6243 df-ord 6310 df-on 6311 df-lim 6312 df-suc 6313 df-iota 6436 df-fun 6486 df-fn 6487 df-f 6488 df-f1 6489 df-fo 6490 df-f1o 6491 df-fv 6492 df-riota 7298 df-ov 7345 df-oprab 7346 df-mpo 7347 df-om 7786 df-1st 7904 df-2nd 7905 df-frecs 8172 df-wrecs 8203 df-recs 8277 df-rdg 8316 df-1o 8372 df-er 8574 df-map 8693 df-ixp 8762 df-en 8810 df-dom 8811 df-sdom 8812 df-fin 8813 df-sup 9304 df-pnf 11117 df-mnf 11118 df-xr 11119 df-ltxr 11120 df-le 11121 df-sub 11313 df-neg 11314 df-nn 12080 df-2 12142 df-3 12143 df-4 12144 df-5 12145 df-6 12146 df-7 12147 df-8 12148 df-9 12149 df-n0 12340 df-z 12426 df-dec 12544 df-uz 12689 df-fz 13346 df-struct 16946 df-slot 16981 df-ndx 16993 df-base 17011 df-plusg 17073 df-mulr 17074 df-sca 17076 df-vsca 17077 df-ip 17078 df-tset 17079 df-ple 17080 df-ds 17082 df-hom 17084 df-cco 17085 df-prds 17256

This theorem is referenced by: pwssca 17305 xpssca 17385 xpsvsca 17386 prdslmodd 20337 dsmmlss 21057 rrxsca 24666

W3C validator