haskell - Haskell の再帰を網羅していない

Question

sumAllDigits :: [ Int ] -> Int  
sumAllDigits (x:xs)  
   |(x:xs) == []  = 0  
   |x >= 10  = sumDigits x + sumAllDigits xs  
   |x< 10    = x + sumAllDigits xs  

REPORT:
*Recursion> sumAllDigits [22,33] *** 例外: Recursion.hs:(76,1)-(79,34): 関数 sumAllDigits の非網羅的なパターン

Answer 1

次の変更により、これが修正されると思います。私は空のリストのケースを独自の実装で照合することを好みます。私にはもっとはっきりしているように感じます。そして、より小さい場合xはドロップするので、そうでない場合はそれらのケースをカバーします。>=

sumAllDigits :: [ Int ] -> Int  
sumAllDigits [] = 0
sumAllDigits (x:xs)  
   | x >= 10  = sumDigits x + sumAllDigits xs  
   | otherwise= x + sumAllDigits xs