:: MOD_3 semantic presentation

begin

theorem :: MOD_3:1
for R being ( ( non empty non degenerated right_complementable add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable add-associative right_zeroed ) doubleLoopStr ) holds 0. R : ( ( non empty non degenerated right_complementable add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable add-associative right_zeroed ) doubleLoopStr ) : ( ( ) ( V47(b1 : ( ( non empty non degenerated right_complementable add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable add-associative right_zeroed ) doubleLoopStr ) ) ) Element of the carrier of b1 : ( ( non empty non degenerated right_complementable add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable add-associative right_zeroed ) doubleLoopStr ) : ( ( ) ( non empty non trivial ) set ) ) <> - (1. R : ( ( non empty non degenerated right_complementable add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable add-associative right_zeroed ) doubleLoopStr ) ) : ( ( ) ( V47(b1 : ( ( non empty non degenerated right_complementable add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable add-associative right_zeroed ) doubleLoopStr ) ) ) Element of the carrier of b1 : ( ( non empty non degenerated right_complementable add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable add-associative right_zeroed ) doubleLoopStr ) : ( ( ) ( non empty non trivial ) set ) ) : ( ( ) ( ) Element of the carrier of b1 : ( ( non empty non degenerated right_complementable add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable add-associative right_zeroed ) doubleLoopStr ) : ( ( ) ( non empty non trivial ) set ) ) ;

theorem :: MOD_3:2
for R being ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) )
for L being ( ( ) ( Relation-like the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) -defined the carrier of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( non empty ) set ) -valued Function-like quasi_total ) Linear_Combination of V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) )
for C being ( ( finite ) ( finite ) Subset of ) st Carrier L : ( ( ) ( Relation-like the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) -defined the carrier of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( non empty ) set ) -valued Function-like quasi_total ) Linear_Combination of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) : ( ( finite ) ( finite ) Element of bool the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) : ( ( ) ( non empty ) set ) ) c= C : ( ( finite ) ( finite ) Subset of ) holds
ex F being ( ( ) ( Relation-like NAT : ( ( ) ( non empty epsilon-transitive epsilon-connected ordinal ) Element of bool REAL : ( ( ) ( ) set ) : ( ( ) ( non empty ) set ) ) -defined the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) -valued Function-like finite FinSequence-like FinSubsequence-like ) FinSequence of the carrier of V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) ) st
( F : ( ( ) ( Relation-like NAT : ( ( ) ( non empty epsilon-transitive epsilon-connected ordinal ) Element of bool REAL : ( ( ) ( ) set ) : ( ( ) ( non empty ) set ) ) -defined the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) -valued Function-like finite FinSequence-like FinSubsequence-like ) FinSequence of the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) ) is one-to-one & rng F : ( ( ) ( Relation-like NAT : ( ( ) ( non empty epsilon-transitive epsilon-connected ordinal ) Element of bool REAL : ( ( ) ( ) set ) : ( ( ) ( non empty ) set ) ) -defined the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) -valued Function-like finite FinSequence-like FinSubsequence-like ) FinSequence of the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) ) : ( ( ) ( finite ) set ) = C : ( ( finite ) ( finite ) Subset of ) & Sum L : ( ( ) ( Relation-like the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) -defined the carrier of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( non empty ) set ) -valued Function-like quasi_total ) Linear_Combination of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) : ( ( ) ( ) Element of the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) ) = Sum (L : ( ( ) ( Relation-like the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) -defined the carrier of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( non empty ) set ) -valued Function-like quasi_total ) Linear_Combination of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) (#) F : ( ( ) ( Relation-like NAT : ( ( ) ( non empty epsilon-transitive epsilon-connected ordinal ) Element of bool REAL : ( ( ) ( ) set ) : ( ( ) ( non empty ) set ) ) -defined the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) -valued Function-like finite FinSequence-like FinSubsequence-like ) FinSequence of the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) ) ) : ( ( ) ( Relation-like NAT : ( ( ) ( non empty epsilon-transitive epsilon-connected ordinal ) Element of bool REAL : ( ( ) ( ) set ) : ( ( ) ( non empty ) set ) ) -defined the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) -valued Function-like finite FinSequence-like FinSubsequence-like ) FinSequence of the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) ) : ( ( ) ( ) Element of the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) ) ) ;

theorem :: MOD_3:3
for R being ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) )
for L being ( ( ) ( Relation-like the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) -defined the carrier of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( non empty ) set ) -valued Function-like quasi_total ) Linear_Combination of V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) )
for a being ( ( ) ( ) Scalar of ( ( ) ( non empty ) set ) ) holds Sum (a : ( ( ) ( ) Scalar of ( ( ) ( non empty ) set ) ) * L : ( ( ) ( Relation-like the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) -defined the carrier of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( non empty ) set ) -valued Function-like quasi_total ) Linear_Combination of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) ) : ( ( ) ( Relation-like the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) -defined the carrier of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( non empty ) set ) -valued Function-like quasi_total ) Linear_Combination of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) : ( ( ) ( ) Element of the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) ) = a : ( ( ) ( ) Scalar of ( ( ) ( non empty ) set ) ) * (Sum L : ( ( ) ( Relation-like the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) -defined the carrier of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( non empty ) set ) -valued Function-like quasi_total ) Linear_Combination of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) ) : ( ( ) ( ) Element of the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) ) : ( ( ) ( ) Element of the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) ) ;

definition
let R be ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ;
let V be ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ;
let A be ( ( ) ( ) Subset of ) ;
func Lin A -> ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of V : ( ( ) ( ) 1-sorted ) ) means :: MOD_3:def 1
the carrier of it : ( ( Function-like quasi_total ) ( Relation-like [:A : ( ( ) ( ) BiModStr over R : ( ( ) ( ) 1-sorted ) ,V : ( ( ) ( ) 1-sorted ) ) ,A : ( ( ) ( ) BiModStr over R : ( ( ) ( ) 1-sorted ) ,V : ( ( ) ( ) 1-sorted ) ) :] : ( ( ) ( ) set ) -defined A : ( ( ) ( ) BiModStr over R : ( ( ) ( ) 1-sorted ) ,V : ( ( ) ( ) 1-sorted ) ) -valued Function-like quasi_total ) Element of bool [:[:A : ( ( ) ( ) BiModStr over R : ( ( ) ( ) 1-sorted ) ,V : ( ( ) ( ) 1-sorted ) ) ,A : ( ( ) ( ) BiModStr over R : ( ( ) ( ) 1-sorted ) ,V : ( ( ) ( ) 1-sorted ) ) :] : ( ( ) ( ) set ) ,A : ( ( ) ( ) BiModStr over R : ( ( ) ( ) 1-sorted ) ,V : ( ( ) ( ) 1-sorted ) ) :] : ( ( ) ( ) set ) : ( ( ) ( non empty ) set ) ) : ( ( ) ( ) set ) = { (Sum l : ( ( ) ( Relation-like the carrier of V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) -defined the carrier of R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( non empty ) set ) -valued Function-like quasi_total ) Linear_Combination of A : ( ( ) ( ) Subset of ) ) ) : ( ( ) ( ) Element of the carrier of V : ( ( ) ( ) 1-sorted ) : ( ( ) ( ) set ) ) where l is ( ( ) ( Relation-like the carrier of V : ( ( ) ( ) 1-sorted ) : ( ( ) ( ) set ) -defined the carrier of R : ( ( ) ( ) 1-sorted ) : ( ( ) ( ) set ) -valued Function-like quasi_total ) Linear_Combination of A : ( ( ) ( ) BiModStr over R : ( ( ) ( ) 1-sorted ) ,V : ( ( ) ( ) 1-sorted ) ) ) : verum } ;
end;

theorem :: MOD_3:4
for x being ( ( ) ( ) set )
for R being ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) )
for A being ( ( ) ( ) Subset of ) holds
( x : ( ( ) ( ) set ) in Lin A : ( ( ) ( ) Subset of ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b3 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b2 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) iff ex l being ( ( ) ( Relation-like the carrier of b3 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b2 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( non empty ) set ) -valued Function-like quasi_total ) Linear_Combination of A : ( ( ) ( ) Subset of ) ) st x : ( ( ) ( ) set ) = Sum l : ( ( ) ( Relation-like the carrier of b3 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b2 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( non empty ) set ) -valued Function-like quasi_total ) Linear_Combination of b4 : ( ( ) ( ) Subset of ) ) : ( ( ) ( ) Element of the carrier of b3 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b2 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) ) ) ;

theorem :: MOD_3:5
for x being ( ( ) ( ) set )
for R being ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) )
for A being ( ( ) ( ) Subset of ) st x : ( ( ) ( ) set ) in A : ( ( ) ( ) Subset of ) holds
x : ( ( ) ( ) set ) in Lin A : ( ( ) ( ) Subset of ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b3 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b2 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) ;

theorem :: MOD_3:6
for R being ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) holds Lin ({} the carrier of V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) ) : ( ( ) ( empty proper functional epsilon-transitive epsilon-connected ordinal T-Sequence-like c=-linear natural finite V35() FinSequence-membered ) Element of bool the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) = (0). V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) ;

theorem :: MOD_3:7
for R being ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) )
for A being ( ( ) ( ) Subset of ) holds
( not Lin A : ( ( ) ( ) Subset of ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) = (0). V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) or A : ( ( ) ( ) Subset of ) = {} : ( ( ) ( ) set ) or A : ( ( ) ( ) Subset of ) = {(0. V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) : ( ( ) ( V47(b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) ) Element of the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) ) } : ( ( ) ( finite ) Element of bool the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) : ( ( ) ( non empty ) set ) ) ) ;

theorem :: MOD_3:8
for R being ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) )
for A being ( ( ) ( ) Subset of )
for W being ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) st 0. R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( V47(b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) Element of the carrier of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( non empty ) set ) ) <> 1. R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( ) Element of the carrier of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( non empty ) set ) ) & A : ( ( ) ( ) Subset of ) = the carrier of W : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) : ( ( ) ( non empty ) set ) holds
Lin A : ( ( ) ( ) Subset of ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) = W : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) ;

theorem :: MOD_3:9
for R being ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring)
for V being ( ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) )
for A being ( ( ) ( ) Subset of ) st 0. R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( V47(b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) Element of the carrier of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( non empty ) set ) ) <> 1. R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( ) Element of the carrier of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) : ( ( ) ( non empty ) set ) ) & A : ( ( ) ( ) Subset of ) = the carrier of V : ( ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) holds
Lin A : ( ( ) ( ) Subset of ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) = V : ( ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ;

theorem :: MOD_3:10
for R being ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) )
for A, B being ( ( ) ( ) Subset of ) st A : ( ( ) ( ) Subset of ) c= B : ( ( ) ( ) Subset of ) holds
Lin A : ( ( ) ( ) Subset of ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) is ( ( ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of Lin B : ( ( ) ( ) Subset of ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) ) ;

theorem :: MOD_3:11
for R being ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) )
for A, B being ( ( ) ( ) Subset of ) st Lin A : ( ( ) ( ) Subset of ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) = V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) & A : ( ( ) ( ) Subset of ) c= B : ( ( ) ( ) Subset of ) holds
Lin B : ( ( ) ( ) Subset of ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) = V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ;

theorem :: MOD_3:12
for R being ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) )
for A, B being ( ( ) ( ) Subset of ) holds Lin (A : ( ( ) ( ) Subset of ) \/ B : ( ( ) ( ) Subset of ) ) : ( ( ) ( ) Element of bool the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) = (Lin A : ( ( ) ( ) Subset of ) ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) + (Lin B : ( ( ) ( ) Subset of ) ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) ;

theorem :: MOD_3:13
for R being ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) )
for A, B being ( ( ) ( ) Subset of ) holds Lin (A : ( ( ) ( ) Subset of ) /\ B : ( ( ) ( ) Subset of ) ) : ( ( ) ( ) Element of bool the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( ) ( non empty ) set ) : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) is ( ( ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of (Lin A : ( ( ) ( ) Subset of ) ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) /\ (Lin B : ( ( ) ( ) Subset of ) ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) ) ;

definition
let R be ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ;
let V be ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ;
let IT be ( ( ) ( ) Subset of ) ;
attr IT is base means :: MOD_3:def 2
( IT : ( ( ) ( ) BiModStr over R : ( ( ) ( ) 1-sorted ) ,V : ( ( ) ( ) 1-sorted ) ) is linearly-independent & Lin IT : ( ( ) ( ) BiModStr over R : ( ( ) ( ) 1-sorted ) ,V : ( ( ) ( ) 1-sorted ) ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of V : ( ( ) ( ) 1-sorted ) ) = VectSpStr(# the carrier of V : ( ( ) ( ) 1-sorted ) : ( ( ) ( ) set ) , the addF of V : ( ( ) ( ) 1-sorted ) : ( ( Function-like quasi_total ) ( Relation-like [: the carrier of V : ( ( ) ( ) 1-sorted ) : ( ( ) ( ) set ) , the carrier of V : ( ( ) ( ) 1-sorted ) : ( ( ) ( ) set ) :] : ( ( ) ( ) set ) -defined the carrier of V : ( ( ) ( ) 1-sorted ) : ( ( ) ( ) set ) -valued Function-like quasi_total ) Element of bool [:[: the carrier of V : ( ( ) ( ) 1-sorted ) : ( ( ) ( ) set ) , the carrier of V : ( ( ) ( ) 1-sorted ) : ( ( ) ( ) set ) :] : ( ( ) ( ) set ) , the carrier of V : ( ( ) ( ) 1-sorted ) : ( ( ) ( ) set ) :] : ( ( ) ( ) set ) : ( ( ) ( non empty ) set ) ) , the ZeroF of V : ( ( ) ( ) 1-sorted ) : ( ( ) ( ) Element of the carrier of V : ( ( ) ( ) 1-sorted ) : ( ( ) ( ) set ) ) , the lmult of V : ( ( ) ( ) 1-sorted ) : ( ( Function-like quasi_total ) ( Relation-like [: the carrier of R : ( ( ) ( ) 1-sorted ) : ( ( ) ( ) set ) , the carrier of V : ( ( ) ( ) 1-sorted ) : ( ( ) ( ) set ) :] : ( ( ) ( ) set ) -defined the carrier of V : ( ( ) ( ) 1-sorted ) : ( ( ) ( ) set ) -valued Function-like quasi_total ) Element of bool [:[: the carrier of R : ( ( ) ( ) 1-sorted ) : ( ( ) ( ) set ) , the carrier of V : ( ( ) ( ) 1-sorted ) : ( ( ) ( ) set ) :] : ( ( ) ( ) set ) , the carrier of V : ( ( ) ( ) 1-sorted ) : ( ( ) ( ) set ) :] : ( ( ) ( ) set ) : ( ( ) ( non empty ) set ) ) #) : ( ( strict ) ( strict ) VectSpStr over R : ( ( ) ( ) 1-sorted ) ) );
end;

definition
let R be ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ;
let IT be ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ;
attr IT is free means :: MOD_3:def 3
ex B being ( ( ) ( ) Subset of ) st B : ( ( ) ( ) Subset of ) is base ;
end;

theorem :: MOD_3:14
for R being ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) holds (0). V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ) ) is free ;

registration
let R be ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Ring) ;
cluster non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed free for ( ( ) ( ) VectSpStr over R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) doubleLoopStr ) ) ;
end;

theorem :: MOD_3:15
for R being ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) )
for v being ( ( ) ( ) Vector of ( ( ) ( non empty ) set ) ) holds
( {v : ( ( ) ( ) Vector of ( ( ) ( non empty ) set ) ) } : ( ( ) ( finite ) Element of bool the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) : ( ( ) ( non empty ) set ) : ( ( ) ( non empty ) set ) ) is linearly-independent iff v : ( ( ) ( ) Vector of ( ( ) ( non empty ) set ) ) <> 0. V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) : ( ( ) ( V47(b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) ) ) Element of the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) : ( ( ) ( non empty ) set ) ) ) ;

theorem :: MOD_3:16
for R being ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) )
for v1, v2 being ( ( ) ( ) Vector of ( ( ) ( non empty ) set ) ) holds
( v1 : ( ( ) ( ) Vector of ( ( ) ( non empty ) set ) ) <> v2 : ( ( ) ( ) Vector of ( ( ) ( non empty ) set ) ) & {v1 : ( ( ) ( ) Vector of ( ( ) ( non empty ) set ) ) ,v2 : ( ( ) ( ) Vector of ( ( ) ( non empty ) set ) ) } : ( ( ) ( finite ) Element of bool the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) : ( ( ) ( non empty ) set ) : ( ( ) ( non empty ) set ) ) is linearly-independent iff ( v2 : ( ( ) ( ) Vector of ( ( ) ( non empty ) set ) ) <> 0. V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) : ( ( ) ( V47(b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) ) ) Element of the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) : ( ( ) ( non empty ) set ) ) & ( for a being ( ( ) ( ) Scalar of ( ( ) ( non empty non trivial ) set ) ) holds v1 : ( ( ) ( ) Vector of ( ( ) ( non empty ) set ) ) <> a : ( ( ) ( ) Scalar of ( ( ) ( non empty non trivial ) set ) ) * v2 : ( ( ) ( ) Vector of ( ( ) ( non empty ) set ) ) : ( ( ) ( ) Element of the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) : ( ( ) ( non empty ) set ) ) ) ) ) ;

theorem :: MOD_3:17
for R being ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) )
for v1, v2 being ( ( ) ( ) Vector of ( ( ) ( non empty ) set ) ) holds
( ( v1 : ( ( ) ( ) Vector of ( ( ) ( non empty ) set ) ) <> v2 : ( ( ) ( ) Vector of ( ( ) ( non empty ) set ) ) & {v1 : ( ( ) ( ) Vector of ( ( ) ( non empty ) set ) ) ,v2 : ( ( ) ( ) Vector of ( ( ) ( non empty ) set ) ) } : ( ( ) ( finite ) Element of bool the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) : ( ( ) ( non empty ) set ) : ( ( ) ( non empty ) set ) ) is linearly-independent ) iff for a, b being ( ( ) ( ) Scalar of ( ( ) ( non empty non trivial ) set ) ) st (a : ( ( ) ( ) Scalar of ( ( ) ( non empty non trivial ) set ) ) * v1 : ( ( ) ( ) Vector of ( ( ) ( non empty ) set ) ) ) : ( ( ) ( ) Element of the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) : ( ( ) ( non empty ) set ) ) + (b : ( ( ) ( ) Scalar of ( ( ) ( non empty non trivial ) set ) ) * v2 : ( ( ) ( ) Vector of ( ( ) ( non empty ) set ) ) ) : ( ( ) ( ) Element of the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) : ( ( ) ( non empty ) set ) ) : ( ( ) ( ) Element of the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) : ( ( ) ( non empty ) set ) ) = 0. V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) : ( ( ) ( V47(b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) ) ) Element of the carrier of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) : ( ( ) ( non empty ) set ) ) holds
( a : ( ( ) ( ) Scalar of ( ( ) ( non empty non trivial ) set ) ) = 0. R : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) : ( ( ) ( V47(b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) ) Element of the carrier of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) : ( ( ) ( non empty non trivial ) set ) ) & b : ( ( ) ( ) Scalar of ( ( ) ( non empty non trivial ) set ) ) = 0. R : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) : ( ( ) ( V47(b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) ) Element of the carrier of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) : ( ( ) ( non empty non trivial ) set ) ) ) ) ;

theorem :: MOD_3:18
for R being ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) )
for A being ( ( ) ( ) Subset of ) st A : ( ( ) ( ) Subset of ) is linearly-independent holds
ex B being ( ( ) ( ) Subset of ) st
( A : ( ( ) ( ) Subset of ) c= B : ( ( ) ( ) Subset of ) & B : ( ( ) ( ) Subset of ) is base ) ;

theorem :: MOD_3:19
for R being ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) )
for A being ( ( ) ( ) Subset of ) st Lin A : ( ( ) ( ) Subset of ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) ) = V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) holds
ex B being ( ( ) ( ) Subset of ) st
( B : ( ( ) ( ) Subset of ) c= A : ( ( ) ( ) Subset of ) & B : ( ( ) ( ) Subset of ) is base ) ;

theorem :: MOD_3:20
for R being ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) holds V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) is free ;

definition
let R be ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ;
let V be ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) ;
mode Basis of V -> ( ( ) ( ) Subset of ) means :: MOD_3:def 4
it : ( ( ) ( ) BiModStr over R : ( ( non empty right_complementable V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty right_complementable V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) doubleLoopStr ) ,V : ( ( ) ( ) 1-sorted ) ) is base ;
end;

theorem :: MOD_3:21
for R being ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) )
for A being ( ( ) ( ) Subset of ) st A : ( ( ) ( ) Subset of ) is linearly-independent holds
ex I being ( ( ) ( ) Basis of V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) ) st A : ( ( ) ( ) Subset of ) c= I : ( ( ) ( ) Basis of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) ) ;

theorem :: MOD_3:22
for R being ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field)
for V being ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of R : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) )
for A being ( ( ) ( ) Subset of ) st Lin A : ( ( ) ( ) Subset of ) : ( ( strict ) ( non empty right_complementable strict vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) Subspace of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) ) = V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) holds
ex I being ( ( ) ( ) Basis of V : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) ) st I : ( ( ) ( ) Basis of b2 : ( ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) ( non empty right_complementable vector-distributive scalar-distributive scalar-associative scalar-unital Abelian add-associative right_zeroed ) LeftMod of b1 : ( ( non empty non degenerated right_complementable almost_left_invertible V94() well-unital V102() Abelian add-associative right_zeroed ) ( non empty non degenerated non trivial right_complementable almost_left_invertible V92() V94() right-distributive left-distributive right_unital well-unital V102() left_unital Abelian add-associative right_zeroed ) Skew-Field) ) ) c= A : ( ( ) ( ) Subset of ) ;