 rDist converts a list of randomly generated values into
--       a distribution by taking equal weights for all values
--       
rDist :: Ord a => [R a] -> RDist a
rDist = fmap (norm . uniform) . sequence


rDist :: Ord a => [R a] -> RDist a
rDist = fmap (norm . uniform) . sequence
rDist = fmap (norm . uniform) . sequence