let G be _Graph; for X1, X2, Y1, Y2 being set st X1 c= X2 & Y1 c= Y2 holds
G .edgesBetween (X1,Y1) c= G .edgesBetween (X2,Y2)
let X1, X2, Y1, Y2 be set ; ( X1 c= X2 & Y1 c= Y2 implies G .edgesBetween (X1,Y1) c= G .edgesBetween (X2,Y2) )
assume A1:
( X1 c= X2 & Y1 c= Y2 )
; G .edgesBetween (X1,Y1) c= G .edgesBetween (X2,Y2)
let e be object ; TARSKI:def 3 ( not e in G .edgesBetween (X1,Y1) or e in G .edgesBetween (X2,Y2) )
assume
e in G .edgesBetween (X1,Y1)
; e in G .edgesBetween (X2,Y2)
then
e SJoins X1,Y1,G
by Def30;
then
e SJoins X2,Y2,G
by A1;
hence
e in G .edgesBetween (X2,Y2)
by Def30; verum