Warning: Pattern match(es) are non-exhaustive In an equation for `fn': Patterns not matched: [] #x : _ with #x `notElem` [0#] 0# : (_ : _)