Tenho um trabalho na facu e tenho este erro:
'decide' is not a (visible) method of class `Char'
para o código abaixo:
data Paridade = Par | Impar deriving Show
class ParImpar a where
decide :: a -> Paridade
instance ParImpar a => (Char [a]) where
decide [a]
| length [a] mod 2 == 0 = Par
| otherwise = Impar