let G be _Graph; :: thesis: 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 ; :: thesis: ( X1 c= X2 & Y1 c= Y2 implies G .edgesBetween (X1,Y1) c= G .edgesBetween (X2,Y2) )
assume A1: ( X1 c= X2 & Y1 c= Y2 ) ; :: thesis: G .edgesBetween (X1,Y1) c= G .edgesBetween (X2,Y2)
let e be object ; :: according to TARSKI:def 3 :: thesis: ( not e in G .edgesBetween (X1,Y1) or e in G .edgesBetween (X2,Y2) )
assume e in G .edgesBetween (X1,Y1) ; :: thesis: 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; :: thesis: verum