theorem Th4: :: GLIB_012:4

for G1, G2 being _Graph st G1 == G2 & G1 is loopfull holds
G2 is loopfull