let G be GraphUnion of G1,G2; :: thesis: G is loopless
per cases ( G1 tolerates G2 or not G1 tolerates G2 ) ;
end;