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