> :m +Data.Ratio
    > quickchange [1%2, 1%3] (10%6)
    Just [1%2, 1%2, 1%3, 1%3]