theorem Th75:
  W-max L~SpStSeq C = NW-corner C
proof
  set X = L~SpStSeq C, S = W-most X;
A1: S = LSeg(SW-corner C,NW-corner C) by Th66;
A2: S-bound C <= N-bound C by Th22;
  upper_bound (proj2|S) = upper_bound rng(proj2|S) by RELSET_1:22
    .= upper_bound(proj2.:S) by RELAT_1:115
    .= upper_bound [.S-bound C,N-bound C.] by A1,Th70
    .= N-bound C by A2,JORDAN5A:19;
  hence thesis by Th58;
end;
