函子在除法上的应用

Functor application over division

我的问题可以写在列表的上下文中。我有一个功能类似于:

div' xs n = (*) (1 / n) <$> xs

这可以简化吗?我一直无法解决任何问题。

您可以使用 section of an infix operator [Haskell-wiki] 并编写 (/ n) 来构造一个除以 n 的函数,这意味着您可以将 div' 实现为:

div' :: (Functor f, Fractional a) => f a -> a -> f a
div' xs n = (/ n) <$> xs