FWIW I think the sieve is a great example. Fibonacci is trite and a toy, whereas this is nontrivial and shows off a lot of what's powerful about Haskell (infinite lists, list comprehensions, pattern matching with cons...).

It's complex enough that it encourages people to stare at it for a few minutes and engage with it, which is also good.

I vote to keep it!