absolutePath :: [String] -> FilePath
absolutePath strs = ("/" ++ (intercalate "/" strs))
absolutePath :: [String] -> FilePath
absolutePath strs = ("/" ++ (intercalate "/" strs))
absolutePath strs = ("/" ++ (intercalate "/" strs))