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

Theorem isvclem 29817
Description: Lemma for isvcOLD 29819. (Contributed by NM, 31-May-2008.) (New usage is discouraged.)
Hypothesis
Ref Expression
isvclem.1 𝑋 = ran 𝐺
Assertion
Ref Expression
isvclem ((𝐺 ∈ V ∧ 𝑆 ∈ V) β†’ (⟨𝐺, π‘†βŸ© ∈ CVecOLD ↔ (𝐺 ∈ AbelOp ∧ 𝑆:(β„‚ Γ— 𝑋)βŸΆπ‘‹ ∧ βˆ€π‘₯ ∈ 𝑋 ((1𝑆π‘₯) = π‘₯ ∧ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ 𝑋 (𝑦𝑆(π‘₯𝐺𝑧)) = ((𝑦𝑆π‘₯)𝐺(𝑦𝑆𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑆π‘₯) = ((𝑦𝑆π‘₯)𝐺(𝑧𝑆π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑆π‘₯) = (𝑦𝑆(𝑧𝑆π‘₯))))))))
Distinct variable groups:   π‘₯,𝑦,𝑧,𝐺   π‘₯,𝑆,𝑦,𝑧   π‘₯,𝑋,𝑧
Allowed substitution hint:   𝑋(𝑦)

Proof of Theorem isvclem
Dummy variables 𝑔 𝑠 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 df-vc 29799 . . 3 CVecOLD = {βŸ¨π‘”, π‘ βŸ© ∣ (𝑔 ∈ AbelOp ∧ 𝑠:(β„‚ Γ— ran 𝑔)⟢ran 𝑔 ∧ βˆ€π‘₯ ∈ ran 𝑔((1𝑠π‘₯) = π‘₯ ∧ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ ran 𝑔(𝑦𝑠(π‘₯𝑔𝑧)) = ((𝑦𝑠π‘₯)𝑔(𝑦𝑠𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝑔(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯))))))}
21eleq2i 2825 . 2 (⟨𝐺, π‘†βŸ© ∈ CVecOLD ↔ ⟨𝐺, π‘†βŸ© ∈ {βŸ¨π‘”, π‘ βŸ© ∣ (𝑔 ∈ AbelOp ∧ 𝑠:(β„‚ Γ— ran 𝑔)⟢ran 𝑔 ∧ βˆ€π‘₯ ∈ ran 𝑔((1𝑠π‘₯) = π‘₯ ∧ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ ran 𝑔(𝑦𝑠(π‘₯𝑔𝑧)) = ((𝑦𝑠π‘₯)𝑔(𝑦𝑠𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝑔(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯))))))})
3 eleq1 2821 . . . 4 (𝑔 = 𝐺 β†’ (𝑔 ∈ AbelOp ↔ 𝐺 ∈ AbelOp))
4 rneq 5933 . . . . . 6 (𝑔 = 𝐺 β†’ ran 𝑔 = ran 𝐺)
5 isvclem.1 . . . . . 6 𝑋 = ran 𝐺
64, 5eqtr4di 2790 . . . . 5 (𝑔 = 𝐺 β†’ ran 𝑔 = 𝑋)
7 xpeq2 5696 . . . . . . 7 (ran 𝑔 = 𝑋 β†’ (β„‚ Γ— ran 𝑔) = (β„‚ Γ— 𝑋))
87feq2d 6700 . . . . . 6 (ran 𝑔 = 𝑋 β†’ (𝑠:(β„‚ Γ— ran 𝑔)⟢ran 𝑔 ↔ 𝑠:(β„‚ Γ— 𝑋)⟢ran 𝑔))
9 feq3 6697 . . . . . 6 (ran 𝑔 = 𝑋 β†’ (𝑠:(β„‚ Γ— 𝑋)⟢ran 𝑔 ↔ 𝑠:(β„‚ Γ— 𝑋)βŸΆπ‘‹))
108, 9bitrd 278 . . . . 5 (ran 𝑔 = 𝑋 β†’ (𝑠:(β„‚ Γ— ran 𝑔)⟢ran 𝑔 ↔ 𝑠:(β„‚ Γ— 𝑋)βŸΆπ‘‹))
116, 10syl 17 . . . 4 (𝑔 = 𝐺 β†’ (𝑠:(β„‚ Γ— ran 𝑔)⟢ran 𝑔 ↔ 𝑠:(β„‚ Γ— 𝑋)βŸΆπ‘‹))
12 oveq 7411 . . . . . . . . . . 11 (𝑔 = 𝐺 β†’ (π‘₯𝑔𝑧) = (π‘₯𝐺𝑧))
1312oveq2d 7421 . . . . . . . . . 10 (𝑔 = 𝐺 β†’ (𝑦𝑠(π‘₯𝑔𝑧)) = (𝑦𝑠(π‘₯𝐺𝑧)))
14 oveq 7411 . . . . . . . . . 10 (𝑔 = 𝐺 β†’ ((𝑦𝑠π‘₯)𝑔(𝑦𝑠𝑧)) = ((𝑦𝑠π‘₯)𝐺(𝑦𝑠𝑧)))
1513, 14eqeq12d 2748 . . . . . . . . 9 (𝑔 = 𝐺 β†’ ((𝑦𝑠(π‘₯𝑔𝑧)) = ((𝑦𝑠π‘₯)𝑔(𝑦𝑠𝑧)) ↔ (𝑦𝑠(π‘₯𝐺𝑧)) = ((𝑦𝑠π‘₯)𝐺(𝑦𝑠𝑧))))
166, 15raleqbidv 3342 . . . . . . . 8 (𝑔 = 𝐺 β†’ (βˆ€π‘§ ∈ ran 𝑔(𝑦𝑠(π‘₯𝑔𝑧)) = ((𝑦𝑠π‘₯)𝑔(𝑦𝑠𝑧)) ↔ βˆ€π‘§ ∈ 𝑋 (𝑦𝑠(π‘₯𝐺𝑧)) = ((𝑦𝑠π‘₯)𝐺(𝑦𝑠𝑧))))
17 oveq 7411 . . . . . . . . . . 11 (𝑔 = 𝐺 β†’ ((𝑦𝑠π‘₯)𝑔(𝑧𝑠π‘₯)) = ((𝑦𝑠π‘₯)𝐺(𝑧𝑠π‘₯)))
1817eqeq2d 2743 . . . . . . . . . 10 (𝑔 = 𝐺 β†’ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝑔(𝑧𝑠π‘₯)) ↔ ((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝐺(𝑧𝑠π‘₯))))
1918anbi1d 630 . . . . . . . . 9 (𝑔 = 𝐺 β†’ ((((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝑔(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯))) ↔ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝐺(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯)))))
2019ralbidv 3177 . . . . . . . 8 (𝑔 = 𝐺 β†’ (βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝑔(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯))) ↔ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝐺(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯)))))
2116, 20anbi12d 631 . . . . . . 7 (𝑔 = 𝐺 β†’ ((βˆ€π‘§ ∈ ran 𝑔(𝑦𝑠(π‘₯𝑔𝑧)) = ((𝑦𝑠π‘₯)𝑔(𝑦𝑠𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝑔(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯)))) ↔ (βˆ€π‘§ ∈ 𝑋 (𝑦𝑠(π‘₯𝐺𝑧)) = ((𝑦𝑠π‘₯)𝐺(𝑦𝑠𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝐺(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯))))))
2221ralbidv 3177 . . . . . 6 (𝑔 = 𝐺 β†’ (βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ ran 𝑔(𝑦𝑠(π‘₯𝑔𝑧)) = ((𝑦𝑠π‘₯)𝑔(𝑦𝑠𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝑔(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯)))) ↔ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ 𝑋 (𝑦𝑠(π‘₯𝐺𝑧)) = ((𝑦𝑠π‘₯)𝐺(𝑦𝑠𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝐺(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯))))))
2322anbi2d 629 . . . . 5 (𝑔 = 𝐺 β†’ (((1𝑠π‘₯) = π‘₯ ∧ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ ran 𝑔(𝑦𝑠(π‘₯𝑔𝑧)) = ((𝑦𝑠π‘₯)𝑔(𝑦𝑠𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝑔(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯))))) ↔ ((1𝑠π‘₯) = π‘₯ ∧ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ 𝑋 (𝑦𝑠(π‘₯𝐺𝑧)) = ((𝑦𝑠π‘₯)𝐺(𝑦𝑠𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝐺(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯)))))))
246, 23raleqbidv 3342 . . . 4 (𝑔 = 𝐺 β†’ (βˆ€π‘₯ ∈ ran 𝑔((1𝑠π‘₯) = π‘₯ ∧ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ ran 𝑔(𝑦𝑠(π‘₯𝑔𝑧)) = ((𝑦𝑠π‘₯)𝑔(𝑦𝑠𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝑔(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯))))) ↔ βˆ€π‘₯ ∈ 𝑋 ((1𝑠π‘₯) = π‘₯ ∧ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ 𝑋 (𝑦𝑠(π‘₯𝐺𝑧)) = ((𝑦𝑠π‘₯)𝐺(𝑦𝑠𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝐺(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯)))))))
253, 11, 243anbi123d 1436 . . 3 (𝑔 = 𝐺 β†’ ((𝑔 ∈ AbelOp ∧ 𝑠:(β„‚ Γ— ran 𝑔)⟢ran 𝑔 ∧ βˆ€π‘₯ ∈ ran 𝑔((1𝑠π‘₯) = π‘₯ ∧ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ ran 𝑔(𝑦𝑠(π‘₯𝑔𝑧)) = ((𝑦𝑠π‘₯)𝑔(𝑦𝑠𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝑔(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯)))))) ↔ (𝐺 ∈ AbelOp ∧ 𝑠:(β„‚ Γ— 𝑋)βŸΆπ‘‹ ∧ βˆ€π‘₯ ∈ 𝑋 ((1𝑠π‘₯) = π‘₯ ∧ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ 𝑋 (𝑦𝑠(π‘₯𝐺𝑧)) = ((𝑦𝑠π‘₯)𝐺(𝑦𝑠𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝐺(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯))))))))
26 feq1 6695 . . . 4 (𝑠 = 𝑆 β†’ (𝑠:(β„‚ Γ— 𝑋)βŸΆπ‘‹ ↔ 𝑆:(β„‚ Γ— 𝑋)βŸΆπ‘‹))
27 oveq 7411 . . . . . . 7 (𝑠 = 𝑆 β†’ (1𝑠π‘₯) = (1𝑆π‘₯))
2827eqeq1d 2734 . . . . . 6 (𝑠 = 𝑆 β†’ ((1𝑠π‘₯) = π‘₯ ↔ (1𝑆π‘₯) = π‘₯))
29 oveq 7411 . . . . . . . . . 10 (𝑠 = 𝑆 β†’ (𝑦𝑠(π‘₯𝐺𝑧)) = (𝑦𝑆(π‘₯𝐺𝑧)))
30 oveq 7411 . . . . . . . . . . 11 (𝑠 = 𝑆 β†’ (𝑦𝑠π‘₯) = (𝑦𝑆π‘₯))
31 oveq 7411 . . . . . . . . . . 11 (𝑠 = 𝑆 β†’ (𝑦𝑠𝑧) = (𝑦𝑆𝑧))
3230, 31oveq12d 7423 . . . . . . . . . 10 (𝑠 = 𝑆 β†’ ((𝑦𝑠π‘₯)𝐺(𝑦𝑠𝑧)) = ((𝑦𝑆π‘₯)𝐺(𝑦𝑆𝑧)))
3329, 32eqeq12d 2748 . . . . . . . . 9 (𝑠 = 𝑆 β†’ ((𝑦𝑠(π‘₯𝐺𝑧)) = ((𝑦𝑠π‘₯)𝐺(𝑦𝑠𝑧)) ↔ (𝑦𝑆(π‘₯𝐺𝑧)) = ((𝑦𝑆π‘₯)𝐺(𝑦𝑆𝑧))))
3433ralbidv 3177 . . . . . . . 8 (𝑠 = 𝑆 β†’ (βˆ€π‘§ ∈ 𝑋 (𝑦𝑠(π‘₯𝐺𝑧)) = ((𝑦𝑠π‘₯)𝐺(𝑦𝑠𝑧)) ↔ βˆ€π‘§ ∈ 𝑋 (𝑦𝑆(π‘₯𝐺𝑧)) = ((𝑦𝑆π‘₯)𝐺(𝑦𝑆𝑧))))
35 oveq 7411 . . . . . . . . . . 11 (𝑠 = 𝑆 β†’ ((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦 + 𝑧)𝑆π‘₯))
36 oveq 7411 . . . . . . . . . . . 12 (𝑠 = 𝑆 β†’ (𝑧𝑠π‘₯) = (𝑧𝑆π‘₯))
3730, 36oveq12d 7423 . . . . . . . . . . 11 (𝑠 = 𝑆 β†’ ((𝑦𝑠π‘₯)𝐺(𝑧𝑠π‘₯)) = ((𝑦𝑆π‘₯)𝐺(𝑧𝑆π‘₯)))
3835, 37eqeq12d 2748 . . . . . . . . . 10 (𝑠 = 𝑆 β†’ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝐺(𝑧𝑠π‘₯)) ↔ ((𝑦 + 𝑧)𝑆π‘₯) = ((𝑦𝑆π‘₯)𝐺(𝑧𝑆π‘₯))))
39 oveq 7411 . . . . . . . . . . 11 (𝑠 = 𝑆 β†’ ((𝑦 Β· 𝑧)𝑠π‘₯) = ((𝑦 Β· 𝑧)𝑆π‘₯))
40 oveq 7411 . . . . . . . . . . . 12 (𝑠 = 𝑆 β†’ (𝑦𝑠(𝑧𝑠π‘₯)) = (𝑦𝑆(𝑧𝑠π‘₯)))
4136oveq2d 7421 . . . . . . . . . . . 12 (𝑠 = 𝑆 β†’ (𝑦𝑆(𝑧𝑠π‘₯)) = (𝑦𝑆(𝑧𝑆π‘₯)))
4240, 41eqtrd 2772 . . . . . . . . . . 11 (𝑠 = 𝑆 β†’ (𝑦𝑠(𝑧𝑠π‘₯)) = (𝑦𝑆(𝑧𝑆π‘₯)))
4339, 42eqeq12d 2748 . . . . . . . . . 10 (𝑠 = 𝑆 β†’ (((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯)) ↔ ((𝑦 Β· 𝑧)𝑆π‘₯) = (𝑦𝑆(𝑧𝑆π‘₯))))
4438, 43anbi12d 631 . . . . . . . . 9 (𝑠 = 𝑆 β†’ ((((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝐺(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯))) ↔ (((𝑦 + 𝑧)𝑆π‘₯) = ((𝑦𝑆π‘₯)𝐺(𝑧𝑆π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑆π‘₯) = (𝑦𝑆(𝑧𝑆π‘₯)))))
4544ralbidv 3177 . . . . . . . 8 (𝑠 = 𝑆 β†’ (βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝐺(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯))) ↔ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑆π‘₯) = ((𝑦𝑆π‘₯)𝐺(𝑧𝑆π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑆π‘₯) = (𝑦𝑆(𝑧𝑆π‘₯)))))
4634, 45anbi12d 631 . . . . . . 7 (𝑠 = 𝑆 β†’ ((βˆ€π‘§ ∈ 𝑋 (𝑦𝑠(π‘₯𝐺𝑧)) = ((𝑦𝑠π‘₯)𝐺(𝑦𝑠𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝐺(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯)))) ↔ (βˆ€π‘§ ∈ 𝑋 (𝑦𝑆(π‘₯𝐺𝑧)) = ((𝑦𝑆π‘₯)𝐺(𝑦𝑆𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑆π‘₯) = ((𝑦𝑆π‘₯)𝐺(𝑧𝑆π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑆π‘₯) = (𝑦𝑆(𝑧𝑆π‘₯))))))
4746ralbidv 3177 . . . . . 6 (𝑠 = 𝑆 β†’ (βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ 𝑋 (𝑦𝑠(π‘₯𝐺𝑧)) = ((𝑦𝑠π‘₯)𝐺(𝑦𝑠𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝐺(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯)))) ↔ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ 𝑋 (𝑦𝑆(π‘₯𝐺𝑧)) = ((𝑦𝑆π‘₯)𝐺(𝑦𝑆𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑆π‘₯) = ((𝑦𝑆π‘₯)𝐺(𝑧𝑆π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑆π‘₯) = (𝑦𝑆(𝑧𝑆π‘₯))))))
4828, 47anbi12d 631 . . . . 5 (𝑠 = 𝑆 β†’ (((1𝑠π‘₯) = π‘₯ ∧ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ 𝑋 (𝑦𝑠(π‘₯𝐺𝑧)) = ((𝑦𝑠π‘₯)𝐺(𝑦𝑠𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝐺(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯))))) ↔ ((1𝑆π‘₯) = π‘₯ ∧ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ 𝑋 (𝑦𝑆(π‘₯𝐺𝑧)) = ((𝑦𝑆π‘₯)𝐺(𝑦𝑆𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑆π‘₯) = ((𝑦𝑆π‘₯)𝐺(𝑧𝑆π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑆π‘₯) = (𝑦𝑆(𝑧𝑆π‘₯)))))))
4948ralbidv 3177 . . . 4 (𝑠 = 𝑆 β†’ (βˆ€π‘₯ ∈ 𝑋 ((1𝑠π‘₯) = π‘₯ ∧ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ 𝑋 (𝑦𝑠(π‘₯𝐺𝑧)) = ((𝑦𝑠π‘₯)𝐺(𝑦𝑠𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝐺(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯))))) ↔ βˆ€π‘₯ ∈ 𝑋 ((1𝑆π‘₯) = π‘₯ ∧ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ 𝑋 (𝑦𝑆(π‘₯𝐺𝑧)) = ((𝑦𝑆π‘₯)𝐺(𝑦𝑆𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑆π‘₯) = ((𝑦𝑆π‘₯)𝐺(𝑧𝑆π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑆π‘₯) = (𝑦𝑆(𝑧𝑆π‘₯)))))))
5026, 493anbi23d 1439 . . 3 (𝑠 = 𝑆 β†’ ((𝐺 ∈ AbelOp ∧ 𝑠:(β„‚ Γ— 𝑋)βŸΆπ‘‹ ∧ βˆ€π‘₯ ∈ 𝑋 ((1𝑠π‘₯) = π‘₯ ∧ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ 𝑋 (𝑦𝑠(π‘₯𝐺𝑧)) = ((𝑦𝑠π‘₯)𝐺(𝑦𝑠𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝐺(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯)))))) ↔ (𝐺 ∈ AbelOp ∧ 𝑆:(β„‚ Γ— 𝑋)βŸΆπ‘‹ ∧ βˆ€π‘₯ ∈ 𝑋 ((1𝑆π‘₯) = π‘₯ ∧ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ 𝑋 (𝑦𝑆(π‘₯𝐺𝑧)) = ((𝑦𝑆π‘₯)𝐺(𝑦𝑆𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑆π‘₯) = ((𝑦𝑆π‘₯)𝐺(𝑧𝑆π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑆π‘₯) = (𝑦𝑆(𝑧𝑆π‘₯))))))))
5125, 50opelopabg 5537 . 2 ((𝐺 ∈ V ∧ 𝑆 ∈ V) β†’ (⟨𝐺, π‘†βŸ© ∈ {βŸ¨π‘”, π‘ βŸ© ∣ (𝑔 ∈ AbelOp ∧ 𝑠:(β„‚ Γ— ran 𝑔)⟢ran 𝑔 ∧ βˆ€π‘₯ ∈ ran 𝑔((1𝑠π‘₯) = π‘₯ ∧ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ ran 𝑔(𝑦𝑠(π‘₯𝑔𝑧)) = ((𝑦𝑠π‘₯)𝑔(𝑦𝑠𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑠π‘₯) = ((𝑦𝑠π‘₯)𝑔(𝑧𝑠π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑠π‘₯) = (𝑦𝑠(𝑧𝑠π‘₯))))))} ↔ (𝐺 ∈ AbelOp ∧ 𝑆:(β„‚ Γ— 𝑋)βŸΆπ‘‹ ∧ βˆ€π‘₯ ∈ 𝑋 ((1𝑆π‘₯) = π‘₯ ∧ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ 𝑋 (𝑦𝑆(π‘₯𝐺𝑧)) = ((𝑦𝑆π‘₯)𝐺(𝑦𝑆𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑆π‘₯) = ((𝑦𝑆π‘₯)𝐺(𝑧𝑆π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑆π‘₯) = (𝑦𝑆(𝑧𝑆π‘₯))))))))
522, 51bitrid 282 1 ((𝐺 ∈ V ∧ 𝑆 ∈ V) β†’ (⟨𝐺, π‘†βŸ© ∈ CVecOLD ↔ (𝐺 ∈ AbelOp ∧ 𝑆:(β„‚ Γ— 𝑋)βŸΆπ‘‹ ∧ βˆ€π‘₯ ∈ 𝑋 ((1𝑆π‘₯) = π‘₯ ∧ βˆ€π‘¦ ∈ β„‚ (βˆ€π‘§ ∈ 𝑋 (𝑦𝑆(π‘₯𝐺𝑧)) = ((𝑦𝑆π‘₯)𝐺(𝑦𝑆𝑧)) ∧ βˆ€π‘§ ∈ β„‚ (((𝑦 + 𝑧)𝑆π‘₯) = ((𝑦𝑆π‘₯)𝐺(𝑧𝑆π‘₯)) ∧ ((𝑦 Β· 𝑧)𝑆π‘₯) = (𝑦𝑆(𝑧𝑆π‘₯))))))))
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ↔ wb 205   ∧ wa 396   ∧ w3a 1087   = wceq 1541   ∈ wcel 2106  βˆ€wral 3061  Vcvv 3474  βŸ¨cop 4633  {copab 5209   Γ— cxp 5673  ran crn 5676  βŸΆwf 6536  (class class class)co 7405  β„‚cc 11104  1c1 11107   + caddc 11109   Β· cmul 11111  AbelOpcablo 29784  CVecOLDcvc 29798
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-ext 2703  ax-sep 5298  ax-nul 5305  ax-pr 5426
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-sb 2068  df-clab 2710  df-cleq 2724  df-clel 2810  df-ral 3062  df-rab 3433  df-v 3476  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-nul 4322  df-if 4528  df-sn 4628  df-pr 4630  df-op 4634  df-uni 4908  df-br 5148  df-opab 5210  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-iota 6492  df-fun 6542  df-fn 6543  df-f 6544  df-fv 6548  df-ov 7408  df-vc 29799
This theorem is referenced by:  isvcOLD  29819
  Copyright terms: Public domain W3C validator