import Data.Unicode.CodePoints
import Data.Unicode.Types
import qualified Data.Map as M

main :: IO ()
main = mapM_ (putStrLn . show) (map (\ (_, x) -> (index x, name x, generalCategory x)) (M.toList codePoints))