let compare path1 path2 =
    PathOperation.compare   (s2f path1) (s2f path2)