let G1 be _Graph; :: thesis: for G2 being removeDParallelEdges of G1
for G3 being DLGraphComplement of G1 holds G3 is DLGraphComplement of G2
let G2 be removeDParallelEdges of G1; :: thesis: for G3 being DLGraphComplement of G1 holds G3 is DLGraphComplement of G2
let G3 be DLGraphComplement of G1; :: thesis: G3 is DLGraphComplement of G2
consider E being RepDEdgeSelection of G1 such that
A1: G2 is inducedSubgraph of G1, the_Vertices_of G1,E by GLIB_009:def 8;
( the_Vertices_of G1 c= the_Vertices_of G1 & the_Edges_of G1 = G1 .edgesBetween (the_Vertices_of G1) ) by GLIB_000:34;
then A2: ( the_Vertices_of G2 = the_Vertices_of G1 & the_Edges_of G2 = E ) by A1, GLIB_000:def 37;
then A3: the_Vertices_of G3 = the_Vertices_of G2 by Def6;
the_Edges_of G3 misses the_Edges_of G1 by Def6;
then A4: the_Edges_of G3 misses the_Edges_of G2 by XBOOLE_1:63;

now :: thesis: for v, w being Vertex of G2 holds
( ( ex e2 being object st e2 DJoins v,w,G2 implies for e3 being object holds not e3 DJoins v,w,G3 ) & ( ( for e3 being object holds not e3 DJoins v,w,G3 ) implies ex e2 being object st e2 DJoins v,w,G2 ) )

let v, w be Vertex of G2; :: thesis: ( ( ex e2 being object st e2 DJoins v,w,G2 implies for e3 being object holds not e3 DJoins v,w,G3 ) & ( ( for e3 being object holds not e3 DJoins v,w,G3 ) implies ex e2 being object st e2 DJoins v,w,G2 ) )
A5: ( v is Vertex of G1 & w is Vertex of G1 ) by GLIB_000:def 33;
reconsider v1 = v, w1 = w as Vertex of G1 by GLIB_000:def 33;

hereby :: thesis: ( ( for e3 being object holds not e3 DJoins v,w,G3 ) implies ex e2 being object st e2 DJoins v,w,G2 )

given e2 being object such that A6: e2 DJoins v,w,G2 ; :: thesis: for e3 being object holds not e3 DJoins v,w,G3
A7: e2 DJoins v,w,G1 by A6, GLIB_000:72;
given e3 being object such that A8: e3 DJoins v,w,G3 ; :: thesis: contradiction
thus contradiction by A7, A8, Th46; :: thesis: verum

end;

assume for e3 being object holds not e3 DJoins v,w,G3 ; :: thesis: ex e2 being object st e2 DJoins v,w,G2
then consider e1 being object such that
A9: e1 DJoins v,w,G1 by A5, Def6;
consider e2 being object such that
A10: ( e2 DJoins v,w,G1 & e2 in E ) and
for e9 being object st e9 DJoins v,w,G1 & e9 in E holds
e9 = e2 by A9, GLIB_009:def 6;
take e2 = e2; :: thesis: e2 DJoins v,w,G2
thus e2 DJoins v,w,G2 by A2, A10, GLIB_000:73; :: thesis: verum

end;

hence G3 is DLGraphComplement of G2 by A3, A4, Def6; :: thesis: verum