data AFilePath = P [String] instance Eq AFilePath instance Ord AFilePath rootPath :: AFilePath aFilePath :: FilePath -> AFilePath filePath :: AFilePath -> FilePath compactPath :: AFilePath -> AFilePath isAbsolute :: AFilePath -> Bool joinPaths :: AFilePath -> AFilePath -> AFilePath pathRelativeTo :: AFilePath -> AFilePath -> AFilePath extendPath :: AFilePath -> String -> AFilePath pathTail :: AFilePath -> String pathHead :: AFilePath -> AFilePath pathLength :: AFilePath -> Int