Metamath Proof Explorer


Theorem f1lindf

Description: Rearranging and deleting elements from an independent family gives an independent family. (Contributed by Stefan O'Rear, 24-Feb-2015)

Ref Expression
Assertion f1lindf WLModFLIndFWG:K1-1domFFGLIndFW

Proof

Step Hyp Ref Expression
1 eqid BaseW=BaseW
2 1 lindff FLIndFWWLModF:domFBaseW
3 2 ancoms WLModFLIndFWF:domFBaseW
4 3 3adant3 WLModFLIndFWG:K1-1domFF:domFBaseW
5 f1f G:K1-1domFG:KdomF
6 5 3ad2ant3 WLModFLIndFWG:K1-1domFG:KdomF
7 fco F:domFBaseWG:KdomFFG:KBaseW
8 4 6 7 syl2anc WLModFLIndFWG:K1-1domFFG:KBaseW
9 8 ffdmd WLModFLIndFWG:K1-1domFFG:domFGBaseW
10 simpl2 WLModFLIndFWG:K1-1domFxdomFGkBaseScalarW0ScalarWFLIndFW
11 6 adantr WLModFLIndFWG:K1-1domFxdomFGG:KdomF
12 8 fdmd WLModFLIndFWG:K1-1domFdomFG=K
13 12 eleq2d WLModFLIndFWG:K1-1domFxdomFGxK
14 13 biimpa WLModFLIndFWG:K1-1domFxdomFGxK
15 11 14 ffvelcdmd WLModFLIndFWG:K1-1domFxdomFGGxdomF
16 15 adantrr WLModFLIndFWG:K1-1domFxdomFGkBaseScalarW0ScalarWGxdomF
17 eldifi kBaseScalarW0ScalarWkBaseScalarW
18 17 ad2antll WLModFLIndFWG:K1-1domFxdomFGkBaseScalarW0ScalarWkBaseScalarW
19 eldifsni kBaseScalarW0ScalarWk0ScalarW
20 19 ad2antll WLModFLIndFWG:K1-1domFxdomFGkBaseScalarW0ScalarWk0ScalarW
21 eqid W=W
22 eqid LSpanW=LSpanW
23 eqid ScalarW=ScalarW
24 eqid 0ScalarW=0ScalarW
25 eqid BaseScalarW=BaseScalarW
26 21 22 23 24 25 lindfind FLIndFWGxdomFkBaseScalarWk0ScalarW¬kWFGxLSpanWFdomFGx
27 10 16 18 20 26 syl22anc WLModFLIndFWG:K1-1domFxdomFGkBaseScalarW0ScalarW¬kWFGxLSpanWFdomFGx
28 f1fn G:K1-1domFGFnK
29 28 3ad2ant3 WLModFLIndFWG:K1-1domFGFnK
30 29 adantr WLModFLIndFWG:K1-1domFxdomFGGFnK
31 fvco2 GFnKxKFGx=FGx
32 30 14 31 syl2anc WLModFLIndFWG:K1-1domFxdomFGFGx=FGx
33 32 oveq2d WLModFLIndFWG:K1-1domFxdomFGkWFGx=kWFGx
34 33 eleq1d WLModFLIndFWG:K1-1domFxdomFGkWFGxLSpanWFGdomFGxkWFGxLSpanWFGdomFGx
35 simpl1 WLModFLIndFWG:K1-1domFxKWLMod
36 imassrn FdomFGxranF
37 4 frnd WLModFLIndFWG:K1-1domFranFBaseW
38 36 37 sstrid WLModFLIndFWG:K1-1domFFdomFGxBaseW
39 38 adantr WLModFLIndFWG:K1-1domFxKFdomFGxBaseW
40 imaco FGdomFGx=FGdomFGx
41 12 difeq1d WLModFLIndFWG:K1-1domFdomFGx=Kx
42 41 imaeq2d WLModFLIndFWG:K1-1domFGdomFGx=GKx
43 df-f1 G:K1-1domFG:KdomFFunG-1
44 43 simprbi G:K1-1domFFunG-1
45 44 3ad2ant3 WLModFLIndFWG:K1-1domFFunG-1
46 imadif FunG-1GKx=GKGx
47 45 46 syl WLModFLIndFWG:K1-1domFGKx=GKGx
48 42 47 eqtrd WLModFLIndFWG:K1-1domFGdomFGx=GKGx
49 48 adantr WLModFLIndFWG:K1-1domFxKGdomFGx=GKGx
50 fnsnfv GFnKxKGx=Gx
51 29 50 sylan WLModFLIndFWG:K1-1domFxKGx=Gx
52 51 difeq2d WLModFLIndFWG:K1-1domFxKGKGx=GKGx
53 imassrn GKranG
54 6 adantr WLModFLIndFWG:K1-1domFxKG:KdomF
55 54 frnd WLModFLIndFWG:K1-1domFxKranGdomF
56 53 55 sstrid WLModFLIndFWG:K1-1domFxKGKdomF
57 56 ssdifd WLModFLIndFWG:K1-1domFxKGKGxdomFGx
58 52 57 eqsstrrd WLModFLIndFWG:K1-1domFxKGKGxdomFGx
59 49 58 eqsstrd WLModFLIndFWG:K1-1domFxKGdomFGxdomFGx
60 imass2 GdomFGxdomFGxFGdomFGxFdomFGx
61 59 60 syl WLModFLIndFWG:K1-1domFxKFGdomFGxFdomFGx
62 40 61 eqsstrid WLModFLIndFWG:K1-1domFxKFGdomFGxFdomFGx
63 1 22 lspss WLModFdomFGxBaseWFGdomFGxFdomFGxLSpanWFGdomFGxLSpanWFdomFGx
64 35 39 62 63 syl3anc WLModFLIndFWG:K1-1domFxKLSpanWFGdomFGxLSpanWFdomFGx
65 14 64 syldan WLModFLIndFWG:K1-1domFxdomFGLSpanWFGdomFGxLSpanWFdomFGx
66 65 sseld WLModFLIndFWG:K1-1domFxdomFGkWFGxLSpanWFGdomFGxkWFGxLSpanWFdomFGx
67 34 66 sylbid WLModFLIndFWG:K1-1domFxdomFGkWFGxLSpanWFGdomFGxkWFGxLSpanWFdomFGx
68 67 adantrr WLModFLIndFWG:K1-1domFxdomFGkBaseScalarW0ScalarWkWFGxLSpanWFGdomFGxkWFGxLSpanWFdomFGx
69 27 68 mtod WLModFLIndFWG:K1-1domFxdomFGkBaseScalarW0ScalarW¬kWFGxLSpanWFGdomFGx
70 69 ralrimivva WLModFLIndFWG:K1-1domFxdomFGkBaseScalarW0ScalarW¬kWFGxLSpanWFGdomFGx
71 simp1 WLModFLIndFWG:K1-1domFWLMod
72 rellindf RelLIndF
73 72 brrelex1i FLIndFWFV
74 73 3ad2ant2 WLModFLIndFWG:K1-1domFFV
75 simp3 WLModFLIndFWG:K1-1domFG:K1-1domF
76 74 dmexd WLModFLIndFWG:K1-1domFdomFV
77 f1dmex G:K1-1domFdomFVKV
78 75 76 77 syl2anc WLModFLIndFWG:K1-1domFKV
79 6 78 fexd WLModFLIndFWG:K1-1domFGV
80 coexg FVGVFGV
81 74 79 80 syl2anc WLModFLIndFWG:K1-1domFFGV
82 1 21 22 23 25 24 islindf WLModFGVFGLIndFWFG:domFGBaseWxdomFGkBaseScalarW0ScalarW¬kWFGxLSpanWFGdomFGx
83 71 81 82 syl2anc WLModFLIndFWG:K1-1domFFGLIndFWFG:domFGBaseWxdomFGkBaseScalarW0ScalarW¬kWFGxLSpanWFGdomFGx
84 9 70 83 mpbir2and WLModFLIndFWG:K1-1domFFGLIndFW