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

    scanr1 is a variant of scanr that has no starting value argument.
    """
    raise NotImplementedError()


#=============================================================================#
## Accumulating maps
dataset/ETHPy150Open billpmurphy/hask/hask/Data/List.py/scanr1/original