let
segO x y =
let
temp = segmentF x y
in
remove y (remove x temp)