Theorem xpssca 17684

Description: Value of the scalar field of a binary structure product. For concreteness, we choose the scalar field to match the left argument, but in most cases where this slot is meaningful both factors will have the same scalar field, so that it doesn't matter which factor is chosen. (Contributed by Mario Carneiro, 15-Aug-2015.)

Hypotheses

Ref	Expression
xpssca.t	⊢ 𝑇 = (𝑅 ×s 𝑆)
xpssca.g	⊢ 𝐺 = (Scalar‘𝑅)
xpssca.1	⊢ (𝜑 → 𝑅 ∈ 𝑉)
xpssca.2	⊢ (𝜑 → 𝑆 ∈ 𝑊)

Assertion

Ref	Expression
xpssca	⊢ (𝜑 → 𝐺 = (Scalar‘𝑇))

Proof of Theorem xpssca

Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		eqid 2760	. . 3 ⊢ (𝐺Xs{⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩}) = (𝐺Xs{⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩})
2		xpssca.g	. . . . 5 ⊢ 𝐺 = (Scalar‘𝑅)
3	2	fvexi 6894	. . . 4 ⊢ 𝐺 ∈ V
4	3	a1i 11	. . 3 ⊢ (𝜑 → 𝐺 ∈ V)
5		prex 5403	. . . 4 ⊢ {⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩} ∈ V
6	5	a1i 11	. . 3 ⊢ (𝜑 → {⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩} ∈ V)
7	1, 4, 6	prdssca 17563	. 2 ⊢ (𝜑 → 𝐺 = (Scalar‘(𝐺Xs{⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩})))
8		xpssca.t	. . . 4 ⊢ 𝑇 = (𝑅 ×s 𝑆)
9		eqid 2760	. . . 4 ⊢ (Base‘𝑅) = (Base‘𝑅)
10		eqid 2760	. . . 4 ⊢ (Base‘𝑆) = (Base‘𝑆)
11		xpssca.1	. . . 4 ⊢ (𝜑 → 𝑅 ∈ 𝑉)
12		xpssca.2	. . . 4 ⊢ (𝜑 → 𝑆 ∈ 𝑊)
13		eqid 2760	. . . 4 ⊢ (𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩}) = (𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩})
14	8, 9, 10, 11, 12, 13, 2, 1	xpsval 17678	. . 3 ⊢ (𝜑 → 𝑇 = (◡(𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩}) “s (𝐺Xs{⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩})))
15	8, 9, 10, 11, 12, 13, 2, 1	xpsrnbas 17679	. . 3 ⊢ (𝜑 → ran (𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩}) = (Base‘(𝐺Xs{⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩})))
16	13	xpsff1o2 17677	. . . . 5 ⊢ (𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩}):((Base‘𝑅) × (Base‘𝑆))–1-1-onto→ran (𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩})
17		f1ocnv 6832	. . . . 5 ⊢ ((𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩}):((Base‘𝑅) × (Base‘𝑆))–1-1-onto→ran (𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩}) → ◡(𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩}):ran (𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩})–1-1-onto→((Base‘𝑅) × (Base‘𝑆)))
18	16, 17	mp1i 14	. . . 4 ⊢ (𝜑 → ◡(𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩}):ran (𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩})–1-1-onto→((Base‘𝑅) × (Base‘𝑆)))
19		f1ofo 6827	. . . 4 ⊢ (◡(𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩}):ran (𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩})–1-1-onto→((Base‘𝑅) × (Base‘𝑆)) → ◡(𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩}):ran (𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩})–onto→((Base‘𝑅) × (Base‘𝑆)))
20	18, 19	syl 18	. . 3 ⊢ (𝜑 → ◡(𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩}):ran (𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩})–onto→((Base‘𝑅) × (Base‘𝑆)))
21		ovexd 7450	. . 3 ⊢ (𝜑 → (𝐺Xs{⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩}) ∈ V)
22		eqid 2760	. . 3 ⊢ (Scalar‘(𝐺Xs{⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩})) = (Scalar‘(𝐺Xs{⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩}))
23	14, 15, 20, 21, 22	imassca 17627	. 2 ⊢ (𝜑 → (Scalar‘(𝐺Xs{⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩})) = (Scalar‘𝑇))
24	7, 23	eqtrd 2795	1 ⊢ (𝜑 → 𝐺 = (Scalar‘𝑇))

This proof depends on syntax axioms:   → wi 4   = wceq 1570   ∈ wcel 2145  Vcvv 3450  ∅c0 4279  {cpr 4586  ⟨cop 4590   × cxp 5653  ^◡ccnv 5654  ran crn 5656  –onto→wfo 6532  –1-1-onto→wf1o 6533  ‘cfv 6534  (class class class)co 7415   ∈ cmpo 7417  1_oc1o 8452  Basecbs 17323  Scalarcsca 17367  X_scprds 17552   ×_s cxps 17614

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5232  ax-sep 5251  ax-nul 5263  ax-pow 5330  ax-pr 5398  ax-un 7738  ax-cnex 11202  ax-resscn 11203  ax-1cn 11204  ax-icn 11205  ax-addcl 11206  ax-addrcl 11207  ax-mulcl 11208  ax-mulrcl 11209  ax-mulcom 11210  ax-addass 11211  ax-mulass 11212  ax-distr 11213  ax-i2m1 11214  ax-1ne0 11215  ax-1rid 11216  ax-rnegex 11217  ax-rrecex 11218  ax-cnre 11219  ax-pre-lttri 11220  ax-pre-lttrn 11221  ax-pre-ltadd 11222  ax-pre-mulgt0 11223

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-uni 4868  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-pred 6300  df-ord 6361  df-on 6362  df-lim 6363  df-suc 6364  df-iota 6490  df-fun 6536  df-fn 6537  df-f 6538  df-f1 6539  df-fo 6540  df-f1o 6541  df-fv 6542  df-riota 7372  df-ov 7418  df-oprab 7419  df-mpo 7420  df-om 7865  df-1st 7988  df-2nd 7989  df-frecs 8282  df-wrecs 8313  df-recs 8362  df-rdg 8401  df-1o 8459  df-2o 8460  df-er 8700  df-map 8832  df-ixp 8909  df-en 8957  df-dom 8958  df-sdom 8959  df-fin 8960  df-sup 9416  df-inf 9417  df-pnf 11291  df-mnf 11292  df-xr 11293  df-ltxr 11294  df-le 11295  df-sub 11489  df-neg 11490  df-nn 12280  df-2 12349  df-3 12350  df-4 12351  df-5 12352  df-6 12353  df-7 12354  df-8 12355  df-9 12356  df-n0 12551  df-z 12638  df-dec 12759  df-uz 12910  df-fz 13584  df-struct 17261  df-slot 17296  df-ndx 17308  df-base 17324  df-plusg 17377  df-mulr 17378  df-sca 17380  df-vsca 17381  df-ip 17382  df-tset 17383  df-ple 17384  df-ds 17386  df-hom 17388  df-cco 17389  df-prds 17554  df-imas 17616  df-xps 17618

This theorem is used by: (None)