:: Basis of Vector Space
:: by Wojciech A. Trybulec
::
:: Received July 27, 1990
:: Copyright (c) 1990-2012 Association of Mizar Users


begin

definition
let GF be Field;
let V be VectSp of GF;
let IT be Subset of V;
attrIT is linearly-independent  means :Def1: :: VECTSP_7:def 1
 for l being Linear_Combination of IT st Sum l = 0. V holds
Carrier l = {} ;
end;

:: deftheorem Def1 defines linearly-independent VECTSP_7:def_1_:_
 for GF being Field
for V being VectSp of GF
for IT being Subset of V holds
( IT is linearly-independent iff for l being Linear_Combination of IT st Sum l = 0. V holds
Carrier l = {} );

notation
let GF be Field;
let V be VectSp of GF;
let IT be Subset of V;
antonym  linearly-dependent IT for  linearly-independent ;
end;

theorem :: VECTSP_7:1
for GF being Field
for V being VectSp of GF
for A, B being Subset of V st A c= B & B is linearly-independent holds
A is linearly-independent
proofend;

theorem Th2: :: VECTSP_7:2
for GF being Field
for V being VectSp of GF
for A being Subset of V st A is linearly-independent holds
not 0. V in A
proofend;

registration
let GF be Field;
let V be VectSp of GF;
cluster empty  ->  linearly-independent for Element of bool the carrier of V;
coherence
 for b1 being Subset of V st b1 is empty holds
b1 is linearly-independent
proofend;
end;

registration
let GF be Field;
let V be VectSp of GF;
cluster finite linearly-independent for Element of bool the carrier of V;
existence
 ex b1 being Subset of V st
( b1 is finite & b1 is linearly-independent )
proofend;
end;

theorem :: VECTSP_7:3
for GF being Field
for V being VectSp of GF
for v being Vector of V holds
( {v} is linearly-independent iff v <> 0. V )
proofend;

theorem Th4: :: VECTSP_7:4
for GF being Field
for V being VectSp of GF
for v1, v2 being Vector of V st {v1,v2} is linearly-independent holds
v1 <> 0. V
proofend;

theorem Th5: :: VECTSP_7:5
for GF being Field
for V being VectSp of GF
for v1, v2 being Vector of V holds
( v1 <> v2 &amp; {v1,v2} is linearly-independent iff ( v2 <> 0. V &amp; ( for a being Element of GF holds v1 <> a * v2 ) ) )
proofend;

theorem :: VECTSP_7:6
for GF being Field
for V being VectSp of GF
for v1, v2 being Vector of V holds
( ( v1 <> v2 &amp; {v1,v2} is linearly-independent ) iff for a, b being Element of GF st (a * v1) + (b * v2) = 0. V holds
( a = 0. GF &amp; b = 0. GF ) )
proofend;

definition
let GF be Field;
let V be VectSp of GF;
let A be Subset of V;
func Lin A ->  strict Subspace of V means :Def2: :: VECTSP_7:def 2
 the carrier of it =  {  (Sum l) where l is Linear_Combination of A : verum  }  ;
existence
 ex b1 being strict Subspace of V st the carrier of b1 =  {  (Sum l) where l is Linear_Combination of A : verum  }
proofend;
uniqueness
 for b1, b2 being strict Subspace of V st the carrier of b1 =  {  (Sum l) where l is Linear_Combination of A : verum  }  &amp; the carrier of b2 =  {  (Sum l) where l is Linear_Combination of A : verum  }  holds
b1 = b2 by VECTSP_4:29;
end;

:: deftheorem Def2 defines Lin VECTSP_7:def_2_:_
 for GF being Field
for V being VectSp of GF
for A being Subset of V
for b4 being strict Subspace of V holds
( b4 = Lin A iff the carrier of b4 =  {  (Sum l) where l is Linear_Combination of A : verum  }  );

theorem Th7: :: VECTSP_7:7
for x being set
for GF being Field
for V being VectSp of GF
for A being Subset of V holds
( x in Lin A iff ex l being Linear_Combination of A st x = Sum l )
proofend;

theorem Th8: :: VECTSP_7:8
for x being set
for GF being Field
for V being VectSp of GF
for A being Subset of V st x in A holds
x in Lin A
proofend;

theorem :: VECTSP_7:9
for GF being Field
for V being VectSp of GF holds Lin ({} the carrier of V) = (0). V
proofend;

theorem :: VECTSP_7:10
for GF being Field
for V being VectSp of GF
for A being Subset of V holds
( not Lin A = (0). V or A = {} or A = {(0. V)} )
proofend;

theorem Th11: :: VECTSP_7:11
for GF being Field
for V being VectSp of GF
for A being Subset of V
for W being strict Subspace of V st A = the carrier of W holds
Lin A = W
proofend;

theorem :: VECTSP_7:12
for GF being Field
for V being strict VectSp of GF
for A being Subset of V st A = the carrier of V holds
Lin A = V
proofend;

theorem Th13: :: VECTSP_7:13
for GF being Field
for V being VectSp of GF
for A, B being Subset of V st A c= B holds
Lin A is Subspace of Lin B
proofend;

theorem :: VECTSP_7:14
for GF being Field
for V being strict VectSp of GF
for A, B being Subset of V st Lin A = V &amp; A c= B holds
Lin B = V
proofend;

theorem :: VECTSP_7:15
for GF being Field
for V being VectSp of GF
for A, B being Subset of V holds Lin (A \/ B) = (Lin A) + (Lin B)
proofend;

theorem :: VECTSP_7:16
for GF being Field
for V being VectSp of GF
for A, B being Subset of V holds Lin (A /\ B) is Subspace of (Lin A) /\ (Lin B)
proofend;

theorem Th17: :: VECTSP_7:17
for GF being Field
for V being VectSp of GF
for A being Subset of V st A is linearly-independent holds
ex B being Subset of V st
( A c= B &amp; B is linearly-independent &amp; Lin B = VectSpStr(# the carrier of V, the U5 of V, the ZeroF of V, the lmult of V #) )
proofend;

theorem Th18: :: VECTSP_7:18
for GF being Field
for V being VectSp of GF
for A being Subset of V st Lin A = V holds
ex B being Subset of V st
( B c= A &amp; B is linearly-independent &amp; Lin B = V )
proofend;

definition
let GF be Field;
let V be VectSp of GF;
mode Basis of V ->  Subset of V means :Def3: :: VECTSP_7:def 3
( it is linearly-independent &amp; Lin it = VectSpStr(# the carrier of V, the U5 of V, the ZeroF of V, the lmult of V #) );
existence
 ex b1 being Subset of V st
( b1 is linearly-independent &amp; Lin b1 = VectSpStr(# the carrier of V, the U5 of V, the ZeroF of V, the lmult of V #) )
proofend;
end;

:: deftheorem Def3 defines Basis VECTSP_7:def_3_:_
 for GF being Field
for V being VectSp of GF
for b3 being Subset of V holds
( b3 is Basis of V iff ( b3 is linearly-independent &amp; Lin b3 = VectSpStr(# the carrier of V, the U5 of V, the ZeroF of V, the lmult of V #) ) );

theorem :: VECTSP_7:19
for GF being Field
for V being VectSp of GF
for A being Subset of V st A is linearly-independent holds
ex I being Basis of V st A c= I
proofend;

theorem :: VECTSP_7:20
for GF being Field
for V being VectSp of GF
for A being Subset of V st Lin A = V holds
ex I being Basis of V st I c= A
proofend;