uvector-0.1: tests/Fusion/sum-ratio.hs

import Data.Array.Vector
import Data.Ratio

main = print . sumU $ replicateU (100000000 :: Int) (1 % 2 :: Rational)