string - haskell の型クラス

Question

私は haskell に非常に慣れておらず、2 つの文字列を取り、同じ場所にある同じ文字の数を教えてくれる小さくて単純な関数を実装しようとしていました。

ed :: (Integral b) => [a] -> [a] -> b
ed _ [] = 0
ed [] _ = 0
ed [] [] = 0
ed (x:xs) (y:ys)
    | x == y = 1 + ed xs ys
    | otherwise = ed xs ys

型クラスの定義が間違っているため、これは実行されません。2 つの文字列があり、整数を返す必要があるため、上記で記述した型クラスの定義です。他に何かする必要がありますか？