Metamath Proof Explorer


Theorem isclmp

Description: The predicate "is a subcomplex module". (Contributed by NM, 31-May-2008) (Revised by AV, 4-Oct-2021)

Ref Expression
Hypotheses isclmp.t ⊢ · ˙ = ⋅ W
isclmp.a ⊢ + ˙ = + W
isclmp.v ⊢ V = Base W
isclmp.s ⊢ S = Scalar ⁡ W
isclmp.k ⊢ K = Base S
Assertion isclmp ⊢ W ∈ CMod ↔ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ ∀ x ∈ V 1 · ˙ x = x ∧ ∀ y ∈ K y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x

Proof

Step Hyp Ref Expression
1 isclmp.t ⊢ · ˙ = ⋅ W
2 isclmp.a ⊢ + ˙ = + W
3 isclmp.v ⊢ V = Base W
4 isclmp.s ⊢ S = Scalar ⁡ W
5 isclmp.k ⊢ K = Base S
6 4 5 isclm ⊢ W ∈ CMod ↔ W ∈ LMod ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld
7 eqid ⊢ + S = + S
8 eqid ⊢ ⋅ S = ⋅ S
9 eqid ⊢ 1 S = 1 S
10 3 2 1 4 5 7 8 9 islmod ⊢ W ∈ LMod ↔ W ∈ Grp ∧ S ∈ Ring ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x
11 10 3anbi1i ⊢ W ∈ LMod ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ↔ W ∈ Grp ∧ S ∈ Ring ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld
12 3anass ⊢ W ∈ Grp ∧ S ∈ Ring ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ↔ W ∈ Grp ∧ S ∈ Ring ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld
13 df-3an ⊢ W ∈ Grp ∧ S ∈ Ring ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ↔ W ∈ Grp ∧ S ∈ Ring ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x
14 13 anbi1i ⊢ W ∈ Grp ∧ S ∈ Ring ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ↔ W ∈ Grp ∧ S ∈ Ring ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld
15 12 14 bitri ⊢ W ∈ Grp ∧ S ∈ Ring ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ↔ W ∈ Grp ∧ S ∈ Ring ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld
16 an32 ⊢ W ∈ Grp ∧ S ∈ Ring ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ↔ W ∈ Grp ∧ S ∈ Ring ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x
17 11 15 16 3bitri ⊢ W ∈ LMod ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ↔ W ∈ Grp ∧ S ∈ Ring ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x
18 an32 ⊢ W ∈ Grp ∧ S ∈ Ring ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ↔ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ S ∈ Ring
19 3anass ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ↔ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld
20 19 bicomi ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ↔ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld
21 20 anbi1i ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ S ∈ Ring ↔ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ S ∈ Ring
22 18 21 bitri ⊢ W ∈ Grp ∧ S ∈ Ring ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ↔ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ S ∈ Ring
23 22 anbi1i ⊢ W ∈ Grp ∧ S ∈ Ring ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ↔ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ S ∈ Ring ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x
24 anass ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ S ∈ Ring ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ↔ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ S ∈ Ring ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x
25 df-3an ⊢ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ↔ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x
26 ancom ⊢ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ↔ 1 S · ˙ x = x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x
27 25 26 anbi12i ⊢ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ↔ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ 1 S · ˙ x = x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x
28 an4 ⊢ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ 1 S · ˙ x = x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ↔ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 S · ˙ x = x ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x
29 an32 ⊢ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 S · ˙ x = x ↔ y · ˙ x ∈ V ∧ 1 S · ˙ x = x ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z
30 ancom ⊢ y · ˙ x ∈ V ∧ 1 S · ˙ x = x ↔ 1 S · ˙ x = x ∧ y · ˙ x ∈ V
31 30 anbi1i ⊢ y · ˙ x ∈ V ∧ 1 S · ˙ x = x ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ↔ 1 S · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z
32 29 31 bitri ⊢ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 S · ˙ x = x ↔ 1 S · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z
33 32 anbi1i ⊢ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 S · ˙ x = x ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ↔ 1 S · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x
34 27 28 33 3bitri ⊢ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ↔ 1 S · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x
35 fveq2 ⊢ S = ℂ fld ↾ 𝑠 K → 1 S = 1 ℂ fld ↾ 𝑠 K
36 eqid ⊢ ℂ fld ↾ 𝑠 K = ℂ fld ↾ 𝑠 K
37 eqid ⊢ 1 ℂ fld = 1 ℂ fld
38 36 37 subrg1 ⊢ K ∈ SubRing ⁡ ℂ fld → 1 ℂ fld = 1 ℂ fld ↾ 𝑠 K
39 38 eqcomd ⊢ K ∈ SubRing ⁡ ℂ fld → 1 ℂ fld ↾ 𝑠 K = 1 ℂ fld
40 35 39 sylan9eq ⊢ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → 1 S = 1 ℂ fld
41 cnfld1 ⊢ 1 = 1 ℂ fld
42 40 41 eqtr4di ⊢ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → 1 S = 1
43 42 oveq1d ⊢ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → 1 S · ˙ x = 1 · ˙ x
44 43 eqeq1d ⊢ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → 1 S · ˙ x = x ↔ 1 · ˙ x = x
45 44 3adant1 ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → 1 S · ˙ x = x ↔ 1 · ˙ x = x
46 45 ad2antrr ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ r ∈ K ∧ y ∈ K ∧ z ∈ V ∧ x ∈ V → 1 S · ˙ x = x ↔ 1 · ˙ x = x
47 46 anbi1d ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ r ∈ K ∧ y ∈ K ∧ z ∈ V ∧ x ∈ V → 1 S · ˙ x = x ∧ y · ˙ x ∈ V ↔ 1 · ˙ x = x ∧ y · ˙ x ∈ V
48 47 anbi1d ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ r ∈ K ∧ y ∈ K ∧ z ∈ V ∧ x ∈ V → 1 S · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ↔ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z
49 eqid ⊢ + ℂ fld = + ℂ fld
50 36 49 ressplusg ⊢ K ∈ SubRing ⁡ ℂ fld → + ℂ fld = + ℂ fld ↾ 𝑠 K
51 50 adantl ⊢ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → + ℂ fld = + ℂ fld ↾ 𝑠 K
52 cnfldadd ⊢ + = + ℂ fld
53 52 a1i ⊢ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → + = + ℂ fld
54 fveq2 ⊢ S = ℂ fld ↾ 𝑠 K → + S = + ℂ fld ↾ 𝑠 K
55 54 adantr ⊢ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → + S = + ℂ fld ↾ 𝑠 K
56 51 53 55 3eqtr4rd ⊢ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → + S = +
57 56 3adant1 ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → + S = +
58 57 oveqd ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → r + S y = r + y
59 58 ad2antrr ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ r ∈ K ∧ y ∈ K ∧ z ∈ V ∧ x ∈ V → r + S y = r + y
60 59 oveq1d ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ r ∈ K ∧ y ∈ K ∧ z ∈ V ∧ x ∈ V → r + S y · ˙ x = r + y · ˙ x
61 60 eqeq1d ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ r ∈ K ∧ y ∈ K ∧ z ∈ V ∧ x ∈ V → r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ↔ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x
62 eqid ⊢ ⋅ ℂ fld = ⋅ ℂ fld
63 36 62 ressmulr ⊢ K ∈ SubRing ⁡ ℂ fld → ⋅ ℂ fld = ⋅ ℂ fld ↾ 𝑠 K
64 63 3ad2ant3 ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → ⋅ ℂ fld = ⋅ ℂ fld ↾ 𝑠 K
65 cnfldmul ⊢ × = ⋅ ℂ fld
66 65 a1i ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → × = ⋅ ℂ fld
67 fveq2 ⊢ S = ℂ fld ↾ 𝑠 K → ⋅ S = ⋅ ℂ fld ↾ 𝑠 K
68 67 3ad2ant2 ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → ⋅ S = ⋅ ℂ fld ↾ 𝑠 K
69 64 66 68 3eqtr4rd ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → ⋅ S = ×
70 69 oveqd ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → r ⋅ S y = r ⁢ y
71 70 ad2antrr ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ r ∈ K ∧ y ∈ K ∧ z ∈ V ∧ x ∈ V → r ⋅ S y = r ⁢ y
72 71 oveq1d ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ r ∈ K ∧ y ∈ K ∧ z ∈ V ∧ x ∈ V → r ⋅ S y · ˙ x = r ⁢ y · ˙ x
73 72 eqeq1d ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ r ∈ K ∧ y ∈ K ∧ z ∈ V ∧ x ∈ V → r ⋅ S y · ˙ x = r · ˙ y · ˙ x ↔ r ⁢ y · ˙ x = r · ˙ y · ˙ x
74 61 73 anbi12d ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ r ∈ K ∧ y ∈ K ∧ z ∈ V ∧ x ∈ V → r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ↔ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
75 48 74 anbi12d ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ r ∈ K ∧ y ∈ K ∧ z ∈ V ∧ x ∈ V → 1 S · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ↔ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
76 34 75 bitrid ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ r ∈ K ∧ y ∈ K ∧ z ∈ V ∧ x ∈ V → y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ↔ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
77 76 2ralbidva ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ r ∈ K ∧ y ∈ K → ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ↔ ∀ z ∈ V ∀ x ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
78 77 2ralbidva ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ↔ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
79 ralrot3 ⊢ ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ ∀ x ∈ V ∀ y ∈ K ∀ z ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
80 79 ralbii ⊢ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ ∀ r ∈ K ∀ x ∈ V ∀ y ∈ K ∀ z ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
81 ralcom ⊢ ∀ r ∈ K ∀ x ∈ V ∀ y ∈ K ∀ z ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ ∀ x ∈ V ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
82 80 81 bitri ⊢ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ ∀ x ∈ V ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
83 ralcom ⊢ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ ∀ y ∈ K ∀ r ∈ K ∀ z ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
84 83 ralbii ⊢ ∀ x ∈ V ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ ∀ x ∈ V ∀ y ∈ K ∀ r ∈ K ∀ z ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
85 ralcom ⊢ ∀ r ∈ K ∀ z ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ ∀ z ∈ V ∀ r ∈ K 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
86 85 2ralbii ⊢ ∀ x ∈ V ∀ y ∈ K ∀ r ∈ K ∀ z ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ ∀ x ∈ V ∀ y ∈ K ∀ z ∈ V ∀ r ∈ K 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
87 82 84 86 3bitri ⊢ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ ∀ x ∈ V ∀ y ∈ K ∀ z ∈ V ∀ r ∈ K 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
88 78 87 bitrdi ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ↔ ∀ x ∈ V ∀ y ∈ K ∀ z ∈ V ∀ r ∈ K 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
89 36 subrgring ⊢ K ∈ SubRing ⁡ ℂ fld → ℂ fld ↾ 𝑠 K ∈ Ring
90 89 3ad2ant3 ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → ℂ fld ↾ 𝑠 K ∈ Ring
91 eleq1 ⊢ S = ℂ fld ↾ 𝑠 K → S ∈ Ring ↔ ℂ fld ↾ 𝑠 K ∈ Ring
92 91 3ad2ant2 ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → S ∈ Ring ↔ ℂ fld ↾ 𝑠 K ∈ Ring
93 90 92 mpbird ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → S ∈ Ring
94 93 biantrurd ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ↔ S ∈ Ring ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x
95 3 grpbn0 ⊢ W ∈ Grp → V ≠ ∅
96 95 3ad2ant1 ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → V ≠ ∅
97 37 subrg1cl ⊢ K ∈ SubRing ⁡ ℂ fld → 1 ℂ fld ∈ K
98 97 ne0d ⊢ K ∈ SubRing ⁡ ℂ fld → K ≠ ∅
99 98 3ad2ant3 ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → K ≠ ∅
100 ancom ⊢ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ↔ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 · ˙ x = x ∧ y · ˙ x ∈ V
101 100 anbi1i ⊢ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
102 101 a1i ⊢ V ≠ ∅ ∧ K ≠ ∅ → 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
103 102 ralbidv ⊢ V ≠ ∅ ∧ K ≠ ∅ → ∀ r ∈ K 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ ∀ r ∈ K y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
104 r19.28zv ⊢ K ≠ ∅ → ∀ r ∈ K y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
105 104 adantl ⊢ V ≠ ∅ ∧ K ≠ ∅ → ∀ r ∈ K y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
106 103 105 bitrd ⊢ V ≠ ∅ ∧ K ≠ ∅ → ∀ r ∈ K 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
107 anass ⊢ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
108 anass ⊢ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
109 108 anbi2i ⊢ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
110 ancom ⊢ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z
111 107 109 110 3bitri ⊢ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z
112 106 111 bitrdi ⊢ V ≠ ∅ ∧ K ≠ ∅ → ∀ r ∈ K 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z
113 112 ralbidv ⊢ V ≠ ∅ ∧ K ≠ ∅ → ∀ z ∈ V ∀ r ∈ K 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ ∀ z ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z
114 r19.28zv ⊢ V ≠ ∅ → ∀ z ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ↔ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z
115 114 adantr ⊢ V ≠ ∅ ∧ K ≠ ∅ → ∀ z ∈ V 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ↔ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z
116 113 115 bitrd ⊢ V ≠ ∅ ∧ K ≠ ∅ → ∀ z ∈ V ∀ r ∈ K 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z
117 anass ⊢ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ↔ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z
118 oveq1 ⊢ z = r → z + y = r + y
119 118 oveq1d ⊢ z = r → z + y · ˙ x = r + y · ˙ x
120 oveq1 ⊢ z = r → z · ˙ x = r · ˙ x
121 120 oveq1d ⊢ z = r → z · ˙ x + ˙ y · ˙ x = r · ˙ x + ˙ y · ˙ x
122 119 121 eqeq12d ⊢ z = r → z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ↔ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x
123 oveq1 ⊢ z = r → z ⁢ y = r ⁢ y
124 123 oveq1d ⊢ z = r → z ⁢ y · ˙ x = r ⁢ y · ˙ x
125 oveq1 ⊢ z = r → z · ˙ y · ˙ x = r · ˙ y · ˙ x
126 124 125 eqeq12d ⊢ z = r → z ⁢ y · ˙ x = z · ˙ y · ˙ x ↔ r ⁢ y · ˙ x = r · ˙ y · ˙ x
127 122 126 anbi12d ⊢ z = r → z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x ↔ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
128 127 cbvralvw ⊢ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x ↔ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
129 128 3anbi3i ⊢ y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x ↔ y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x
130 3anan32 ⊢ y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z
131 129 130 bitri ⊢ y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x ↔ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z
132 131 bicomi ⊢ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ↔ y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x
133 132 anbi2i ⊢ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ↔ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x
134 117 133 bitri ⊢ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ r ∈ K r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ↔ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x
135 116 134 bitrdi ⊢ V ≠ ∅ ∧ K ≠ ∅ → ∀ z ∈ V ∀ r ∈ K 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x
136 135 ralbidv ⊢ V ≠ ∅ ∧ K ≠ ∅ → ∀ y ∈ K ∀ z ∈ V ∀ r ∈ K 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ ∀ y ∈ K 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x
137 r19.28zv ⊢ K ≠ ∅ → ∀ y ∈ K 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x ↔ 1 · ˙ x = x ∧ ∀ y ∈ K y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x
138 137 adantl ⊢ V ≠ ∅ ∧ K ≠ ∅ → ∀ y ∈ K 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x ↔ 1 · ˙ x = x ∧ ∀ y ∈ K y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x
139 136 138 bitrd ⊢ V ≠ ∅ ∧ K ≠ ∅ → ∀ y ∈ K ∀ z ∈ V ∀ r ∈ K 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ 1 · ˙ x = x ∧ ∀ y ∈ K y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x
140 96 99 139 syl2anc ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → ∀ y ∈ K ∀ z ∈ V ∀ r ∈ K 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ 1 · ˙ x = x ∧ ∀ y ∈ K y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x
141 140 ralbidv ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → ∀ x ∈ V ∀ y ∈ K ∀ z ∈ V ∀ r ∈ K 1 · ˙ x = x ∧ y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⁢ y · ˙ x = r · ˙ y · ˙ x ↔ ∀ x ∈ V 1 · ˙ x = x ∧ ∀ y ∈ K y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x
142 88 94 141 3bitr3d ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld → S ∈ Ring ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ↔ ∀ x ∈ V 1 · ˙ x = x ∧ ∀ y ∈ K y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x
143 142 pm5.32i ⊢ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ S ∈ Ring ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ↔ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ ∀ x ∈ V 1 · ˙ x = x ∧ ∀ y ∈ K y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x
144 23 24 143 3bitri ⊢ W ∈ Grp ∧ S ∈ Ring ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ ∀ r ∈ K ∀ y ∈ K ∀ z ∈ V ∀ x ∈ V y · ˙ x ∈ V ∧ y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ r + S y · ˙ x = r · ˙ x + ˙ y · ˙ x ∧ r ⋅ S y · ˙ x = r · ˙ y · ˙ x ∧ 1 S · ˙ x = x ↔ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ ∀ x ∈ V 1 · ˙ x = x ∧ ∀ y ∈ K y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x
145 6 17 144 3bitri ⊢ W ∈ CMod ↔ W ∈ Grp ∧ S = ℂ fld ↾ 𝑠 K ∧ K ∈ SubRing ⁡ ℂ fld ∧ ∀ x ∈ V 1 · ˙ x = x ∧ ∀ y ∈ K y · ˙ x ∈ V ∧ ∀ z ∈ V y · ˙ x + ˙ z = y · ˙ x + ˙ y · ˙ z ∧ ∀ z ∈ K z + y · ˙ x = z · ˙ x + ˙ y · ˙ x ∧ z ⁢ y · ˙ x = z · ˙ y · ˙ x