instance (Integral a, Bounded a) => Bounded (Ratio a) where
minBound = minBound % 1
maxBound = maxBound % 1
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/libraries/attachments/20190615/ba5e7afd/attachment.html>