let
get_extension path =
PathOperation
.get_extension (s2f path)