let R be Ring; :: thesis: for n being Nat
for G being b₁,R -linear Group holds the carrier of G c= the carrier of (GL (n,R))
let n be Nat; :: thesis: for G being n,R -linear Group holds the carrier of G c= the carrier of (GL (n,R))
let G be n,R -linear Group; :: thesis: the carrier of G c= the carrier of (GL (n,R))
multMagma(# the carrier of G, the multF of G #) is Subgroup of GL (n,R) by Def13;
hence the carrier of G c= the carrier of (GL (n,R)) by GROUP_2:def 5; :: thesis: verum