For the function
chain1 :: Integral a => a -> [a]
chain1 1 = [1]
chain1 n
| even n = n:chain1 (n `div` 2)
| odd n = n:chain1 (n * 3 + 1)
I’m getting the error
Pattern match(es) are non-exhaustive
In an equation for ‘chain1’:
Patterns not matched: p where p is not one of {1} compile(-Wincomplete-patterns)
I haven’t been able to discover what {1}
means.