Step | Hyp | Ref
| Expression |
1 | | imasbas.u |
. . . 4
⊢ (𝜑 → 𝑈 = (𝐹 “s 𝑅)) |
2 | | imasbas.v |
. . . 4
⊢ (𝜑 → 𝑉 = (Base‘𝑅)) |
3 | | eqid 2778 |
. . . 4
⊢
(+g‘𝑅) = (+g‘𝑅) |
4 | | eqid 2778 |
. . . 4
⊢
(.r‘𝑅) = (.r‘𝑅) |
5 | | imassca.g |
. . . 4
⊢ 𝐺 = (Scalar‘𝑅) |
6 | | eqid 2778 |
. . . 4
⊢
(Base‘𝐺) =
(Base‘𝐺) |
7 | | eqid 2778 |
. . . 4
⊢ (
·𝑠 ‘𝑅) = ( ·𝑠
‘𝑅) |
8 | | eqid 2778 |
. . . 4
⊢
(·𝑖‘𝑅) =
(·𝑖‘𝑅) |
9 | | eqid 2778 |
. . . 4
⊢
(TopOpen‘𝑅) =
(TopOpen‘𝑅) |
10 | | eqid 2778 |
. . . 4
⊢
(dist‘𝑅) =
(dist‘𝑅) |
11 | | eqid 2778 |
. . . 4
⊢
(le‘𝑅) =
(le‘𝑅) |
12 | | imasbas.f |
. . . . 5
⊢ (𝜑 → 𝐹:𝑉–onto→𝐵) |
13 | | imasbas.r |
. . . . 5
⊢ (𝜑 → 𝑅 ∈ 𝑍) |
14 | | eqid 2778 |
. . . . 5
⊢
(+g‘𝑈) = (+g‘𝑈) |
15 | 1, 2, 12, 13, 3, 14 | imasplusg 16563 |
. . . 4
⊢ (𝜑 → (+g‘𝑈) = ∪ 𝑝 ∈ 𝑉 ∪ 𝑞 ∈ 𝑉 {〈〈(𝐹‘𝑝), (𝐹‘𝑞)〉, (𝐹‘(𝑝(+g‘𝑅)𝑞))〉}) |
16 | | eqid 2778 |
. . . . 5
⊢
(.r‘𝑈) = (.r‘𝑈) |
17 | 1, 2, 12, 13, 4, 16 | imasmulr 16564 |
. . . 4
⊢ (𝜑 → (.r‘𝑈) = ∪ 𝑝 ∈ 𝑉 ∪ 𝑞 ∈ 𝑉 {〈〈(𝐹‘𝑝), (𝐹‘𝑞)〉, (𝐹‘(𝑝(.r‘𝑅)𝑞))〉}) |
18 | | eqidd 2779 |
. . . 4
⊢ (𝜑 → ∪ 𝑞 ∈ 𝑉 (𝑝 ∈ (Base‘𝐺), 𝑥 ∈ {(𝐹‘𝑞)} ↦ (𝐹‘(𝑝( ·𝑠
‘𝑅)𝑞))) = ∪
𝑞 ∈ 𝑉 (𝑝 ∈ (Base‘𝐺), 𝑥 ∈ {(𝐹‘𝑞)} ↦ (𝐹‘(𝑝( ·𝑠
‘𝑅)𝑞)))) |
19 | | eqidd 2779 |
. . . 4
⊢ (𝜑 → ∪ 𝑝 ∈ 𝑉 ∪ 𝑞 ∈ 𝑉 {〈〈(𝐹‘𝑝), (𝐹‘𝑞)〉, (𝑝(·𝑖‘𝑅)𝑞)〉} = ∪
𝑝 ∈ 𝑉 ∪ 𝑞 ∈ 𝑉 {〈〈(𝐹‘𝑝), (𝐹‘𝑞)〉, (𝑝(·𝑖‘𝑅)𝑞)〉}) |
20 | | eqidd 2779 |
. . . 4
⊢ (𝜑 → ((TopOpen‘𝑅) qTop 𝐹) = ((TopOpen‘𝑅) qTop 𝐹)) |
21 | | eqid 2778 |
. . . . 5
⊢
(dist‘𝑈) =
(dist‘𝑈) |
22 | 1, 2, 12, 13, 10, 21 | imasds 16559 |
. . . 4
⊢ (𝜑 → (dist‘𝑈) = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐵 ↦ inf(∪ 𝑛 ∈ ℕ ran (𝑔 ∈ {ℎ ∈ ((𝑉 × 𝑉) ↑𝑚 (1...𝑛)) ∣ ((𝐹‘(1st ‘(ℎ‘1))) = 𝑥 ∧ (𝐹‘(2nd ‘(ℎ‘𝑛))) = 𝑦 ∧ ∀𝑖 ∈ (1...(𝑛 − 1))(𝐹‘(2nd ‘(ℎ‘𝑖))) = (𝐹‘(1st ‘(ℎ‘(𝑖 + 1)))))} ↦
(ℝ*𝑠 Σg
((dist‘𝑅) ∘
𝑔))), ℝ*,
< ))) |
23 | | eqidd 2779 |
. . . 4
⊢ (𝜑 → ((𝐹 ∘ (le‘𝑅)) ∘ ◡𝐹) = ((𝐹 ∘ (le‘𝑅)) ∘ ◡𝐹)) |
24 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10,
11, 15, 17, 18, 19, 20, 22, 23, 12, 13 | imasval 16557 |
. . 3
⊢ (𝜑 → 𝑈 = (({〈(Base‘ndx), 𝐵〉,
〈(+g‘ndx), (+g‘𝑈)〉, 〈(.r‘ndx),
(.r‘𝑈)〉} ∪ {〈(Scalar‘ndx),
𝐺〉, 〈(
·𝑠 ‘ndx), ∪ 𝑞 ∈ 𝑉 (𝑝 ∈ (Base‘𝐺), 𝑥 ∈ {(𝐹‘𝑞)} ↦ (𝐹‘(𝑝( ·𝑠
‘𝑅)𝑞)))〉,
〈(·𝑖‘ndx), ∪ 𝑝 ∈ 𝑉 ∪ 𝑞 ∈ 𝑉 {〈〈(𝐹‘𝑝), (𝐹‘𝑞)〉, (𝑝(·𝑖‘𝑅)𝑞)〉}〉}) ∪
{〈(TopSet‘ndx), ((TopOpen‘𝑅) qTop 𝐹)〉, 〈(le‘ndx), ((𝐹 ∘ (le‘𝑅)) ∘ ◡𝐹)〉, 〈(dist‘ndx),
(dist‘𝑈)〉})) |
25 | 24 | fveq2d 6450 |
. 2
⊢ (𝜑 → (Scalar‘𝑈) =
(Scalar‘(({〈(Base‘ndx), 𝐵〉, 〈(+g‘ndx),
(+g‘𝑈)〉, 〈(.r‘ndx),
(.r‘𝑈)〉} ∪ {〈(Scalar‘ndx),
𝐺〉, 〈(
·𝑠 ‘ndx), ∪ 𝑞 ∈ 𝑉 (𝑝 ∈ (Base‘𝐺), 𝑥 ∈ {(𝐹‘𝑞)} ↦ (𝐹‘(𝑝( ·𝑠
‘𝑅)𝑞)))〉,
〈(·𝑖‘ndx), ∪ 𝑝 ∈ 𝑉 ∪ 𝑞 ∈ 𝑉 {〈〈(𝐹‘𝑝), (𝐹‘𝑞)〉, (𝑝(·𝑖‘𝑅)𝑞)〉}〉}) ∪
{〈(TopSet‘ndx), ((TopOpen‘𝑅) qTop 𝐹)〉, 〈(le‘ndx), ((𝐹 ∘ (le‘𝑅)) ∘ ◡𝐹)〉, 〈(dist‘ndx),
(dist‘𝑈)〉}))) |
26 | 5 | fvexi 6460 |
. . 3
⊢ 𝐺 ∈ V |
27 | | eqid 2778 |
. . . . 5
⊢
(({〈(Base‘ndx), 𝐵〉, 〈(+g‘ndx),
(+g‘𝑈)〉, 〈(.r‘ndx),
(.r‘𝑈)〉} ∪ {〈(Scalar‘ndx),
𝐺〉, 〈(
·𝑠 ‘ndx), ∪ 𝑞 ∈ 𝑉 (𝑝 ∈ (Base‘𝐺), 𝑥 ∈ {(𝐹‘𝑞)} ↦ (𝐹‘(𝑝( ·𝑠
‘𝑅)𝑞)))〉,
〈(·𝑖‘ndx), ∪ 𝑝 ∈ 𝑉 ∪ 𝑞 ∈ 𝑉 {〈〈(𝐹‘𝑝), (𝐹‘𝑞)〉, (𝑝(·𝑖‘𝑅)𝑞)〉}〉}) ∪
{〈(TopSet‘ndx), ((TopOpen‘𝑅) qTop 𝐹)〉, 〈(le‘ndx), ((𝐹 ∘ (le‘𝑅)) ∘ ◡𝐹)〉, 〈(dist‘ndx),
(dist‘𝑈)〉}) =
(({〈(Base‘ndx), 𝐵〉, 〈(+g‘ndx),
(+g‘𝑈)〉,
〈(.r‘ndx), (.r‘𝑈)〉} ∪ {〈(Scalar‘ndx), 𝐺〉, 〈(
·𝑠 ‘ndx), ∪ 𝑞
∈ 𝑉 (𝑝 ∈ (Base‘𝐺), 𝑥 ∈ {(𝐹‘𝑞)} ↦ (𝐹‘(𝑝( ·𝑠
‘𝑅)𝑞)))〉,
〈(·𝑖‘ndx), ∪ 𝑝
∈ 𝑉 ∪ 𝑞
∈ 𝑉 {〈〈(𝐹‘𝑝), (𝐹‘𝑞)〉, (𝑝(·𝑖‘𝑅)𝑞)〉}〉}) ∪
{〈(TopSet‘ndx), ((TopOpen‘𝑅) qTop 𝐹)〉, 〈(le‘ndx), ((𝐹 ∘ (le‘𝑅)) ∘ ◡𝐹)〉, 〈(dist‘ndx),
(dist‘𝑈)〉}) |
28 | 27 | imasvalstr 16498 |
. . . 4
⊢
(({〈(Base‘ndx), 𝐵〉, 〈(+g‘ndx),
(+g‘𝑈)〉, 〈(.r‘ndx),
(.r‘𝑈)〉} ∪ {〈(Scalar‘ndx),
𝐺〉, 〈(
·𝑠 ‘ndx), ∪ 𝑞 ∈ 𝑉 (𝑝 ∈ (Base‘𝐺), 𝑥 ∈ {(𝐹‘𝑞)} ↦ (𝐹‘(𝑝( ·𝑠
‘𝑅)𝑞)))〉,
〈(·𝑖‘ndx), ∪ 𝑝 ∈ 𝑉 ∪ 𝑞 ∈ 𝑉 {〈〈(𝐹‘𝑝), (𝐹‘𝑞)〉, (𝑝(·𝑖‘𝑅)𝑞)〉}〉}) ∪
{〈(TopSet‘ndx), ((TopOpen‘𝑅) qTop 𝐹)〉, 〈(le‘ndx), ((𝐹 ∘ (le‘𝑅)) ∘ ◡𝐹)〉, 〈(dist‘ndx),
(dist‘𝑈)〉}) Struct
〈1, ;12〉 |
29 | | scaid 16406 |
. . . 4
⊢ Scalar =
Slot (Scalar‘ndx) |
30 | | snsstp1 4578 |
. . . . . 6
⊢
{〈(Scalar‘ndx), 𝐺〉} ⊆ {〈(Scalar‘ndx),
𝐺〉, 〈(
·𝑠 ‘ndx), ∪ 𝑞 ∈ 𝑉 (𝑝 ∈ (Base‘𝐺), 𝑥 ∈ {(𝐹‘𝑞)} ↦ (𝐹‘(𝑝( ·𝑠
‘𝑅)𝑞)))〉,
〈(·𝑖‘ndx), ∪ 𝑝 ∈ 𝑉 ∪ 𝑞 ∈ 𝑉 {〈〈(𝐹‘𝑝), (𝐹‘𝑞)〉, (𝑝(·𝑖‘𝑅)𝑞)〉}〉} |
31 | | ssun2 4000 |
. . . . . 6
⊢
{〈(Scalar‘ndx), 𝐺〉, 〈(
·𝑠 ‘ndx), ∪ 𝑞 ∈ 𝑉 (𝑝 ∈ (Base‘𝐺), 𝑥 ∈ {(𝐹‘𝑞)} ↦ (𝐹‘(𝑝( ·𝑠
‘𝑅)𝑞)))〉,
〈(·𝑖‘ndx), ∪ 𝑝 ∈ 𝑉 ∪ 𝑞 ∈ 𝑉 {〈〈(𝐹‘𝑝), (𝐹‘𝑞)〉, (𝑝(·𝑖‘𝑅)𝑞)〉}〉} ⊆
({〈(Base‘ndx), 𝐵〉, 〈(+g‘ndx),
(+g‘𝑈)〉,
〈(.r‘ndx), (.r‘𝑈)〉} ∪ {〈(Scalar‘ndx), 𝐺〉, 〈(
·𝑠 ‘ndx), ∪ 𝑞
∈ 𝑉 (𝑝 ∈ (Base‘𝐺), 𝑥 ∈ {(𝐹‘𝑞)} ↦ (𝐹‘(𝑝( ·𝑠
‘𝑅)𝑞)))〉,
〈(·𝑖‘ndx), ∪ 𝑝
∈ 𝑉 ∪ 𝑞
∈ 𝑉 {〈〈(𝐹‘𝑝), (𝐹‘𝑞)〉, (𝑝(·𝑖‘𝑅)𝑞)〉}〉}) |
32 | 30, 31 | sstri 3830 |
. . . . 5
⊢
{〈(Scalar‘ndx), 𝐺〉} ⊆ ({〈(Base‘ndx),
𝐵〉,
〈(+g‘ndx), (+g‘𝑈)〉, 〈(.r‘ndx),
(.r‘𝑈)〉} ∪ {〈(Scalar‘ndx),
𝐺〉, 〈(
·𝑠 ‘ndx), ∪ 𝑞 ∈ 𝑉 (𝑝 ∈ (Base‘𝐺), 𝑥 ∈ {(𝐹‘𝑞)} ↦ (𝐹‘(𝑝( ·𝑠
‘𝑅)𝑞)))〉,
〈(·𝑖‘ndx), ∪ 𝑝 ∈ 𝑉 ∪ 𝑞 ∈ 𝑉 {〈〈(𝐹‘𝑝), (𝐹‘𝑞)〉, (𝑝(·𝑖‘𝑅)𝑞)〉}〉}) |
33 | | ssun1 3999 |
. . . . 5
⊢
({〈(Base‘ndx), 𝐵〉, 〈(+g‘ndx),
(+g‘𝑈)〉, 〈(.r‘ndx),
(.r‘𝑈)〉} ∪ {〈(Scalar‘ndx),
𝐺〉, 〈(
·𝑠 ‘ndx), ∪ 𝑞 ∈ 𝑉 (𝑝 ∈ (Base‘𝐺), 𝑥 ∈ {(𝐹‘𝑞)} ↦ (𝐹‘(𝑝( ·𝑠
‘𝑅)𝑞)))〉,
〈(·𝑖‘ndx), ∪ 𝑝 ∈ 𝑉 ∪ 𝑞 ∈ 𝑉 {〈〈(𝐹‘𝑝), (𝐹‘𝑞)〉, (𝑝(·𝑖‘𝑅)𝑞)〉}〉}) ⊆
(({〈(Base‘ndx), 𝐵〉, 〈(+g‘ndx),
(+g‘𝑈)〉,
〈(.r‘ndx), (.r‘𝑈)〉} ∪ {〈(Scalar‘ndx), 𝐺〉, 〈(
·𝑠 ‘ndx), ∪ 𝑞
∈ 𝑉 (𝑝 ∈ (Base‘𝐺), 𝑥 ∈ {(𝐹‘𝑞)} ↦ (𝐹‘(𝑝( ·𝑠
‘𝑅)𝑞)))〉,
〈(·𝑖‘ndx), ∪ 𝑝
∈ 𝑉 ∪ 𝑞
∈ 𝑉 {〈〈(𝐹‘𝑝), (𝐹‘𝑞)〉, (𝑝(·𝑖‘𝑅)𝑞)〉}〉}) ∪
{〈(TopSet‘ndx), ((TopOpen‘𝑅) qTop 𝐹)〉, 〈(le‘ndx), ((𝐹 ∘ (le‘𝑅)) ∘ ◡𝐹)〉, 〈(dist‘ndx),
(dist‘𝑈)〉}) |
34 | 32, 33 | sstri 3830 |
. . . 4
⊢
{〈(Scalar‘ndx), 𝐺〉} ⊆ (({〈(Base‘ndx),
𝐵〉,
〈(+g‘ndx), (+g‘𝑈)〉, 〈(.r‘ndx),
(.r‘𝑈)〉} ∪ {〈(Scalar‘ndx),
𝐺〉, 〈(
·𝑠 ‘ndx), ∪ 𝑞 ∈ 𝑉 (𝑝 ∈ (Base‘𝐺), 𝑥 ∈ {(𝐹‘𝑞)} ↦ (𝐹‘(𝑝( ·𝑠
‘𝑅)𝑞)))〉,
〈(·𝑖‘ndx), ∪ 𝑝 ∈ 𝑉 ∪ 𝑞 ∈ 𝑉 {〈〈(𝐹‘𝑝), (𝐹‘𝑞)〉, (𝑝(·𝑖‘𝑅)𝑞)〉}〉}) ∪
{〈(TopSet‘ndx), ((TopOpen‘𝑅) qTop 𝐹)〉, 〈(le‘ndx), ((𝐹 ∘ (le‘𝑅)) ∘ ◡𝐹)〉, 〈(dist‘ndx),
(dist‘𝑈)〉}) |
35 | 28, 29, 34 | strfv 16303 |
. . 3
⊢ (𝐺 ∈ V → 𝐺 =
(Scalar‘(({〈(Base‘ndx), 𝐵〉, 〈(+g‘ndx),
(+g‘𝑈)〉, 〈(.r‘ndx),
(.r‘𝑈)〉} ∪ {〈(Scalar‘ndx),
𝐺〉, 〈(
·𝑠 ‘ndx), ∪ 𝑞 ∈ 𝑉 (𝑝 ∈ (Base‘𝐺), 𝑥 ∈ {(𝐹‘𝑞)} ↦ (𝐹‘(𝑝( ·𝑠
‘𝑅)𝑞)))〉,
〈(·𝑖‘ndx), ∪ 𝑝 ∈ 𝑉 ∪ 𝑞 ∈ 𝑉 {〈〈(𝐹‘𝑝), (𝐹‘𝑞)〉, (𝑝(·𝑖‘𝑅)𝑞)〉}〉}) ∪
{〈(TopSet‘ndx), ((TopOpen‘𝑅) qTop 𝐹)〉, 〈(le‘ndx), ((𝐹 ∘ (le‘𝑅)) ∘ ◡𝐹)〉, 〈(dist‘ndx),
(dist‘𝑈)〉}))) |
36 | 26, 35 | ax-mp 5 |
. 2
⊢ 𝐺 =
(Scalar‘(({〈(Base‘ndx), 𝐵〉, 〈(+g‘ndx),
(+g‘𝑈)〉, 〈(.r‘ndx),
(.r‘𝑈)〉} ∪ {〈(Scalar‘ndx),
𝐺〉, 〈(
·𝑠 ‘ndx), ∪ 𝑞 ∈ 𝑉 (𝑝 ∈ (Base‘𝐺), 𝑥 ∈ {(𝐹‘𝑞)} ↦ (𝐹‘(𝑝( ·𝑠
‘𝑅)𝑞)))〉,
〈(·𝑖‘ndx), ∪ 𝑝 ∈ 𝑉 ∪ 𝑞 ∈ 𝑉 {〈〈(𝐹‘𝑝), (𝐹‘𝑞)〉, (𝑝(·𝑖‘𝑅)𝑞)〉}〉}) ∪
{〈(TopSet‘ndx), ((TopOpen‘𝑅) qTop 𝐹)〉, 〈(le‘ndx), ((𝐹 ∘ (le‘𝑅)) ∘ ◡𝐹)〉, 〈(dist‘ndx),
(dist‘𝑈)〉})) |
37 | 25, 36 | syl6reqr 2833 |
1
⊢ (𝜑 → 𝐺 = (Scalar‘𝑈)) |