1    object Path =
2        def is_absolute "kd_is_absolute_path" (path : String) : bool
3    
4        let get_last_separator_index (path : String) =
5            path.try_last_index_of '/' '\\' |> unwrap
6    
7        def get_file_name (path : String) =
8            let index = get_last_separator_index path
9            path.drop (index + 1)
10   
11       def remove_file_name (path : String) =
12           let index = get_last_separator_index path
13           path.take index
14