意外と行数がすくないですがこれがHaskellのパワーなんですかね?