如何将部分应用的函数类型转换为仿函数？

Question

Learn You a Haskell中有一个示例程序：

instance Functor ((->) a) where
    fmap = (.)

虽然我无法编译它：

  

重复的实例声明：

     

实例Functor（（ - ＆gt;）a） - 在partiallyApplied.hs中定义：6：10

     

实例Functor（（ - ＆gt;）r） - 在'GHC.Base'中定义

如How do you override Haskell type class instances provided by package code?所述，我应该为Functor的声明定义一个新类型。我试了但是失败了：

newtype Ntype a = N ((->) a)

instance Functor ((->) a) where
    fmap = (.)

  

•再考虑'（ - ＆gt;）a'

的另一个论点      

预期类型，但'（ - ＆gt;）a'有种类'* - ＆gt; *”

     

•类型'（ - ＆gt;）a'

     

在数据构造函数'N'

的定义中      

在'NewType'

的newtype声明中

如何使其有效？

Answer 1

Alex建议：

{{1}}

谢谢Alex！