let reparent path_src path_dst path =
    f2s (PathOperation.reparent (s2f path_src)  (s2f path_dst) (s2f path))