ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  imasbas GIF version

Theorem imasbas 12733
Description: The base set of an image structure. (Contributed by Mario Carneiro, 23-Feb-2015.) (Revised by Mario Carneiro, 11-Jul-2015.) (Revised by Thierry Arnoux, 16-Jun-2019.) (Revised by AV, 6-Oct-2020.)
Hypotheses
Ref Expression
imasbas.u (πœ‘ β†’ π‘ˆ = (𝐹 β€œs 𝑅))
imasbas.v (πœ‘ β†’ 𝑉 = (Baseβ€˜π‘…))
imasbas.f (πœ‘ β†’ 𝐹:𝑉–onto→𝐡)
imasbas.r (πœ‘ β†’ 𝑅 ∈ 𝑍)
Assertion
Ref Expression
imasbas (πœ‘ β†’ 𝐡 = (Baseβ€˜π‘ˆ))

Proof of Theorem imasbas
Dummy variables 𝑝 π‘ž are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 imasbas.u . . . 4 (πœ‘ β†’ π‘ˆ = (𝐹 β€œs 𝑅))
2 imasbas.v . . . 4 (πœ‘ β†’ 𝑉 = (Baseβ€˜π‘…))
3 eqid 2177 . . . 4 (+gβ€˜π‘…) = (+gβ€˜π‘…)
4 eqid 2177 . . . 4 (.rβ€˜π‘…) = (.rβ€˜π‘…)
5 eqid 2177 . . . 4 ( ·𝑠 β€˜π‘…) = ( ·𝑠 β€˜π‘…)
6 eqidd 2178 . . . 4 (πœ‘ β†’ βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩} = βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩})
7 eqidd 2178 . . . 4 (πœ‘ β†’ βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩} = βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩})
8 imasbas.f . . . 4 (πœ‘ β†’ 𝐹:𝑉–onto→𝐡)
9 imasbas.r . . . 4 (πœ‘ β†’ 𝑅 ∈ 𝑍)
101, 2, 3, 4, 5, 6, 7, 8, 9imasival 12732 . . 3 (πœ‘ β†’ π‘ˆ = {⟨(Baseβ€˜ndx), 𝐡⟩, ⟨(+gβ€˜ndx), βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩}⟩, ⟨(.rβ€˜ndx), βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩}⟩})
1110fveq1d 5519 . 2 (πœ‘ β†’ (π‘ˆβ€˜(Baseβ€˜ndx)) = ({⟨(Baseβ€˜ndx), 𝐡⟩, ⟨(+gβ€˜ndx), βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩}⟩, ⟨(.rβ€˜ndx), βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩}⟩}β€˜(Baseβ€˜ndx)))
12 basendxnn 12520 . . . . . 6 (Baseβ€˜ndx) ∈ β„•
13 basfn 12522 . . . . . . . . 9 Base Fn V
149elexd 2752 . . . . . . . . 9 (πœ‘ β†’ 𝑅 ∈ V)
15 funfvex 5534 . . . . . . . . . 10 ((Fun Base ∧ 𝑅 ∈ dom Base) β†’ (Baseβ€˜π‘…) ∈ V)
1615funfni 5318 . . . . . . . . 9 ((Base Fn V ∧ 𝑅 ∈ V) β†’ (Baseβ€˜π‘…) ∈ V)
1713, 14, 16sylancr 414 . . . . . . . 8 (πœ‘ β†’ (Baseβ€˜π‘…) ∈ V)
182, 17eqeltrd 2254 . . . . . . 7 (πœ‘ β†’ 𝑉 ∈ V)
19 focdmex 6118 . . . . . . 7 (𝑉 ∈ V β†’ (𝐹:𝑉–onto→𝐡 β†’ 𝐡 ∈ V))
2018, 8, 19sylc 62 . . . . . 6 (πœ‘ β†’ 𝐡 ∈ V)
21 opexg 4230 . . . . . 6 (((Baseβ€˜ndx) ∈ β„• ∧ 𝐡 ∈ V) β†’ ⟨(Baseβ€˜ndx), 𝐡⟩ ∈ V)
2212, 20, 21sylancr 414 . . . . 5 (πœ‘ β†’ ⟨(Baseβ€˜ndx), 𝐡⟩ ∈ V)
23 plusgndxnn 12572 . . . . . 6 (+gβ€˜ndx) ∈ β„•
24 fof 5440 . . . . . . . . . . . . . . . 16 (𝐹:𝑉–onto→𝐡 β†’ 𝐹:π‘‰βŸΆπ΅)
258, 24syl 14 . . . . . . . . . . . . . . 15 (πœ‘ β†’ 𝐹:π‘‰βŸΆπ΅)
2625, 18fexd 5748 . . . . . . . . . . . . . 14 (πœ‘ β†’ 𝐹 ∈ V)
27 vex 2742 . . . . . . . . . . . . . 14 𝑝 ∈ V
28 fvexg 5536 . . . . . . . . . . . . . 14 ((𝐹 ∈ V ∧ 𝑝 ∈ V) β†’ (πΉβ€˜π‘) ∈ V)
2926, 27, 28sylancl 413 . . . . . . . . . . . . 13 (πœ‘ β†’ (πΉβ€˜π‘) ∈ V)
30 vex 2742 . . . . . . . . . . . . . 14 π‘ž ∈ V
31 fvexg 5536 . . . . . . . . . . . . . 14 ((𝐹 ∈ V ∧ π‘ž ∈ V) β†’ (πΉβ€˜π‘ž) ∈ V)
3226, 30, 31sylancl 413 . . . . . . . . . . . . 13 (πœ‘ β†’ (πΉβ€˜π‘ž) ∈ V)
33 opexg 4230 . . . . . . . . . . . . 13 (((πΉβ€˜π‘) ∈ V ∧ (πΉβ€˜π‘ž) ∈ V) β†’ ⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩ ∈ V)
3429, 32, 33syl2anc 411 . . . . . . . . . . . 12 (πœ‘ β†’ ⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩ ∈ V)
3527a1i 9 . . . . . . . . . . . . . 14 (πœ‘ β†’ 𝑝 ∈ V)
36 plusgslid 12573 . . . . . . . . . . . . . . . 16 (+g = Slot (+gβ€˜ndx) ∧ (+gβ€˜ndx) ∈ β„•)
3736slotex 12491 . . . . . . . . . . . . . . 15 (𝑅 ∈ 𝑍 β†’ (+gβ€˜π‘…) ∈ V)
389, 37syl 14 . . . . . . . . . . . . . 14 (πœ‘ β†’ (+gβ€˜π‘…) ∈ V)
3930a1i 9 . . . . . . . . . . . . . 14 (πœ‘ β†’ π‘ž ∈ V)
40 ovexg 5911 . . . . . . . . . . . . . 14 ((𝑝 ∈ V ∧ (+gβ€˜π‘…) ∈ V ∧ π‘ž ∈ V) β†’ (𝑝(+gβ€˜π‘…)π‘ž) ∈ V)
4135, 38, 39, 40syl3anc 1238 . . . . . . . . . . . . 13 (πœ‘ β†’ (𝑝(+gβ€˜π‘…)π‘ž) ∈ V)
42 fvexg 5536 . . . . . . . . . . . . 13 ((𝐹 ∈ V ∧ (𝑝(+gβ€˜π‘…)π‘ž) ∈ V) β†’ (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž)) ∈ V)
4326, 41, 42syl2anc 411 . . . . . . . . . . . 12 (πœ‘ β†’ (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž)) ∈ V)
44 opexg 4230 . . . . . . . . . . . 12 ((⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩ ∈ V ∧ (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž)) ∈ V) β†’ ⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩ ∈ V)
4534, 43, 44syl2anc 411 . . . . . . . . . . 11 (πœ‘ β†’ ⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩ ∈ V)
46 snexg 4186 . . . . . . . . . . 11 (⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩ ∈ V β†’ {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩} ∈ V)
4745, 46syl 14 . . . . . . . . . 10 (πœ‘ β†’ {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩} ∈ V)
4847ralrimivw 2551 . . . . . . . . 9 (πœ‘ β†’ βˆ€π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩} ∈ V)
49 iunexg 6122 . . . . . . . . 9 ((𝑉 ∈ V ∧ βˆ€π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩} ∈ V) β†’ βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩} ∈ V)
5018, 48, 49syl2anc 411 . . . . . . . 8 (πœ‘ β†’ βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩} ∈ V)
5150ralrimivw 2551 . . . . . . 7 (πœ‘ β†’ βˆ€π‘ ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩} ∈ V)
52 iunexg 6122 . . . . . . 7 ((𝑉 ∈ V ∧ βˆ€π‘ ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩} ∈ V) β†’ βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩} ∈ V)
5318, 51, 52syl2anc 411 . . . . . 6 (πœ‘ β†’ βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩} ∈ V)
54 opexg 4230 . . . . . 6 (((+gβ€˜ndx) ∈ β„• ∧ βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩} ∈ V) β†’ ⟨(+gβ€˜ndx), βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩}⟩ ∈ V)
5523, 53, 54sylancr 414 . . . . 5 (πœ‘ β†’ ⟨(+gβ€˜ndx), βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩}⟩ ∈ V)
56 mulrslid 12592 . . . . . . 7 (.r = Slot (.rβ€˜ndx) ∧ (.rβ€˜ndx) ∈ β„•)
5756simpri 113 . . . . . 6 (.rβ€˜ndx) ∈ β„•
5856slotex 12491 . . . . . . . . . . . . . . 15 (𝑅 ∈ 𝑍 β†’ (.rβ€˜π‘…) ∈ V)
599, 58syl 14 . . . . . . . . . . . . . 14 (πœ‘ β†’ (.rβ€˜π‘…) ∈ V)
60 ovexg 5911 . . . . . . . . . . . . . 14 ((𝑝 ∈ V ∧ (.rβ€˜π‘…) ∈ V ∧ π‘ž ∈ V) β†’ (𝑝(.rβ€˜π‘…)π‘ž) ∈ V)
6135, 59, 39, 60syl3anc 1238 . . . . . . . . . . . . 13 (πœ‘ β†’ (𝑝(.rβ€˜π‘…)π‘ž) ∈ V)
62 fvexg 5536 . . . . . . . . . . . . 13 ((𝐹 ∈ V ∧ (𝑝(.rβ€˜π‘…)π‘ž) ∈ V) β†’ (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž)) ∈ V)
6326, 61, 62syl2anc 411 . . . . . . . . . . . 12 (πœ‘ β†’ (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž)) ∈ V)
64 opexg 4230 . . . . . . . . . . . 12 ((⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩ ∈ V ∧ (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž)) ∈ V) β†’ ⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩ ∈ V)
6534, 63, 64syl2anc 411 . . . . . . . . . . 11 (πœ‘ β†’ ⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩ ∈ V)
66 snexg 4186 . . . . . . . . . . 11 (⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩ ∈ V β†’ {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩} ∈ V)
6765, 66syl 14 . . . . . . . . . 10 (πœ‘ β†’ {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩} ∈ V)
6867ralrimivw 2551 . . . . . . . . 9 (πœ‘ β†’ βˆ€π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩} ∈ V)
69 iunexg 6122 . . . . . . . . 9 ((𝑉 ∈ V ∧ βˆ€π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩} ∈ V) β†’ βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩} ∈ V)
7018, 68, 69syl2anc 411 . . . . . . . 8 (πœ‘ β†’ βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩} ∈ V)
7170ralrimivw 2551 . . . . . . 7 (πœ‘ β†’ βˆ€π‘ ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩} ∈ V)
72 iunexg 6122 . . . . . . 7 ((𝑉 ∈ V ∧ βˆ€π‘ ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩} ∈ V) β†’ βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩} ∈ V)
7318, 71, 72syl2anc 411 . . . . . 6 (πœ‘ β†’ βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩} ∈ V)
74 opexg 4230 . . . . . 6 (((.rβ€˜ndx) ∈ β„• ∧ βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩} ∈ V) β†’ ⟨(.rβ€˜ndx), βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩}⟩ ∈ V)
7557, 73, 74sylancr 414 . . . . 5 (πœ‘ β†’ ⟨(.rβ€˜ndx), βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩}⟩ ∈ V)
76 tpexg 4446 . . . . 5 ((⟨(Baseβ€˜ndx), 𝐡⟩ ∈ V ∧ ⟨(+gβ€˜ndx), βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩}⟩ ∈ V ∧ ⟨(.rβ€˜ndx), βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩}⟩ ∈ V) β†’ {⟨(Baseβ€˜ndx), 𝐡⟩, ⟨(+gβ€˜ndx), βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩}⟩, ⟨(.rβ€˜ndx), βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩}⟩} ∈ V)
7722, 55, 75, 76syl3anc 1238 . . . 4 (πœ‘ β†’ {⟨(Baseβ€˜ndx), 𝐡⟩, ⟨(+gβ€˜ndx), βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩}⟩, ⟨(.rβ€˜ndx), βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩}⟩} ∈ V)
7810, 77eqeltrd 2254 . . 3 (πœ‘ β†’ π‘ˆ ∈ V)
79 baseid 12518 . . 3 Base = Slot (Baseβ€˜ndx)
8078, 79, 12strndxid 12492 . 2 (πœ‘ β†’ (π‘ˆβ€˜(Baseβ€˜ndx)) = (Baseβ€˜π‘ˆ))
8112a1i 9 . . 3 (πœ‘ β†’ (Baseβ€˜ndx) ∈ β„•)
82 basendxnplusgndx 12585 . . . 4 (Baseβ€˜ndx) β‰  (+gβ€˜ndx)
8382a1i 9 . . 3 (πœ‘ β†’ (Baseβ€˜ndx) β‰  (+gβ€˜ndx))
84 basendxnmulrndx 12594 . . . 4 (Baseβ€˜ndx) β‰  (.rβ€˜ndx)
8584a1i 9 . . 3 (πœ‘ β†’ (Baseβ€˜ndx) β‰  (.rβ€˜ndx))
86 fvtp1g 5726 . . 3 ((((Baseβ€˜ndx) ∈ β„• ∧ 𝐡 ∈ V) ∧ ((Baseβ€˜ndx) β‰  (+gβ€˜ndx) ∧ (Baseβ€˜ndx) β‰  (.rβ€˜ndx))) β†’ ({⟨(Baseβ€˜ndx), 𝐡⟩, ⟨(+gβ€˜ndx), βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩}⟩, ⟨(.rβ€˜ndx), βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩}⟩}β€˜(Baseβ€˜ndx)) = 𝐡)
8781, 20, 83, 85, 86syl22anc 1239 . 2 (πœ‘ β†’ ({⟨(Baseβ€˜ndx), 𝐡⟩, ⟨(+gβ€˜ndx), βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(+gβ€˜π‘…)π‘ž))⟩}⟩, ⟨(.rβ€˜ndx), βˆͺ 𝑝 ∈ 𝑉 βˆͺ π‘ž ∈ 𝑉 {⟨⟨(πΉβ€˜π‘), (πΉβ€˜π‘ž)⟩, (πΉβ€˜(𝑝(.rβ€˜π‘…)π‘ž))⟩}⟩}β€˜(Baseβ€˜ndx)) = 𝐡)
8811, 80, 873eqtr3rd 2219 1 (πœ‘ β†’ 𝐡 = (Baseβ€˜π‘ˆ))
Colors of variables: wff set class
Syntax hints:   β†’ wi 4   = wceq 1353   ∈ wcel 2148   β‰  wne 2347  βˆ€wral 2455  Vcvv 2739  {csn 3594  {ctp 3596  βŸ¨cop 3597  βˆͺ ciun 3888   Fn wfn 5213  βŸΆwf 5214  β€“ontoβ†’wfo 5216  β€˜cfv 5218  (class class class)co 5877  β„•cn 8921  ndxcnx 12461  Slot cslot 12463  Basecbs 12464  +gcplusg 12538  .rcmulr 12539   ·𝑠 cvsca 12542   β€œs cimas 12725
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 614  ax-in2 615  ax-io 709  ax-5 1447  ax-7 1448  ax-gen 1449  ax-ie1 1493  ax-ie2 1494  ax-8 1504  ax-10 1505  ax-11 1506  ax-i12 1507  ax-bndl 1509  ax-4 1510  ax-17 1526  ax-i9 1530  ax-ial 1534  ax-i5r 1535  ax-13 2150  ax-14 2151  ax-ext 2159  ax-coll 4120  ax-sep 4123  ax-pow 4176  ax-pr 4211  ax-un 4435  ax-setind 4538  ax-cnex 7904  ax-resscn 7905  ax-1cn 7906  ax-1re 7907  ax-icn 7908  ax-addcl 7909  ax-addrcl 7910  ax-mulcl 7911  ax-addcom 7913  ax-addass 7915  ax-i2m1 7918  ax-0lt1 7919  ax-0id 7921  ax-rnegex 7922  ax-pre-ltirr 7925  ax-pre-lttrn 7927  ax-pre-ltadd 7929
This theorem depends on definitions:  df-bi 117  df-3an 980  df-tru 1356  df-fal 1359  df-nf 1461  df-sb 1763  df-eu 2029  df-mo 2030  df-clab 2164  df-cleq 2170  df-clel 2173  df-nfc 2308  df-ne 2348  df-nel 2443  df-ral 2460  df-rex 2461  df-reu 2462  df-rab 2464  df-v 2741  df-sbc 2965  df-csb 3060  df-dif 3133  df-un 3135  df-in 3137  df-ss 3144  df-nul 3425  df-pw 3579  df-sn 3600  df-pr 3601  df-tp 3602  df-op 3603  df-uni 3812  df-int 3847  df-iun 3890  df-br 4006  df-opab 4067  df-mpt 4068  df-id 4295  df-xp 4634  df-rel 4635  df-cnv 4636  df-co 4637  df-dm 4638  df-rn 4639  df-res 4640  df-ima 4641  df-iota 5180  df-fun 5220  df-fn 5221  df-f 5222  df-f1 5223  df-fo 5224  df-f1o 5225  df-fv 5226  df-ov 5880  df-oprab 5881  df-mpo 5882  df-pnf 7996  df-mnf 7997  df-ltxr 7999  df-inn 8922  df-2 8980  df-3 8981  df-ndx 12467  df-slot 12468  df-base 12470  df-plusg 12551  df-mulr 12552  df-iimas 12728
This theorem is referenced by:  qusbas  12752
  Copyright terms: Public domain W3C validator