\begin{code}
-{-# OPTIONS_GHC -fno-implicit-prelude #-}
+{-# OPTIONS_GHC -XNoImplicitPrelude #-}
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
where
import GHC.Base
-import GHC.Err ( error )
import GHC.List ( length )
import GHC.ST
import GHC.Num