not True = False
not False = True
--- |'otherwise' is defined as the value 'True'; it helps to make
+-- |'otherwise' is defined as the value 'True'. It helps to make
-- guards more readable. eg.
--
--- > f x | x \< 0 = ...
+-- > f x | x < 0 = ...
-- > | otherwise = ...
otherwise :: Bool
otherwise = True
\begin{code}
{-# INLINE getTag #-}
+getTag :: a -> Int#
getTag x = x `seq` dataToTag# x
\end{code}