@sig(H/ [("a", "b")] >> (["a"], ["b"]))
def unzip(xs):
    """
    unzip :: [(a, b)] -> ([a], [b])

    unzip transforms a list of pairs into a list of first components and a list
    of second components.
    """
    a = L[(i[0] for i in xs)]
    b = L[(i[1] for i in xs)]
    return a, b
dataset/ETHPy150Open billpmurphy/hask/hask/Data/List.py/unzip/original