:: On Rough Subgroup of a Group
:: by Xiquan Liang and Dailu Li
::
:: Received August 7, 2009
:: Copyright (c) 2009-2018 Association of Mizar Users
:: (Stowarzyszenie Uzytkownikow Mizara, Bialystok, Poland).
:: This code can be distributed under the GNU General Public Licence
:: version 3.0 or later, or the Creative Commons Attribution-ShareAlike
:: License version 3.0 or later, subject to the binding interpretation
:: detailed in file COPYING.interpretation.
:: See COPYING.GPL and COPYING.CC-BY-SA for the full text of these
:: licenses, or see http://www.gnu.org/licenses/gpl.html and
:: http://creativecommons.org/licenses/by-sa/3.0/.
environ
vocabularies GROUP_1, XBOOLE_0, SUBSET_1, GROUP_2, PRE_TOPC, RELAT_1, TARSKI,
STRUCT_0;
notations TARSKI, XBOOLE_0, SUBSET_1, STRUCT_0, ALGSTR_0, GROUP_1, GROUP_2,
GROUP_3, GROUP_4;
constructors REALSET2, GROUP_4;
registrations XBOOLE_0, STRUCT_0, GROUP_1, GROUP_2, GROUP_3;
requirements SUBSET, BOOLE;
definitions XBOOLE_0, TARSKI;
equalities GROUP_2, GROUP_4;
expansions TARSKI;
theorems GROUP_1, GROUP_8, GROUP_2, GROUP_3, XBOOLE_0, XBOOLE_1, GROUP_4,
STRUCT_0;
begin :: Preliminaries
reserve G for Group;
reserve A,B for non empty Subset of G;
reserve N,H,H1,H2 for Subgroup of G;
reserve x,a,b for Element of G;
theorem Th1:
for N be normal Subgroup of G,x1,x2 be Element of G holds
(x1 * N) * (x2 * N) = (x1 * x2) * N
proof
let N be normal Subgroup of G,x1,x2 be Element of G;
(x1 * N) * (x2 * N) = x1 * N * x2 * N by GROUP_2:10
.= x1 * (N * x2) * N by GROUP_2:29
.= x1 * (x2 * N) * N by GROUP_3:117
.= (x1 * x2) * N * N by GROUP_2:105
.= (x1 * x2) * (N * N) by GROUP_2:29;
hence thesis by GROUP_2:76;
end;
theorem Th2:
for G being Group,N being Subgroup of G, x, y being Element of G
st y in x * N holds x * N = y * N
proof
let G be Group,N be Subgroup of G,x,y be Element of G;
assume
A1:y in x * N;
y in y * N by GROUP_2:108;
then x * N meets y * N by A1,XBOOLE_0:3;
hence thesis by GROUP_2:115;
end;
theorem Th3:
for N being Subgroup of G,H being Subgroup of G,
x being Element of G st x * N meets carr(H)
ex y being Element of G st y in x * N & y in H
proof
let N be Subgroup of G,H being Subgroup of G, x being Element of G;
assume x * N meets carr(H);
then consider y be object such that
A1: y in x * N & y in carr(H) by XBOOLE_0:3;
reconsider y as Element of G by A1;
y in H by A1,STRUCT_0:def 5;
hence thesis by A1;
end;
theorem Th4:
for x,y being Element of G, N be normal Subgroup of G
st y in N holds x * y * x" in N
proof
let x,y be Element of G, N be normal Subgroup of G;
assume y in N;
then x * y in x * N by GROUP_2:103;
then x * y in N * x by GROUP_3:117;
then consider y1 be Element of G such that
A1: x * y = y1 * x & y1 in N by GROUP_2:104;
x * y * x" = y1 * (x * x") by A1,GROUP_1:def 3
.= y1 * 1_G by GROUP_1:def 5
.= y1 by GROUP_1:def 4;
hence thesis by A1;
end;
theorem Th5:
for N be Subgroup of G
st for x,y being Element of G st y in N holds x * y * x" in N
holds N is normal
proof
let N be Subgroup of G such that
A1:for x,y being Element of G st y in N holds x * y * x" in N;
for x be Element of G holds x * N c= N * x
proof
let x be Element of G;
let z be object;
assume
A2:z in x * N;
then reconsider z as Element of G;
consider z1 be Element of G such that
A3: z = x * z1 & z1 in N by A2,GROUP_2:103;
A4: x * z1 * x" in N by A1,A3;
(x * z1 * x") * x = z by A3,GROUP_3:1;
hence thesis by A4,GROUP_2:104;
end;
hence thesis by GROUP_3:118;
end;
theorem Th6:
x in H1 * H2 iff ex a,b st x = a * b & a in H1 & b in H2
proof
thus x in H1 * H2 implies ex a,b st x = a * b & a in H1 & b in H2
proof
assume x in H1 * H2;
then consider a,b such that
A1: x = a * b & a in carr(H1) & b in carr(H2);
a in H1 & b in H2 by A1,STRUCT_0:def 5;
hence thesis by A1;
end;
given a,b such that
A2: x = a * b & a in H1 & b in H2;
a in carr(H1) & b in carr(H2) by A2,STRUCT_0:def 5;
hence thesis by A2;
end;
theorem Th7:
for G being Group, N1,N2 being strict normal Subgroup of G
ex M being strict Subgroup of G st the carrier of M = N1 * N2
proof
let G be Group, N1,N2 be strict normal Subgroup of G;
A1:1_G in N1 * N2
proof
A2: 1_G in N1 & 1_G in N2 by GROUP_2:46;
1_G * 1_G = 1_G by GROUP_1:def 4;
hence thesis by A2,Th6;
end;
A3:for x,y being Element of G holds x in N1 * N2 & y in N1 * N2
implies x * y in N1 * N2
proof
let x,y be Element of G;
assume that
A4: x in N1 * N2 and
A5: y in N1 * N2;
consider a,b be Element of G such that
A6: x = a * b & a in N1 & b in N2 by A4,Th6;
consider c,d be Element of G such that
A7: y = c * d & c in N1 & d in N2 by A5,Th6;
A8: x * y = ((a * b) * c) * d by A6,A7,GROUP_1:def 3
.= a * (b * c) * d by GROUP_1:def 3;
b * c in N2 * N1 by A6,A7,Th6;
then b * c in N1 * N2 by GROUP_3:125;
then consider b9,c9 be Element of G such that
A9: b * c = b9 * c9 & b9 in N1 & c9 in N2 by Th6;
A10: x * y = ((a * b9) * c9) * d by A8,A9,GROUP_1:def 3
.= (a * b9) * (c9 * d) by GROUP_1:def 3;
A11: a * b9 in N1 by A6,A9,GROUP_2:50;
c9* d in N2 by A7,A9,GROUP_2:50;
hence thesis by A10,A11,Th6;
end;
for x being Element of G holds x in N1 * N2 implies x" in N1 * N2
proof
let x be Element of G;
assume x in N1 * N2;
then consider a,b be Element of G such that
A12: x = a * b & a in N1 & b in N2 by Th6;
A13: x" = b" * a" by A12,GROUP_1:17;
b" in N2 & a" in N1 by A12,GROUP_2:51;
then
x" in N2 * N1 by A13,Th6;
hence thesis by GROUP_3:125;
end;
hence thesis by A1,A3,GROUP_2:52;
end;
theorem Th8:
for G being Group, N1,N2 being strict normal Subgroup of G
ex M being strict normal Subgroup of G st the carrier of M = N1 * N2
proof
let G be Group, N1,N2 be strict normal Subgroup of G;
consider M being strict Subgroup of G such that
A1:the carrier of M = N1 * N2 by Th7;
for x,y be Element of G st y in M holds x * y * x" in M
proof
let x,y be Element of G;
assume y in M;
then y in the carrier of M by STRUCT_0:def 5;
then consider a,b be Element of G such that
A2: y = a * b & a in N1 & b in N2 by A1,Th6;
A3: x * y * x" =((x * a) * b) * x" by A2,GROUP_1:def 3
.=(x * a) * (b * x") by GROUP_1:def 3
.=(x * a) * 1_G * (b * x") by GROUP_1:def 4
.=(x * a) * (x" * x) * (b * x") by GROUP_1:def 5
.=(x * a) * x" * x * (b * x") by GROUP_1:def 3
.=((x * a) * x") * (x * (b * x")) by GROUP_1:def 3
.=(x * a * x") * (x * b * x") by GROUP_1:def 3;
x * a * x" in N1 & x * b * x" in N2 by A2,Th4;
then x * y * x" in N1 * N2 by A3,Th6;
hence thesis by A1,STRUCT_0:def 5;
end;
then M is normal Subgroup of G by Th5;
hence thesis by A1;
end;
theorem Th9:
for G being Group, N,N1,N2 being Subgroup of G st
the carrier of N = N1 * N2 holds N1 is Subgroup of N & N2 is Subgroup of N
proof
let G be Group, N,N1,N2 be Subgroup of G;
assume
A1:the carrier of N = N1 * N2;
for x be Element of G st x in N1 holds x in N
proof
let x be Element of G;
assume
A2: x in N1;
A3: 1_ G in N2 by GROUP_2:46;
x = x * 1_ G by GROUP_1:def 4;
then x in N1 * N2 by A2,A3,Th6;
hence thesis by A1,STRUCT_0:def 5;
end;
hence N1 is Subgroup of N by GROUP_2:58;
for y be Element of G st y in N2 holds y in N
proof
let y be Element of G;
assume
A4: y in N2;
A5: 1_ G in N1 by GROUP_2:46;
y = 1_ G * y by GROUP_1:def 4;
then y in N1 * N2 by A4,A5,Th6;
hence thesis by A1,STRUCT_0:def 5;
end;
hence N2 is Subgroup of N by GROUP_2:58;
end;
theorem Th10:
for N,N1,N2 be normal Subgroup of G,a,b be Element of G st
the carrier of N = N1 * N2 holds (a * N1) * (b * N2) = (a * b) * N
proof
let N,N1,N2 be normal Subgroup of G;
let a,b be Element of G;
assume
A1: the carrier of N = N1 * N2;
(a * N1) * (b * N2) = a * N1 * b * N2 by GROUP_2:10
.= a * (N1 * b) * N2 by GROUP_2:29
.= a * (b * N1) * N2 by GROUP_3:117
.= (a * b) * N1 * N2 by GROUP_2:105
.= (a * b) * (N1 * N2) by GROUP_4:45;
hence thesis by A1;
end;
theorem
for N being normal Subgroup of G for x holds x * N * x" c= carr(N)
proof
let N be normal Subgroup of G;
let x;
x * N c= N * x by GROUP_3:118; then
A1: x * N * x" c= N * x * x" by GROUP_3:5;
N * x * x" = N * (x * x") by GROUP_2:107
.= N * 1_G by GROUP_1:def 5;
hence thesis by A1,GROUP_2:109;
end;
definition
let G be Group, A be Subset of G;
let N be Subgroup of G;
func N ` A -> Subset of G equals
{x where x is Element of G: x * N c= A};
correctness
proof
{x where x is Element of G : x * N c= A} c= the carrier of G
proof
let y be object;
assume y in {x where x is Element of G: x * N c= A};
then ex x being Element of G st y = x & x * N c= A;
hence thesis;
end;
hence thesis;
end;
func N ~ A -> Subset of G equals
{x where x is Element of G : x * N meets A};
correctness
proof
{x where x is Element of G : x * N meets A} c= the carrier of G
proof
let y be object;
assume y in {x where x is Element of G : x * N meets A};
then ex x being Element of G st y = x & x * N meets A;
hence thesis;
end;
hence thesis;
end;
end;
theorem Th12:
for x being Element of G st x in N ` A holds x * N c= A
proof
let x be Element of G;
assume x in N ` A;
then ex x1 being Element of G st x1 = x & x1 * N c= A;
hence thesis;
end;
theorem
for x being Element of G st x * N c= A holds x in N ` A;
theorem Th14:
for x being Element of G st x in N ~ A holds x * N meets A
proof
let x be Element of G;
assume x in N ~ A;
then ex x1 being Element of G st x = x1 & x1 * N meets A;
hence thesis;
end;
theorem
for x being Element of G st x * N meets A holds x in N ~ A;
theorem Th16:
N ` A c= A
proof
let x be object;
assume x in N ` A;
then consider y being Element of G such that
A1: y = x & y * N c= A;
y in y * N by GROUP_2:108;
hence thesis by A1;
end;
theorem Th17:
A c= N ~ A
proof
let x be object;
assume
A1: x in A;
then reconsider x9 = x as Element of G;
x9 in x9 * N by GROUP_2:108;
then x9 * N meets A by A1,XBOOLE_0:3;
hence thesis;
end;
theorem Th18:
N ` A c= N ~ A
proof
A1: N ` A c= A by Th16;
A c= N ~ A by Th17;
hence thesis by A1;
end;
theorem
N ~ (A \/ B) = N ~ A \/ N ~ B
proof
thus N ~ (A \/ B) c= N ~ A \/ N ~ B
proof
let x be object;
assume
A1: x in N ~ (A \/ B);
then reconsider x as Element of G;
x * N meets (A \/ B) by A1,Th14;
then x * N meets A or x * N meets B by XBOOLE_1:70;
then x in N ~ A or x in N ~ B;
hence thesis by XBOOLE_0:def 3;
end;
let x be object;
assume
A2:x in N ~ A \/ N ~ B;
then reconsider x as Element of G;
x in N ~ A or x in N ~ B by A2,XBOOLE_0:def 3;
then
x * N meets A or x * N meets B by Th14;
then x * N meets (A \/ B) by XBOOLE_1:70;
hence thesis;
end;
theorem
N ` (A /\ B) = N ` A /\ N ` B
proof
thus N ` (A /\ B) c= N ` A /\ N ` B
proof
let x be object;
assume
A1: x in N ` (A /\ B);
then reconsider x as Element of G;
consider x1 being Element of G such that
A2: x1 = x & x1 * N c= A /\ B by A1;
x * N c= A & x * N c= B by A2,XBOOLE_1:18;
then x in N ` A & x in N ` B;
hence thesis by XBOOLE_0:def 4;
end;
let x be object;
assume
A3: x in N ` A /\ N ` B;
then reconsider x as Element of G;
x in N ` A & x in N ` B by A3,XBOOLE_0:def 4;
then x * N c= A & x * N c= B by Th12;
then x * N c= A /\ B by XBOOLE_1:19;
hence thesis;
end;
theorem
A c= B implies N ` A c= N ` B
proof
assume
A1: A c= B;
let x be object;
assume
A2: x in N ` A;
then reconsider x as Element of G;
x * N c= A by A2,Th12;
then x * N c= B by A1;
hence thesis;
end;
theorem
A c= B implies N ~ A c= N ~ B
proof
assume
A1: A c= B;
let x be object;
assume
A2: x in N ~ A;
then reconsider x as Element of G;
x * N meets A by A2,Th14;
then x * N meets B by A1,XBOOLE_1:63;
hence thesis;
end;
theorem
N ` A \/ N ` B c= N ` (A \/ B)
proof
let x be object;
assume
A1: x in N ` A \/ N ` B;
then reconsider x as Element of G;
per cases by A1,XBOOLE_0:def 3;
suppose x in N ` A;
then x * N c= A \/ B by Th12,XBOOLE_1:10;
hence thesis;
end;
suppose x in N ` B;
then x * N c= A \/ B by Th12,XBOOLE_1:10;
hence thesis;
end;
end;
theorem
N ~ (A \/ B)= N ~ A \/ N ~ B
proof
thus N ~ (A \/ B) c= N ~ A \/ N ~ B
proof
let x be object;
assume
A1: x in N ~ (A \/ B);
then reconsider x as Element of G;
x * N meets (A \/ B) by A1,Th14;
then x * N meets A or x * N meets B by XBOOLE_1:70;
then x in N ~ A or x in N ~ B;
hence thesis by XBOOLE_0:def 3;
end;
let x be object;
assume
A2: x in N ~ A \/ N ~ B;
then reconsider x as Element of G;
x in N ~ A or x in N ~ B by A2,XBOOLE_0:def 3;
then x * N meets A or x * N meets B by Th14;
then x * N meets (A \/ B) by XBOOLE_1:70;
hence thesis;
end;
theorem Th25:
N is Subgroup of H implies H ` A c= N ` A
proof
assume
A1: N is Subgroup of H;
let x be object;
assume
A2: x in H ` A;
then reconsider x as Element of G;
A3: x * N c= x * H by A1,GROUP_3:6;
x * H c= A by A2,Th12;
then x * N c= A by A3;
hence thesis;
end;
theorem Th26:
N is Subgroup of H implies N ~ A c= H ~ A
proof
assume
A1: N is Subgroup of H;
let x be object;
assume
A2: x in N ~ A;
then reconsider x as Element of G;
x * N meets A by A2,Th14;
then x * H meets A by A1,GROUP_3:6,XBOOLE_1:63;
hence thesis;
end;
theorem
for G be Group, A,B be non empty Subset of G, N be normal Subgroup of G
holds N ` A * N ` B c= N ` (A * B)
proof
let G be Group, A,B be non empty Subset of G,
N be normal Subgroup of G;
let x be object;
assume
A1: x in N ` A * N ` B;
then reconsider x as Element of G;
consider x1, x2 be Element of G such that
A2: x = x1 * x2 & x1 in N ` A & x2 in N ` B by A1;
x1 * N c= A & x2 * N c= B by A2,Th12;
then (x1 * N) * (x2 * N) c= A * B by GROUP_3:4;
then (x1 * x2) * N c= A * B by Th1;
hence thesis by A2;
end;
theorem Th28:
for x being Element of G st x in N ~ (A * B) holds x * N meets A * B
proof
let x be Element of G;
assume x in N ~ (A * B);
then consider x1 being Element of G such that
A1: x = x1 & x1 * N meets A * B;
thus thesis by A1;
end;
theorem
for G be Group, A,B be non empty Subset of G, N be normal Subgroup of G
holds N ~ A * N ~ B = N ~ (A * B)
proof
let G be Group, A,B be non empty Subset of G,
N be normal Subgroup of G;
thus N ~ A * N ~ B c= N ~ (A * B)
proof
let x be object;
assume
A1: x in N ~ A * N ~ B;
then reconsider x as Element of G;
consider x1, x2 be Element of G such that
A2: x = x1 * x2 & x1 in N ~ A & x2 in N ~ B by A1;
A3: x1 * N meets A by A2,Th14;
A4: x2 * N meets B by A2,Th14;
consider x19 be object such that
A5: x19 in x1 * N & x19 in A by A3,XBOOLE_0:3;
consider x29 be object such that
A6: x29 in x2 * N & x29 in B by A4,XBOOLE_0:3;
reconsider x19 as Element of G by A5;
reconsider x29 as Element of G by A6;
A7: x19 * x29 in A * B by A5,A6;
x19 * x29 in (x1 * N) * (x2 * N) by A5,A6;
then (x1 * N) * (x2 * N) meets A * B by A7,XBOOLE_0:3;
then (x1 * x2) * N meets A * B by Th1;
hence thesis by A2;
end;
let x be object;
assume
A8: x in N ~ (A * B);
then reconsider x as Element of G;
x * N meets A * B by A8,Th28;
then consider x1 be object such that
A9: x1 in x * N & x1 in A * B by XBOOLE_0:3;
reconsider x1 as Element of G by A9;
consider y1, y2 be Element of G such that
A10: x1 = y1 * y2 & y1 in A & y2 in B by A9;
x * N = (y1 * y2) * N by A9,A10,Th2
.= (y1 * N) * (y2 * N) by Th1;
then x in (y1 * N) * (y2 * N) by GROUP_2:108;
then consider g1, g2 be Element of G such that
A11: x = g1 * g2 & g1 in y1 * N & g2 in y2 * N;
y1 * N = g1 * N & y2 * N = g2 * N by A11,Th2;
then y1 in g1 * N & y2 in g2 * N by GROUP_2:108;
then g1 * N meets A & g2 * N meets B by A10,XBOOLE_0:3;
then g1 in N ~ A & g2 in N ~ B;
hence thesis by A11;
end;
theorem Th30:
for x being Element of G st x in N ~ (N ` (N ~ A))
holds x * N meets N ` (N ~ A)
proof
let x be Element of G;
assume x in N ~ (N ` (N ~ A));
then ex x1 being Element of G st x = x1 & x1 * N meets N ` (N ~ A);
hence thesis;
end;
theorem Th31:
for x being Element of G st x in N ` (N ~ A) holds x * N c= N ~ A
proof
let x be Element of G;
assume x in N ` (N ~ A);
then ex x1 being Element of G st x1 = x & x1 * N c= N ~ A;
hence thesis;
end;
theorem Th32:
for x being Element of G st x in N ~ (N ~ A) holds x * N meets N ~ A
proof
let x be Element of G;
assume x in N ~ (N ~ A);
then ex x1 being Element of G st x = x1 & x1 * N meets N ~ A;
hence thesis;
end;
theorem Th33:
for x being Element of G st x in N ~ (N ` A) holds x * N meets N ` A
proof
let x be Element of G;
assume x in N ~ (N ` A);
then ex x1 being Element of G st x = x1 & x1 * N meets N ` A;
hence thesis;
end;
theorem Th34:
N ` (N ` A) = N ` A
proof
thus N ` (N ` A) c= N ` A
proof
let x be object;
assume x in N ` (N ` A);
then consider y being Element of G such that
A1: y = x & y * N c= N ` A;
y in y * N by GROUP_2:108;
hence thesis by A1;
end;
let x be object;
assume
A2: x in N ` A;
then reconsider x9 = x as Element of G;
A3: x9 * N c= A by A2,Th12;
x9 * N c= N ` A
proof
let y be object;
assume
A4: y in x9 * N;
then reconsider y9 = y as Element of G;
x9 * N = y9 * N by A4,Th2;
hence thesis by A3;
end;
hence thesis;
end;
theorem Th35:
N ~ A = N ~ (N ~ A)
proof
thus N ~ A c= N ~ (N ~ A)
proof
let x be object;
assume
A1: x in N ~ A;
then reconsider x as Element of G;
x in x * N by GROUP_2:108;
then x * N meets N ~ A by A1,XBOOLE_0:3;
hence thesis;
end;
let x be object;
assume
A2:x in N ~ (N ~ A);
then reconsider x9 = x as Element of G;
x9 * N meets N ~ A by A2,Th32;
then consider y be object such that
A3:y in x9 * N & y in N ~ A by XBOOLE_0:3;
reconsider y9 = y as Element of G by A3;
A4:y9 * N meets A by A3,Th14;
y9 * N = x9 * N by A3,Th2;
hence thesis by A4;
end;
theorem
N ` (N ` A) c= N ~ (N ~ A)
proof
N ` A c= N ~ A by Th18;
then N ` (N ` A) c= N ~ A by Th34;
hence thesis by Th35;
end;
theorem
N ~ (N ` A) c= A
proof
let x be object;
assume
A1:x in N ~ (N ` A);
then reconsider x9 = x as Element of G;
x9 * N meets N ` A by A1,Th33;
then consider y being object such that
A2:y in x9 * N & y in N ` A by XBOOLE_0:3;
reconsider y9 = y as Element of G by A2;
y9 * N c= A by A2,Th12; then
A3:x9 * N c= A by A2,Th2;
x9 in x9 * N by GROUP_2:108;
hence thesis by A3;
end;
theorem
N ` (N ~ (N ` A)) = N ` A
proof
thus N ` (N ~ (N ` A)) c= N ` A
proof
let x be object;
assume x in N ` (N ~ (N ` A));
then consider x1 being Element of G such that
A1: x1 = x & x1 * N c= N ~ (N ` A);
x1 in x1 * N by GROUP_2:108;
then x1 * N meets N ` A by A1,Th33;
then consider y be object such that
A2: y in x1 * N & y in N ` A by XBOOLE_0:3;
reconsider y as Element of G by A2;
y * N c= A by A2,Th12;
then x1 * N c= A by A2,Th2;
hence thesis by A1;
end;
let x be object;
assume
A3: x in N ` A;
then reconsider x as Element of G;
x * N c= N ~ (N ` A)
proof
let y be object;
assume
A4: y in x * N;
then reconsider y as Element of G;
y * N = x * N by A4,Th2;
then x in y * N by GROUP_2:108;
then y * N meets N ` A by A3,XBOOLE_0:3;
hence thesis;
end;
hence thesis;
end;
theorem Th39:
A c= N ` (N ~ A) implies N ~ A c= N ~ (N `(N ~ A))
proof
assume
A1: A c= N ` (N ~ A);
let x be object;
assume
A2: x in N ~ A;
then reconsider x as Element of G;
x * N meets A by A2,Th14;
then x * N meets N ` (N ~ A) by A1,XBOOLE_1:63;
hence thesis;
end;
theorem
N ~ (N `(N ~ A)) = N ~ A
proof
thus N ~ (N `(N ~ A)) c= N ~ A
proof
let x be object;
assume
A1: x in N ~ (N ` (N ~ A));
then reconsider x as Element of G;
x * N meets N ` (N ~ A) by A1,Th30;
then consider y being object such that
A2: y in x * N & y in N ` (N ~ A) by XBOOLE_0:3;
reconsider y as Element of G by A2;
y * N c= N ~ A by A2,Th31;
then
A3: x * N c= N ~ A by A2,Th2;
x in x * N by GROUP_2:108;
hence thesis by A3;
end;
thus N ~ A c= N ~ (N `(N ~ A))
proof
A c= N ` (N ~ A)
proof
let x be object;
assume
A4: x in A;
then reconsider x as Element of G;
x * N c= N ~ A
proof
let y be object;
assume
A5: y in x * N;
then reconsider y as Element of G;
y * N = x * N by A5,Th2;
then x in y * N by GROUP_2:108;
then y * N meets A by A4,XBOOLE_0:3;
hence thesis;
end;
hence thesis;
end;
hence thesis by Th39;
end;
end;
theorem Th41:
for x being Element of G st x in N ` (N ` A) holds x * N c= N ` A
proof
let x be Element of G;
assume x in N ` (N ` A);
then ex x1 being Element of G st x1 = x & x1 * N c= N ` A;
hence thesis;
end;
theorem
N `(N ` A) = N ~ (N ` A)
proof
thus N `(N ` A) c= N ~ (N ` A)
proof
let x be object;
assume
A1: x in N `(N ` A);
then reconsider x as Element of G;
A2: x * N c= N ` A by A1,Th41;
x in x * N by GROUP_2:108;
then x * N meets N ` A by A2,XBOOLE_0:3;
hence thesis;
end;
let x be object;
assume
A3:x in N ~ (N ` A);
then reconsider x as Element of G;
x * N meets N ` A by A3,Th33;
then consider z being object such that
A4:z in x * N & z in N ` A by XBOOLE_0:3;
reconsider z as Element of G by A4;
z * N c= A by A4,Th12;
then
A5: x * N c= A by A4,Th2;
x * N c= N ` A
proof
let y be object;
assume
A6: y in x * N;
then reconsider y as Element of G;
x * N = y * N by A6,Th2;
hence thesis by A5;
end;
hence thesis;
end;
theorem
N ~ (N ~ A) = N `(N ~ A)
proof
thus N ~ (N ~ A) c= N `(N ~ A)
proof
let x be object;
assume
A1: x in N ~ (N ~ A);
then reconsider x as Element of G;
x * N meets N ~ A by A1,Th32;
then consider z being object such that
A2: z in x * N & z in N ~ A by XBOOLE_0:3;
reconsider z as Element of G by A2;
z * N meets A by A2,Th14;
then
A3: x * N meets A by A2,Th2;
x * N c= N ~ A
proof
let y be object;
assume
A4: y in x * N;
then reconsider y as Element of G;
x * N = y * N by A4,Th2;
hence thesis by A3;
end;
hence thesis;
end;
let x be object;
assume
A5: x in N ` (N ~ A);
then reconsider x as Element of G;
A6: x * N c= N ~ A by A5,Th31;
x in x * N by GROUP_2:108;
then x * N meets N ~ A by A6,XBOOLE_0:3;
hence thesis;
end;
theorem
for N,N1,N2 be Subgroup of G st N = N1 /\ N2 holds N ~ A c= N1 ~ A /\ N2 ~ A
proof
let N, N1,N2 be Subgroup of G;
assume N = N1 /\ N2; then
A1:N is Subgroup of N1 & N is Subgroup of N2 by GROUP_2:88;
let x be object;
assume
A2: x in N ~ A;
N ~ A c= N1 ~ A & N ~ A c= N2 ~ A by A1,Th26;
hence thesis by A2,XBOOLE_0:def 4;
end;
theorem
for N,N1,N2 be Subgroup of G st N = N1 /\ N2 holds N1 ` A /\ N2 ` A c= N ` A
proof
let N,N1,N2 be Subgroup of G;
assume N = N1 /\ N2; then
A1:N is Subgroup of N1 & N is Subgroup of N2 by GROUP_2:88;
let x be object;
assume x in N1 ` A /\ N2 ` A; then
A2: x in N1 ` A & x in N2 ` A by XBOOLE_0:def 4;
N1 ` A c= N ` A & N2 ` A c= N ` A by A1,Th25;
hence thesis by A2;
end;
theorem
for N1,N2 be strict normal Subgroup of G
ex N being strict normal Subgroup of G
st the carrier of N = N1 * N2 & N ` A c= N1 ` A /\ N2 ` A
proof
let N1,N2 be strict normal Subgroup of G;
consider N be strict normal Subgroup of G such that
A1:the carrier of N = N1 * N2 by Th8;
N1 is Subgroup of N & N2 is Subgroup of N by A1,Th9; then
A2: N ` A c= N1 ` A & N ` A c= N2 ` A by Th25;
N ` A c= N1 ` A /\ N2 ` A
by A2,XBOOLE_0:def 4;
hence thesis by A1;
end;
theorem
for N1,N2 be strict normal Subgroup of G ex N being strict normal
Subgroup of G st the carrier of N = N1 * N2 & N1 ~ A \/ N2 ~ A c= N ~ A
proof
let N1,N2 be strict normal Subgroup of G;
consider N be strict normal Subgroup of G such that
A1:the carrier of N = N1 * N2 by Th8;
N1 is Subgroup of N & N2 is Subgroup of N by A1,Th9; then
A2: N1 ~ A c= N ~ A & N2 ~ A c= N ~ A by Th26;
N1 ~ A \/ N2 ~ A c= N ~ A
proof
let x be object;
assume x in N1 ~ A \/ N2 ~ A;
then x in N1 ~ A or x in N2 ~ A by XBOOLE_0:def 3;
hence thesis by A2;
end;
hence thesis by A1;
end;
theorem
for N1,N2 be strict normal Subgroup of G
ex N being strict normal Subgroup of G st the carrier of N = N1 * N2 &
N ~ A c= ((N1 ~ A) * N2) /\ ((N2 ~ A) * N1)
proof
let N1,N2 be strict normal Subgroup of G;
consider N be strict normal Subgroup of G such that
A1:the carrier of N = N1 * N2 by Th8;
N ~ A c= ((N1 ~ A) * N2) /\ ((N2 ~ A) * N1)
proof
let x be object;
assume
A2: x in N ~ A;
then reconsider x as Element of G;
x * N meets A by A2,Th14;
then consider x1 be object such that
A3: x1 in x * N & x1 in A by XBOOLE_0:3;
reconsider x1 as Element of G by A3;
consider y be Element of G such that
A4: x1 = x * y & y in N by A3,GROUP_2:103;
A5: y in N1 * N2 by A1,A4,STRUCT_0:def 5;
then consider a,b be Element of G such that
A6: y = a * b & a in N1 & b in N2 by Th6;
A7: x1 = x * a * b by A4,A6,GROUP_1:def 3;
a in carr(N1) by A6,STRUCT_0:def 5;
then
A8: x * a * b in x * N1 * b by GROUP_8:15;
x * N1 * b = x * (N1 * b) by GROUP_2:106
.= x * (b * N1) by GROUP_3:117
.= (x * b) * N1 by GROUP_2:105;
then (x * b) * N1 meets A by A3,A7,A8,XBOOLE_0:3;
then
A9: x * b in N1 ~ A;
A10:(x * b) * b" = x * (b * b") by GROUP_1:def 3
.= x * 1_G by GROUP_1:def 5
.= x by GROUP_1:def 4;
b" in N2 by A6,GROUP_2:51;
then
A11:x in (N1 ~ A) * N2 by A9,A10,GROUP_2:94;
y in N2 * N1 by A5,GROUP_3:125;
then consider a,b be Element of G such that
A12: y = a * b & a in N2 & b in N1 by Th6;
A13: x1 = x * a * b by A4,A12,GROUP_1:def 3;
a in carr(N2) by A12,STRUCT_0:def 5;
then
A14: x * a * b in x * N2 * b by GROUP_8:15;
x * N2 * b = x * (N2 * b) by GROUP_2:106
.= x * (b * N2) by GROUP_3:117
.= (x * b) * N2 by GROUP_2:105;
then (x * b) * N2 meets A by A3,A13,A14,XBOOLE_0:3;
then
A15: x * b in N2 ~ A;
A16:(x * b) * b" = x * (b * b") by GROUP_1:def 3
.= x * 1_G by GROUP_1:def 5
.= x by GROUP_1:def 4;
b" in N1 by A12,GROUP_2:51;
then x in (N2 ~ A) * N1 by A15,A16,GROUP_2:94;
hence thesis by A11,XBOOLE_0:def 4;
end;
hence thesis by A1;
end;
reserve N1,N2 for Subgroup of G;
definition
let G be Group, H, N be Subgroup of G;
func N ` H -> Subset of G equals
{x where x is Element of G: x * N c= carr(H)};
coherence
proof
{x where x is Element of G : x * N c= carr(H)} c= the carrier of G
proof
let y be object;
assume y in {x where x is Element of G : x * N c= carr(H)};
then ex x being Element of G st y = x & x * N c= carr(H);
hence thesis;
end;
hence thesis;
end;
func N ~ H -> Subset of G equals
{x where x is Element of G : x * N meets carr(H)};
coherence
proof
{x where x is Element of G : x * N meets carr(H)} c= the carrier of G
proof
let y be object;
assume y in {x where x is Element of G : x * N meets carr(H)};
then ex x being Element of G st y = x & x * N meets carr(H);
hence thesis;
end;
hence thesis;
end;
end;
theorem Th49:
for x being Element of G st x in N ` H holds x * N c= carr(H)
proof
let x be Element of G;
assume x in N ` H;
then ex x1 being Element of G st x1 = x & x1 * N c= carr(H);
hence thesis;
end;
theorem
for x being Element of G st x * N c= carr(H) holds x in N ` H;
theorem Th51:
for x being Element of G st x in N ~ H holds x * N meets carr(H)
proof
let x be Element of G;
assume x in N ~ H;
then ex x1 being Element of G st x = x1 & x1 * N meets carr(H);
hence thesis;
end;
theorem
for x being Element of G st x * N meets carr(H) holds x in N ~ H;
theorem Th53:
N ` H c= carr(H)
proof
let x be object;
assume x in N ` H;
then consider y1 being Element of G such that
A1: y1 = x & y1 * N c= carr(H);
y1 in y1 * N by GROUP_2:108;
hence thesis by A1;
end;
theorem Th54:
carr(H) c= N ~ H
proof
let x be object;
assume x in carr(H);
then reconsider x as Element of H;
reconsider x as Element of G by GROUP_2:42;
x in x * N by GROUP_2:108;
then x * N meets carr(H) by XBOOLE_0:3;
hence thesis;
end;
theorem Th55:
N ` H c= N ~ H
proof
A1: N ` H c= carr(H) by Th53;
carr(H) c= N ~ H by Th54;
hence thesis by A1;
end;
theorem Th56:
H1 is Subgroup of H2 implies N ~ H1 c= N ~ H2
proof
assume H1 is Subgroup of H2; then
A1: carr(H1) c= carr(H2) by GROUP_2:def 5;
let x be object;
assume
A2: x in N ~ H1;
then reconsider x as Element of G;
x * N meets carr(H1) by A2,Th51;
then x * N meets carr(H2) by A1,XBOOLE_1:63;
hence thesis;
end;
theorem Th57:
N1 is Subgroup of N2 implies N1 ~ H c= N2 ~ H
proof
assume
A1:N1 is Subgroup of N2;
let x be object;
assume
A2: x in N1 ~ H;
then reconsider x as Element of G;
x * N1 meets carr(H) by A2,Th51;
then x * N2 meets carr(H) by A1,GROUP_3:6,XBOOLE_1:63;
hence thesis;
end;
theorem
N1 is Subgroup of N2 implies N1 ~ N1 c= N2 ~ N2
proof
assume
A1: N1 is Subgroup of N2; then
A2: N2 ~ N1 c= N2 ~ N2 by Th56;
N1 ~ N1 c= N2 ~ N1 by A1,Th57;
hence thesis by A2;
end;
theorem Th59:
H1 is Subgroup of H2 implies N ` H1 c= N ` H2
proof
assume H1 is Subgroup of H2; then
A1: carr(H1) c= carr(H2) by GROUP_2:def 5;
let x be object;
assume
A2: x in N ` H1;
then reconsider x as Element of G;
x * N c= carr(H1) by A2,Th49;
then x * N c= carr(H2) by A1;
hence thesis;
end;
theorem Th60:
N1 is Subgroup of N2 implies N2 ` H c= N1 ` H
proof
assume
A1: N1 is Subgroup of N2;
let x be object;
assume
A2: x in N2 ` H;
then reconsider x as Element of G;
A3: x * N1 c= x * N2 by A1,GROUP_3:6;
x * N2 c= carr(H) by A2,Th49;
then x * N1 c= carr(H) by A3;
hence thesis;
end;
theorem
N1 is Subgroup of N2 implies N2 ` N1 c= N1 ` N2
proof
assume
A1: N1 is Subgroup of N2; then
A2: N2 ` N1 c= N2 ` N2 by Th59;
N2 ` N2 c= N1 ` N2 by A1,Th60;
hence thesis by A2;
end;
theorem
for N be normal Subgroup of G holds N ` H1 * N ` H2 c= N ` (H1 * H2)
proof
let N be normal Subgroup of G;
let x be object;
assume
A1: x in N ` H1 * N ` H2;
then reconsider x as Element of G;
consider x1, x2 be Element of G such that
A2: x = x1 * x2 & x1 in N ` H1 & x2 in N ` H2 by A1;
x1 * N c= carr(H1) & x2 * N c= carr(H2) by A2,Th49;
then (x1 * N) * (x2 * N) c= carr(H1) * carr(H2) by GROUP_3:4;
then (x1 * x2) * N c= carr(H1) * carr(H2) by Th1;
hence thesis by A2;
end;
theorem
for N be normal Subgroup of G holds N ~ H1 * N ~ H2 = N ~ (H1 * H2)
proof
let N be normal Subgroup of G;
thus N ~ H1 * N ~ H2 c= N ~ (H1 * H2)
proof
let x be object;
assume
A1: x in N ~ H1 * N ~ H2;
then reconsider x as Element of G;
consider x1, x2 be Element of G such that
A2: x = x1 * x2 & x1 in N ~ H1 & x2 in N ~ H2 by A1;
A3: x1 * N meets carr(H1) by A2,Th51;
A4: x2 * N meets carr(H2) by A2,Th51;
consider x19 be object such that
A5: x19 in x1 * N & x19 in carr(H1) by A3,XBOOLE_0:3;
consider x29 be object such that
A6: x29 in x2 * N & x29 in carr(H2) by A4,XBOOLE_0:3;
reconsider x19 as Element of G by A5;
reconsider x29 as Element of G by A6;
A7: x19 * x29 in carr(H1) * carr(H2) by A5,A6;
x19 * x29 in (x1 * N) * (x2 * N) by A5,A6;
then (x1 * N) * (x2 * N) meets carr(H1) * carr(H2) by A7,XBOOLE_0:3;
then (x1 * x2) * N meets carr(H1) * carr(H2) by Th1;
hence thesis by A2;
end;
let x be object;
assume
A8: x in N ~ (H1 * H2);
then reconsider x as Element of G;
x * N meets carr(H1) * carr(H2) by A8,Th28;
then consider x1 be object such that
A9: x1 in x * N & x1 in carr(H1) * carr(H2) by XBOOLE_0:3;
reconsider x1 as Element of G by A9;
consider y1, y2 be Element of G such that
A10: x1 = y1 * y2 & y1 in carr(H1) & y2 in carr(H2) by A9;
x * N = (y1 * y2) * N by A9,A10,Th2
.= (y1 * N) * (y2 * N) by Th1;
then x in (y1 * N) * (y2 * N) by GROUP_2:108;
then consider g1, g2 be Element of G such that
A11: x = g1 * g2 & g1 in y1 * N & g2 in y2 * N;
y1 * N = g1 * N & y2 * N = g2 * N by A11,Th2;
then y1 in g1 * N & y2 in g2 * N by GROUP_2:108;
then g1 * N meets carr(H1) & g2 * N meets carr(H2) by A10,XBOOLE_0:3;
then g1 in N ~ H1 & g2 in N ~ H2;
hence thesis by A11;
end;
theorem
for N,N1,N2 be Subgroup of G st N = N1 /\ N2 holds N ~ H c= N1 ~ H /\ N2 ~ H
proof
let N,N1,N2 be Subgroup of G;
assume N = N1 /\ N2; then
A1:N is Subgroup of N1 & N is Subgroup of N2 by GROUP_2:88;
let x be object;
assume
A2: x in N ~ H;
N ~ H c= N1 ~ H & N ~ H c= N2 ~ H by A1,Th57;
hence thesis by A2,XBOOLE_0:def 4;
end;
theorem
for N,N1,N2 be Subgroup of G st N = N1 /\ N2 holds N1 ` H /\ N2 ` H c= N ` H
proof
let N,N1,N2 be Subgroup of G;
assume N = N1 /\ N2; then
A1:N is Subgroup of N1 & N is Subgroup of N2 by GROUP_2:88;
let x be object;
assume x in N1 ` H /\ N2 ` H; then
A2: x in N1 ` H & x in N2 ` H by XBOOLE_0:def 4;
N1 ` H c= N ` H & N2 ` H c= N ` H by A1,Th60;
hence thesis by A2;
end;
theorem
for N1,N2 be strict normal Subgroup of G holds ex N being strict normal
Subgroup of G st the carrier of N = N1 * N2 & N ` H c= N1 ` H /\ N2 ` H
proof
let N1,N2 be strict normal Subgroup of G;
consider N be strict normal Subgroup of G such that
A1:the carrier of N = N1 * N2 by Th8;
N1 is Subgroup of N & N2 is Subgroup of N by A1,Th9; then
A2: N ` H c= N1 ` H & N ` H c= N2 ` H by Th60;
N ` H c= N1 ` H /\ N2 ` H
by A2,XBOOLE_0:def 4;
hence thesis by A1;
end;
theorem
for N1,N2 be strict normal Subgroup of G ex N being strict normal
Subgroup of G st the carrier of N = N1 * N2 & N1 ~ H \/ N2 ~ H c= N ~ H
proof
let N1,N2 be strict normal Subgroup of G;
consider N be strict normal Subgroup of G such that
A1:the carrier of N = N1 * N2 by Th8;
N1 is Subgroup of N & N2 is Subgroup of N by A1,Th9; then
A2: N1 ~ H c= N ~ H & N2 ~ H c= N ~ H by Th57;
N1 ~ H \/ N2 ~ H c= N ~ H
proof
let x be object;
assume x in N1 ~ H \/ N2 ~ H;
then x in N1 ~ H or x in N2 ~ H by XBOOLE_0:def 3;
hence thesis by A2;
end;
hence thesis by A1;
end;
theorem
for N1,N2 be strict normal Subgroup of G
ex N being strict normal Subgroup of G st
the carrier of N = N1 * N2 & N1 ` H * N2 ` H c= N ` H
proof
let N1,N2 be strict normal Subgroup of G;
consider N be strict normal Subgroup of G such that
A1:the carrier of N = N1 * N2 by Th8;
N1 ` H * N2 ` H c= N ` H
proof
let x be object;
assume
A2: x in N1 ` H * N2 ` H;
then reconsider x as Element of G;
consider a,b be Element of G such that
A3: x = a * b & a in N1 ` H & b in N2 ` H by A2;
a * N1 c= carr(H) & b * N2 c= carr(H) by A3,Th49;
then (a * N1) * (b * N2) c= carr(H) * carr(H) by GROUP_3:4; then
A4: (a * N1) * (b * N2) c= carr(H) by GROUP_2:76;
(a * N1) * (b * N2) = (a * b) * N by A1,Th10;
hence thesis by A3,A4;
end;
hence thesis by A1;
end;
theorem
for N1,N2 be strict normal Subgroup of G
ex N being strict normal Subgroup of G st
the carrier of N = N1 * N2 & N1 ~ H * N2 ~ H c= N ~ H
proof
let N1,N2 be strict normal Subgroup of G;
consider N be strict normal Subgroup of G such that
A1:the carrier of N = N1 * N2 by Th8;
N1 ~ H * N2 ~ H c= N ~ H
proof
let x be object;
assume
A2: x in N1 ~ H * N2 ~ H;
then reconsider x as Element of G;
consider a,b be Element of G such that
A3: x = a * b & a in N1 ~ H & b in N2 ~ H by A2;
A4: a * N1 meets carr(H) by A3,Th51;
A5: b * N2 meets carr(H) by A3,Th51;
consider x1 be object such that
A6: x1 in a * N1 & x1 in carr(H) by A4,XBOOLE_0:3;
consider x2 be object such that
A7: x2 in b * N2 & x2 in carr(H) by A5,XBOOLE_0:3;
reconsider x1 as Element of G by A6;
reconsider x2 as Element of G by A7;
A8: x1 * x2 in carr(H) * carr(H) by A6,A7;
A9: x1 * x2 in (a * N1) * (b * N2) by A6,A7;
carr(H) * carr(H) = carr(H) by GROUP_2:76; then
A10:(a * N1) * (b * N2) meets carr(H) by A8,A9,XBOOLE_0:3;
(a * N1) * (b * N2) = (a * b) * N by A1,Th10;
hence thesis by A3,A10;
end;
hence thesis by A1;
end;
theorem
for N1,N2 be strict normal Subgroup of G
ex N being strict normal Subgroup of G st the carrier of N = N1 * N2 &
N ~ H c= ((N1 ~ H) * N2) /\ ((N2 ~ H) * N1)
proof
let N1,N2 be strict normal Subgroup of G;
consider N be strict normal Subgroup of G such that
A1:the carrier of N = N1 * N2 by Th8;
N ~ H c= ((N1 ~ H) * N2) /\ ((N2 ~ H) * N1)
proof
let x be object;
assume
A2: x in N ~ H;
then reconsider x as Element of G;
x * N meets carr(H) by A2,Th51;
then consider x1 be object such that
A3: x1 in x * N & x1 in carr(H) by XBOOLE_0:3;
reconsider x1 as Element of G by A3;
consider y be Element of G such that
A4: x1 = x * y & y in N by A3,GROUP_2:103;
A5: y in N1 * N2 by A1,A4,STRUCT_0:def 5;
then consider a,b be Element of G such that
A6: y = a * b & a in N1 & b in N2 by Th6;
A7: x1 = x * a * b by A4,A6,GROUP_1:def 3;
a in carr(N1) by A6,STRUCT_0:def 5; then
A8: x * a * b in x * N1 * b by GROUP_8:15;
x * N1 * b = x * (N1 * b) by GROUP_2:106
.= x * (b * N1) by GROUP_3:117
.= (x * b) * N1 by GROUP_2:105;
then (x * b) * N1 meets carr(H) by A3,A7,A8,XBOOLE_0:3;
then
A9: x * b in N1 ~ H;
A10:(x * b) * b" = x * (b * b") by GROUP_1:def 3
.= x * 1_G by GROUP_1:def 5
.= x by GROUP_1:def 4;
b" in N2 by A6,GROUP_2:51; then
A11:x in (N1 ~ H) * N2 by A9,A10,GROUP_2:94;
y in N2 * N1 by A5,GROUP_3:125;
then consider a,b be Element of G such that
A12: y = a * b & a in N2 & b in N1 by Th6;
A13: x1 = x * a * b by A4,A12,GROUP_1:def 3;
a in carr(N2) by A12,STRUCT_0:def 5; then
A14: x * a * b in x * N2 * b by GROUP_8:15;
x * N2 * b = x * (N2 * b) by GROUP_2:106
.= x * (b * N2) by GROUP_3:117
.= (x * b) * N2 by GROUP_2:105;
then (x * b) * N2 meets carr(H) by A3,A13,A14,XBOOLE_0:3;
then
A15: x * b in N2 ~ H;
A16:(x * b) * b" = x * (b * b") by GROUP_1:def 3
.= x * 1_G by GROUP_1:def 5
.= x by GROUP_1:def 4;
b" in N1 by A12,GROUP_2:51;
then x in (N2 ~ H) * N1 by A15,A16,GROUP_2:94;
hence thesis by A11,XBOOLE_0:def 4;
end;
hence thesis by A1;
end;
theorem Th71:
for H being Subgroup of G, N being normal Subgroup of G
ex M being strict Subgroup of G st the carrier of M = N ~ H
proof
let H be Subgroup of G, N be normal Subgroup of G;
A1:1_G in N ~ H
proof
1_G in H by GROUP_2:46; then
A2: 1_G in carr(H) by STRUCT_0:def 5;
1_G in 1_G * N by GROUP_2:108;
then 1_G * N meets carr(H) by A2,XBOOLE_0:3;
hence thesis;
end;
A3:for x,y being Element of G holds x in N ~ H & y in N ~ H
implies x * y in N ~ H
proof
let x,y be Element of G;
assume that
A4: x in N ~ H and
A5: y in N ~ H;
consider a be Element of G such that
A6: a in x * N & a in H by A4,Th51,Th3;
consider b be Element of G such that
A7: b in y * N & b in H by A5,Th51,Th3;
(x * N) * (y * N) = (x * y) * N & (a * N) * (b * N) = (a * b) * N by Th1;
then
A8: a * b in (x * y) * N by A6,A7;
a * b in H by A6,A7,GROUP_2:50;
then a * b in carr(H) by STRUCT_0:def 5;
then (x * y) * N meets carr(H) by A8,XBOOLE_0:3;
hence thesis;
end;
for x being Element of G holds x in N ~ H implies x" in N ~ H
proof
let x be Element of G;
assume x in N ~ H;
then consider a be Element of G such that
A9:a in x * N & a in H by Th3,Th51;
consider a1 be Element of G such that
A10:a = x * a1 & a1 in N by A9,GROUP_2:103;
A11:a1" in N by A10,GROUP_2:51;
a" = a1" * x" by A10,GROUP_1:17;
then a" in N * x" by A11,GROUP_2:104; then
A12:a" in x" * N by GROUP_3:117;
a" in H by A9,GROUP_2:51;
then a" in carr(H) by STRUCT_0:def 5;
then x" * N meets carr(H) by A12,XBOOLE_0:3;
hence thesis;
end;
hence thesis by A1,A3,GROUP_2:52;
end;
theorem Th72:
for H being Subgroup of G, N being normal Subgroup of G st N is Subgroup of H
ex M being strict Subgroup of G st the carrier of M = N ` H
proof
let H be Subgroup of G, N be normal Subgroup of G;
assume
A1: N is Subgroup of H;
A2: 1_G in N ` H
proof
1_G in N by GROUP_2:46; then
A3: 1_G * N = carr(N) by GROUP_2:113;
carr(N) c= carr(H) by A1,GROUP_2:def 5;
hence thesis by A3;
end;
A4:for x,y being Element of G holds x in N ` H & y in N ` H
implies x * y in N ` H
proof
let x,y be Element of G;
assume x in N ` H & y in N ` H;
then x * N c= carr(H) & y * N c= carr(H) by Th49; then
A5: (x * N) * (y * N) c= carr(H) * carr(H) by GROUP_3:4;
A6: (x * N) * (y * N) = (x * y) * N by Th1;
carr(H) * carr(H) = carr(H) by GROUP_2:76;
hence thesis by A5,A6;
end;
for x being Element of G holds x in N ` H implies x" in N ` H
proof
let x be Element of G;
assume x in N ` H; then
A7: x * N c= carr(H) by Th49;
x in x * N by GROUP_2:108;
then x in H by A7,STRUCT_0:def 5; then
x" in H by GROUP_2:51;
then A8: x" * H = carr(H) by GROUP_2:113;
x" * N c= x" * H by A1,GROUP_3:6;
hence thesis by A8;
end;
hence thesis by A2,A4,GROUP_2:52;
end;
theorem Th73:
for H,N be normal Subgroup of G
ex M being strict normal Subgroup of G st the carrier of M = N ~ H
proof
let H,N be normal Subgroup of G;
consider M being strict Subgroup of G such that
A1: the carrier of M = N ~ H by Th71;
for x be Element of G holds x * M c= M * x
proof
let x be Element of G;
let y be object;
assume
A2: y in x * M;
then reconsider y as Element of G;
consider z be Element of G such that
A3: y = x * z & z in M by A2,GROUP_2:103;
z in the carrier of M by A3,STRUCT_0:def 5;
then consider z9 be Element of G such that
A4: z9 in z * N & z9 in H by Th3,A1,Th51;
x * z9 * x" in H by A4,Th4;
then
A5: x * z9 * x" in carr(H) by STRUCT_0:def 5;
A6: x * z9 * x" in x * (z * N) * x" by A4,GROUP_8:15;
x * (z * N) * x" = x * ((z * N) * x") by GROUP_2:33
.= x * (z * (N * x")) by GROUP_2:33
.= x * (z * (x" * N)) by GROUP_3:117
.= x * (z * x" * N) by GROUP_2:32
.= x * (z * x") * N by GROUP_2:32
.= (x * z * x") * N by GROUP_1:def 3;
then (x * z * x") * N meets carr(H) by A5,A6,XBOOLE_0:3;
then x * z * x" in N ~ H;
then
A7: x * z * x" in M by A1,STRUCT_0:def 5;
(x * z * x") * x = y by A3,GROUP_3:1;
hence thesis by A7,GROUP_2:104;
end;
then M is normal Subgroup of G by GROUP_3:118;
hence thesis by A1;
end;
theorem Th74:
for H,N being normal Subgroup of G st N is Subgroup of H
ex M being strict normal Subgroup of G st the carrier of M = N ` H
proof
let H,N be normal Subgroup of G;
assume
A1: N is Subgroup of H;
then consider M being strict Subgroup of G such that
A2: the carrier of M = N ` H by Th72;
for x be Element of G holds x * M c= M * x
proof
let x be Element of G;
let y be object;
assume
A3: y in x * M;
then reconsider y as Element of G;
consider z be Element of G such that
A4: y = x * z & z in M by A3,GROUP_2:103;
z in the carrier of M by A4,STRUCT_0:def 5;
then
A5: z * N c= carr(H) by A2,Th49;
z in z * N by GROUP_2:108;
then z in H by A5,STRUCT_0:def 5;
then x * z * x" in H by Th4;
then
A6: (x * z * x") * H = carr(H) by GROUP_2:113;
(x * z * x") * N c= (x * z * x") * H by A1,GROUP_3:6;
then x * z * x" in N ` H by A6; then
A7: x * z * x" in M by A2,STRUCT_0:def 5;
(x * z * x") * x = y by A4,GROUP_3:1;
hence thesis by A7,GROUP_2:104;
end;
then M is normal Subgroup of G by GROUP_3:118;
hence thesis by A2;
end;
theorem Th75:
for N,N1 be normal Subgroup of G st N1 is Subgroup of N
ex N2,N3 being strict normal Subgroup of G st
the carrier of N2 = N1 ~ N & the carrier of N3 = N1 ` N &
N2 ` N c= N3 ` N
proof
let N,N1 be normal Subgroup of G;
assume
A1:N1 is Subgroup of N;
consider N2 be strict normal Subgroup of G such that
A2:the carrier of N2 = N1 ~ N by Th73;
consider N3 be strict normal Subgroup of G such that
A3:the carrier of N3 = N1 ` N by A1,Th74;
N3 is Subgroup of N2 by A2,A3,Th55,GROUP_2:57;
then N2 ` N c= N3 ` N by Th60;
hence thesis by A2,A3;
end;
theorem Th76:
for N,N1 be normal Subgroup of G st N1 is Subgroup of N
ex N2,N3 being strict normal Subgroup of G st
the carrier of N2 = N1 ~ N & the carrier of N3 = N1 ` N &
N3 ~ N c= N2 ~ N
proof
let N,N1 be normal Subgroup of G;
assume
A1:N1 is Subgroup of N;
consider N2 be strict normal Subgroup of G such that
A2:the carrier of N2 = N1 ~ N by Th73;
consider N3 be strict normal Subgroup of G such that
A3:the carrier of N3 = N1 ` N by A1,Th74;
N3 is Subgroup of N2 by A2,A3,Th55,GROUP_2:57;
then N3 ~ N c= N2 ~ N by Th57;
hence thesis by A2,A3;
end;
theorem
for N,N1 be normal Subgroup of G st N1 is Subgroup of N
ex N2,N3 being strict normal Subgroup of G
st the carrier of N2 = N1 ~ N & the carrier of N3 = N1 ` N &
N2 ` N c= N3 ~ N
proof
let N,N1 be normal Subgroup of G;
assume N1 is Subgroup of N;
then consider N2,N3 be strict normal Subgroup of G such that
A1:the carrier of N2 = N1 ~ N and
A2:the carrier of N3 = N1 ` N and
A3: N2 ` N c= N3 ` N by Th75;
N3 ` N c= N3 ~ N by Th55;
hence thesis by A1,A2,A3,XBOOLE_1:1;
end;
theorem
for N,N1 be normal Subgroup of G st N1 is Subgroup of N
ex N2,N3 being strict normal Subgroup of G st
the carrier of N2 = N1 ~ N & the carrier of N3 = N1 ` N &
N3 ` N c= N2 ~ N
proof
let N,N1 be normal Subgroup of G;
assume N1 is Subgroup of N;
then consider N2,N3 be strict normal Subgroup of G such that
A1:the carrier of N2 = N1 ~ N and
A2:the carrier of N3 = N1 ` N and
A3: N3 ~ N c= N2 ~ N by Th76;
N3 ` N c= N3 ~ N by Th55;
hence thesis by A1,A2,A3,XBOOLE_1:1;
end;
theorem
for N,N1,N2 be normal Subgroup of G st N1 is Subgroup of N2
ex N3,N4 being strict normal Subgroup of G st
the carrier of N3 = N ~ N1 & the carrier of N4 = N ~ N2 &
N3 ~ N1 c= N4 ~ N1
proof
let N,N1,N2 be normal Subgroup of G;
assume
A1:N1 is Subgroup of N2;
consider N3 be strict normal Subgroup of G such that
A2:the carrier of N3 = N ~ N1 by Th73;
consider N4 be strict normal Subgroup of G such that
A3:the carrier of N4 = N ~ N2 by Th73;
N3 is Subgroup of N4 by A1,A2,A3,Th56,GROUP_2:57;
then N3 ~ N1 c= N4 ~ N1 by Th57;
hence thesis by A2,A3;
end;
theorem
for N,N1 be normal Subgroup of G ex N2 being strict normal Subgroup of G st
the carrier of N2 = N ` N & N ` N1 c= N2 ` N1
proof
let N,N1 be normal Subgroup of G;
N is Subgroup of N by GROUP_2:54;
then consider N2 be strict normal Subgroup of G such that
A1:the carrier of N2 = N ` N by Th74;
N2 is Subgroup of N by A1,Th53,GROUP_2:57;
then N ` N1 c= N2 ` N1 by Th60;
hence thesis by A1;
end;
theorem
for N,N1 be normal Subgroup of G ex N2 being strict normal Subgroup of G st
the carrier of N2 = N ~ N & N ~ N1 c= N2 ~ N1
proof
let N,N1 be normal Subgroup of G;
consider N2 be strict normal Subgroup of G such that
A1:the carrier of N2 = N ~ N by Th73;
N is Subgroup of N2 by A1,Th54,GROUP_2:57;
then N ~ N1 c= N2 ~ N1 by Th57;
hence thesis by A1;
end;