hereby :: thesis: ( ( not G1 tolerates G2 or not the_Vertices_of G1 meets the_Vertices_of G2 ) implies ex b1 being Subgraph of G1 st b1 == G1 )
assume ( G1 tolerates G2 & the_Vertices_of G1 meets the_Vertices_of G2 ) ; :: thesis: ex G being Subgraph of G1 ex S being GraphMeetSet st
( S = {G1,G2} & G is GraphMeet of S )

then reconsider S = {G1,G2} as GraphMeetSet by Th35;
set G = the GraphMeet of S;
G1 in S by TARSKI:def 2;
then G1 is Supergraph of the GraphMeet of S by Th37;
then reconsider G = the GraphMeet of S as Subgraph of G1 by GLIB_006:57;
take G = G; :: thesis: ex S being GraphMeetSet st
( S = {G1,G2} & G is GraphMeet of S )

take S = S; :: thesis: ( S = {G1,G2} & G is GraphMeet of S )
thus ( S = {G1,G2} & G is GraphMeet of S ) ; :: thesis: verum
end;
assume ( not G1 tolerates G2 or not the_Vertices_of G1 meets the_Vertices_of G2 ) ; :: thesis: ex b1 being Subgraph of G1 st b1 == G1
reconsider G = G1 as Subgraph of G1 by GLIB_000:40;
take G ; :: thesis: G == G1
thus G == G1 ; :: thesis: verum