相关疑难解决方法(0)

我想定义一个元组(x, y)作为一个实例Enum类,知道这两个x和y的实例Enum.以下尝试:

instance (Enum x, Enum y) => Enum (x, y) where
    toEnum = y
    enumFrom x = (x, x)

只导致错误(y不在范围内).我是Haskell的新手,有人可以解释如何声明这样的实例吗？