Theorem xpssca 16965

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 2739	. . 3 ⊢ (𝐺Xs{⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩}) = (𝐺Xs{⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩})
2		xpssca.g	. . . . 5 ⊢ 𝐺 = (Scalar‘𝑅)
3	2	fvexi 6701	. . . 4 ⊢ 𝐺 ∈ V
4	3	a1i 11	. . 3 ⊢ (𝜑 → 𝐺 ∈ V)
5		prex 5309	. . . 4 ⊢ {⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩} ∈ V
6	5	a1i 11	. . 3 ⊢ (𝜑 → {⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩} ∈ V)
7	1, 4, 6	prdssca 16845	. 2 ⊢ (𝜑 → 𝐺 = (Scalar‘(𝐺Xs{⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩})))
8		xpssca.t	. . . 4 ⊢ 𝑇 = (𝑅 ×s 𝑆)
9		eqid 2739	. . . 4 ⊢ (Base‘𝑅) = (Base‘𝑅)
10		eqid 2739	. . . 4 ⊢ (Base‘𝑆) = (Base‘𝑆)
11		xpssca.1	. . . 4 ⊢ (𝜑 → 𝑅 ∈ 𝑉)
12		xpssca.2	. . . 4 ⊢ (𝜑 → 𝑆 ∈ 𝑊)
13		eqid 2739	. . . 4 ⊢ (𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩}) = (𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩})
14	8, 9, 10, 11, 12, 13, 2, 1	xpsval 16959	. . 3 ⊢ (𝜑 → 𝑇 = (◡(𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩}) “s (𝐺Xs{⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩})))
15	8, 9, 10, 11, 12, 13, 2, 1	xpsrnbas 16960	. . 3 ⊢ (𝜑 → ran (𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩}) = (Base‘(𝐺Xs{⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩})))
16	13	xpsff1o2 16958	. . . . 5 ⊢ (𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩}):((Base‘𝑅) × (Base‘𝑆))–1-1-onto→ran (𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩})
17		f1ocnv 6643	. . . . 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 13	. . . 4 ⊢ (𝜑 → ◡(𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩}):ran (𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩})–1-1-onto→((Base‘𝑅) × (Base‘𝑆)))
19		f1ofo 6638	. . . 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 17	. . 3 ⊢ (𝜑 → ◡(𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩}):ran (𝑥 ∈ (Base‘𝑅), 𝑦 ∈ (Base‘𝑆) ↦ {⟨∅, 𝑥⟩, ⟨1o, 𝑦⟩})–onto→((Base‘𝑅) × (Base‘𝑆)))
21		ovexd 7218	. . 3 ⊢ (𝜑 → (𝐺Xs{⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩}) ∈ V)
22		eqid 2739	. . 3 ⊢ (Scalar‘(𝐺Xs{⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩})) = (Scalar‘(𝐺Xs{⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩}))
23	14, 15, 20, 21, 22	imassca 16908	. 2 ⊢ (𝜑 → (Scalar‘(𝐺Xs{⟨∅, 𝑅⟩, ⟨1o, 𝑆⟩})) = (Scalar‘𝑇))
24	7, 23	eqtrd 2774	1 ⊢ (𝜑 → 𝐺 = (Scalar‘𝑇))

Syntax hints:   → wi 4   = wceq 1542   ∈ wcel 2114  Vcvv 3400  ∅c0 4221  {cpr 4528  ⟨cop 4532   × cxp 5533  ^◡ccnv 5534  ran crn 5536  –onto→wfo 6348  –1-1-onto→wf1o 6349  ‘cfv 6350  (class class class)co 7183   ∈ cmpo 7185  1_oc1o 8137  Basecbs 16599  Scalarcsca 16684  X_scprds 16835   ×_s cxps 16895

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1975  ax-7 2020  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2162  ax-12 2179  ax-ext 2711  ax-rep 5164  ax-sep 5177  ax-nul 5184  ax-pow 5242  ax-pr 5306  ax-un 7492  ax-cnex 10684  ax-resscn 10685  ax-1cn 10686  ax-icn 10687  ax-addcl 10688  ax-addrcl 10689  ax-mulcl 10690  ax-mulrcl 10691  ax-mulcom 10692  ax-addass 10693  ax-mulass 10694  ax-distr 10695  ax-i2m1 10696  ax-1ne0 10697  ax-1rid 10698  ax-rnegex 10699  ax-rrecex 10700  ax-cnre 10701  ax-pre-lttri 10702  ax-pre-lttrn 10703  ax-pre-ltadd 10704  ax-pre-mulgt0 10705

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1787  df-nf 1791  df-sb 2075  df-mo 2541  df-eu 2571  df-clab 2718  df-cleq 2731  df-clel 2812  df-nfc 2882  df-ne 2936  df-nel 3040  df-ral 3059  df-rex 3060  df-reu 3061  df-rab 3063  df-v 3402  df-sbc 3686  df-csb 3801  df-dif 3856  df-un 3858  df-in 3860  df-ss 3870  df-pss 3872  df-nul 4222  df-if 4425  df-pw 4500  df-sn 4527  df-pr 4529  df-tp 4531  df-op 4533  df-uni 4807  df-iun 4893  df-br 5041  df-opab 5103  df-mpt 5121  df-tr 5147  df-id 5439  df-eprel 5444  df-po 5452  df-so 5453  df-fr 5493  df-we 5495  df-xp 5541  df-rel 5542  df-cnv 5543  df-co 5544  df-dm 5545  df-rn 5546  df-res 5547  df-ima 5548  df-pred 6139  df-ord 6186  df-on 6187  df-lim 6188  df-suc 6189  df-iota 6308  df-fun 6352  df-fn 6353  df-f 6354  df-f1 6355  df-fo 6356  df-f1o 6357  df-fv 6358  df-riota 7140  df-ov 7186  df-oprab 7187  df-mpo 7188  df-om 7613  df-1st 7727  df-2nd 7728  df-wrecs 7989  df-recs 8050  df-rdg 8088  df-1o 8144  df-2o 8145  df-er 8333  df-map 8452  df-ixp 8521  df-en 8569  df-dom 8570  df-sdom 8571  df-fin 8572  df-sup 8992  df-inf 8993  df-pnf 10768  df-mnf 10769  df-xr 10770  df-ltxr 10771  df-le 10772  df-sub 10963  df-neg 10964  df-nn 11730  df-2 11792  df-3 11793  df-4 11794  df-5 11795  df-6 11796  df-7 11797  df-8 11798  df-9 11799  df-n0 11990  df-z 12076  df-dec 12193  df-uz 12338  df-fz 12995  df-struct 16601  df-ndx 16602  df-slot 16603  df-base 16605  df-plusg 16694  df-mulr 16695  df-sca 16697  df-vsca 16698  df-ip 16699  df-tset 16700  df-ple 16701  df-ds 16703  df-hom 16705  df-cco 16706  df-prds 16837  df-imas 16897  df-xps 16899

This theorem is referenced by: (None)