Создание экземпляра класса типа Read в Haskell для пользовательского типа данных

У меня есть собственный тип данных Foo = Foo {a :: Int, b :: Int} , и я пытаюсь сделать Foo настраиваемым экземпляром чтения. У меня уже есть функция bar :: String -> Foo , и я пробовал сделать это:

instance Read (Foo a b) where
    read s = bar s

, но получаю следующая ошибка, когда я загружаю свой файл в GHCi, чтобы проверить его: Fraction.hs: 11: 1: read 'не является (видимым) методом класса Read'

Может ли кто-нибудь сказать мне, в чем проблема и как я могу создать экземпляр этого типа?