let identity path =
    f2s (PathOperation.identity (s2f path))