It's better to call isNotBottom as isAtLeastBottomPlusOne.
(Popquiz: what's isAtLeastBottom and how would you write it in idiomatic Haskell and why is it un-contributive to the discussion?)
Because then we'd see right away there are isAtLeastBottomPlusTwo, ...PlusThree, etc.
Main course:
I detect at least two senses in which the sentence "omega *is* distinguishable from bottom" is misleading. First, normal English usage of 'distinguishable' is symmetric: if A is d-able from B, then so is B from A.
But here it's NOT! (Try writing isNotOmega.)
The other snare is that there's an expectation (because that's the whole point of d-ability), that if A is d-able from B, then that act of distinguishing has got us /closer/ to ascertaining A.
Again, not really. Within Haskell, knowing that a candidate isAtLeastBottomPlusX only tells us that it could be still any of an infinite number of possibilities!
So you can't even write crippled, one-legged versions of neither isOmega nor isNotOmega !!!
Omega is truly more voodoo than the rest, which admittedly are already pretty wild as far as Haskell data goes.