
theorem Th15:
for X,Y,p be set, E1,E2 be Subset of [:X,Y:]
  st E1 c= E2 holds Y-section(E1,p) c= Y-section(E2,p) by RELAT_1:144;
