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