[project @ 1996-01-18 16:33:17 by partain]
[ghc-hetmet.git] / ghc / lib / prelude / IList_mp.hi
index d98883a..dee9e11 100644 (file)
-{-# GHC_PRAGMA INTERFACE VERSION 5 #-}
+{-# GHC_PRAGMA INTERFACE VERSION 6 #-}
 interface PreludeBuiltin where
-import PreludeCore(Eq(..), Ord(..), Text(..), _CCallable(..), _CReturnable(..))
+import PreludeComplex(Complex)
+import PreludeCore(Bool(..), Eq(..), Ord(..), Text(..), _CCallable(..), _CReturnable(..))
+instance Eq [(Int, Int)]
+       {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 3 _!_ _TUP_2 [([(Int, Int)] -> [(Int, Int)] -> Bool), ([(Int, Int)] -> [(Int, Int)] -> Bool)] [_CONSTM_ Eq (==) ([(Int, Int)]), _CONSTM_ Eq (/=) ([(Int, Int)])] _N_
+        (==) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (/=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ } #-}
 instance Eq a => Eq [a]
        {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 1 _U_ 1 _N_ _N_ _N_ _N_ #-}
+instance Eq [Bool]
+       {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 3 _!_ _TUP_2 [([Bool] -> [Bool] -> Bool), ([Bool] -> [Bool] -> Bool)] [_CONSTM_ Eq (==) ([Bool]), _CONSTM_ Eq (/=) ([Bool])] _N_
+        (==) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (/=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ } #-}
 instance Eq [Char]
        {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 3 _!_ _TUP_2 [([Char] -> [Char] -> Bool), ([Char] -> [Char] -> Bool)] [_CONSTM_ Eq (==) ([Char]), _CONSTM_ Eq (/=) ([Char])] _N_
-        (==) = _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_,
-        (/=) = _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ #-}
+        (==) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (/=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ } #-}
+instance Eq [Complex Double]
+       {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 3 _!_ _TUP_2 [([Complex Double] -> [Complex Double] -> Bool), ([Complex Double] -> [Complex Double] -> Bool)] [_CONSTM_ Eq (==) ([Complex Double]), _CONSTM_ Eq (/=) ([Complex Double])] _N_
+        (==) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (/=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ } #-}
+instance Eq [Double]
+       {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 3 _!_ _TUP_2 [([Double] -> [Double] -> Bool), ([Double] -> [Double] -> Bool)] [_CONSTM_ Eq (==) ([Double]), _CONSTM_ Eq (/=) ([Double])] _N_
+        (==) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (/=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ } #-}
 instance Eq [Int]
        {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 3 _!_ _TUP_2 [([Int] -> [Int] -> Bool), ([Int] -> [Int] -> Bool)] [_CONSTM_ Eq (==) ([Int]), _CONSTM_ Eq (/=) ([Int])] _N_
-        (==) = _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_,
-        (/=) = _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ #-}
+        (==) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (/=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ } #-}
+instance Eq [Integer]
+       {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 3 _!_ _TUP_2 [([Integer] -> [Integer] -> Bool), ([Integer] -> [Integer] -> Bool)] [_CONSTM_ Eq (==) ([Integer]), _CONSTM_ Eq (/=) ([Integer])] _N_
+        (==) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (/=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ } #-}
+instance Eq [[Char]]
+       {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 3 _!_ _TUP_2 [([[Char]] -> [[Char]] -> Bool), ([[Char]] -> [[Char]] -> Bool)] [_CONSTM_ Eq (==) ([[Char]]), _CONSTM_ Eq (/=) ([[Char]])] _N_
+        (==) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (/=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ } #-}
+instance Eq [[Int]]
+       {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 3 _!_ _TUP_2 [([[Int]] -> [[Int]] -> Bool), ([[Int]] -> [[Int]] -> Bool)] [_CONSTM_ Eq (==) ([[Int]]), _CONSTM_ Eq (/=) ([[Int]])] _N_
+        (==) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (/=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ } #-}
 instance Ord a => Ord [a]
        {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 2 _U_ 12 _N_ _N_ _N_ _N_ #-}
+instance Ord [Bool]
+       {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 9 _!_ _TUP_8 [{{Eq [Bool]}}, ([Bool] -> [Bool] -> Bool), ([Bool] -> [Bool] -> Bool), ([Bool] -> [Bool] -> Bool), ([Bool] -> [Bool] -> Bool), ([Bool] -> [Bool] -> [Bool]), ([Bool] -> [Bool] -> [Bool]), ([Bool] -> [Bool] -> _CMP_TAG)] [_DFUN_ Eq ([Bool]), _CONSTM_ Ord (<) ([Bool]), _CONSTM_ Ord (<=) ([Bool]), _CONSTM_ Ord (>=) ([Bool]), _CONSTM_ Ord (>) ([Bool]), _CONSTM_ Ord max ([Bool]), _CONSTM_ Ord min ([Bool]), _CONSTM_ Ord _tagCmp ([Bool])] _N_
+        (<) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (<=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (>=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (>) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        max = { _A_ 2 _U_ 22 _N_ _S_ "SS" _N_ _N_ },
+        min = { _A_ 2 _U_ 22 _N_ _S_ "SS" _N_ _N_ },
+        _tagCmp = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ } #-}
 instance Ord [Char]
        {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 9 _!_ _TUP_8 [{{Eq [Char]}}, ([Char] -> [Char] -> Bool), ([Char] -> [Char] -> Bool), ([Char] -> [Char] -> Bool), ([Char] -> [Char] -> Bool), ([Char] -> [Char] -> [Char]), ([Char] -> [Char] -> [Char]), ([Char] -> [Char] -> _CMP_TAG)] [_DFUN_ Eq ([Char]), _CONSTM_ Ord (<) ([Char]), _CONSTM_ Ord (<=) ([Char]), _CONSTM_ Ord (>=) ([Char]), _CONSTM_ Ord (>) ([Char]), _CONSTM_ Ord max ([Char]), _CONSTM_ Ord min ([Char]), _CONSTM_ Ord _tagCmp ([Char])] _N_
-        (<) = _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_,
-        (<=) = _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_,
-        (>=) = _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_,
-        (>) = _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_,
-        max = _A_ 2 _U_ 22 _N_ _S_ "SS" _N_ _N_,
-        min = _A_ 2 _U_ 22 _N_ _S_ "SS" _N_ _N_,
-        _tagCmp = _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ #-}
+        (<) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (<=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (>=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (>) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        max = { _A_ 2 _U_ 22 _N_ _S_ "SS" _N_ _N_ },
+        min = { _A_ 2 _U_ 22 _N_ _S_ "SS" _N_ _N_ },
+        _tagCmp = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ } #-}
+instance Ord [Double]
+       {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 9 _!_ _TUP_8 [{{Eq [Double]}}, ([Double] -> [Double] -> Bool), ([Double] -> [Double] -> Bool), ([Double] -> [Double] -> Bool), ([Double] -> [Double] -> Bool), ([Double] -> [Double] -> [Double]), ([Double] -> [Double] -> [Double]), ([Double] -> [Double] -> _CMP_TAG)] [_DFUN_ Eq ([Double]), _CONSTM_ Ord (<) ([Double]), _CONSTM_ Ord (<=) ([Double]), _CONSTM_ Ord (>=) ([Double]), _CONSTM_ Ord (>) ([Double]), _CONSTM_ Ord max ([Double]), _CONSTM_ Ord min ([Double]), _CONSTM_ Ord _tagCmp ([Double])] _N_
+        (<) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (<=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (>=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (>) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        max = { _A_ 2 _U_ 22 _N_ _S_ "SS" _N_ _N_ },
+        min = { _A_ 2 _U_ 22 _N_ _S_ "SS" _N_ _N_ },
+        _tagCmp = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ } #-}
 instance Ord [Int]
        {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 9 _!_ _TUP_8 [{{Eq [Int]}}, ([Int] -> [Int] -> Bool), ([Int] -> [Int] -> Bool), ([Int] -> [Int] -> Bool), ([Int] -> [Int] -> Bool), ([Int] -> [Int] -> [Int]), ([Int] -> [Int] -> [Int]), ([Int] -> [Int] -> _CMP_TAG)] [_DFUN_ Eq ([Int]), _CONSTM_ Ord (<) ([Int]), _CONSTM_ Ord (<=) ([Int]), _CONSTM_ Ord (>=) ([Int]), _CONSTM_ Ord (>) ([Int]), _CONSTM_ Ord max ([Int]), _CONSTM_ Ord min ([Int]), _CONSTM_ Ord _tagCmp ([Int])] _N_
-        (<) = _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_,
-        (<=) = _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_,
-        (>=) = _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_,
-        (>) = _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_,
-        max = _A_ 2 _U_ 22 _N_ _S_ "SS" _N_ _N_,
-        min = _A_ 2 _U_ 22 _N_ _S_ "SS" _N_ _N_,
-        _tagCmp = _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ #-}
+        (<) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (<=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (>=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (>) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        max = { _A_ 2 _U_ 22 _N_ _S_ "SS" _N_ _N_ },
+        min = { _A_ 2 _U_ 22 _N_ _S_ "SS" _N_ _N_ },
+        _tagCmp = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ } #-}
+instance Ord [Integer]
+       {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 9 _!_ _TUP_8 [{{Eq [Integer]}}, ([Integer] -> [Integer] -> Bool), ([Integer] -> [Integer] -> Bool), ([Integer] -> [Integer] -> Bool), ([Integer] -> [Integer] -> Bool), ([Integer] -> [Integer] -> [Integer]), ([Integer] -> [Integer] -> [Integer]), ([Integer] -> [Integer] -> _CMP_TAG)] [_DFUN_ Eq ([Integer]), _CONSTM_ Ord (<) ([Integer]), _CONSTM_ Ord (<=) ([Integer]), _CONSTM_ Ord (>=) ([Integer]), _CONSTM_ Ord (>) ([Integer]), _CONSTM_ Ord max ([Integer]), _CONSTM_ Ord min ([Integer]), _CONSTM_ Ord _tagCmp ([Integer])] _N_
+        (<) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (<=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (>=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (>) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        max = { _A_ 2 _U_ 22 _N_ _S_ "SS" _N_ _N_ },
+        min = { _A_ 2 _U_ 22 _N_ _S_ "SS" _N_ _N_ },
+        _tagCmp = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ } #-}
+instance Ord [[Char]]
+       {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 9 _!_ _TUP_8 [{{Eq [[Char]]}}, ([[Char]] -> [[Char]] -> Bool), ([[Char]] -> [[Char]] -> Bool), ([[Char]] -> [[Char]] -> Bool), ([[Char]] -> [[Char]] -> Bool), ([[Char]] -> [[Char]] -> [[Char]]), ([[Char]] -> [[Char]] -> [[Char]]), ([[Char]] -> [[Char]] -> _CMP_TAG)] [_DFUN_ Eq ([[Char]]), _CONSTM_ Ord (<) ([[Char]]), _CONSTM_ Ord (<=) ([[Char]]), _CONSTM_ Ord (>=) ([[Char]]), _CONSTM_ Ord (>) ([[Char]]), _CONSTM_ Ord max ([[Char]]), _CONSTM_ Ord min ([[Char]]), _CONSTM_ Ord _tagCmp ([[Char]])] _N_
+        (<) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (<=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (>=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (>) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        max = { _A_ 2 _U_ 22 _N_ _S_ "SS" _N_ _N_ },
+        min = { _A_ 2 _U_ 22 _N_ _S_ "SS" _N_ _N_ },
+        _tagCmp = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ } #-}
+instance Ord [[Int]]
+       {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 9 _!_ _TUP_8 [{{Eq [[Int]]}}, ([[Int]] -> [[Int]] -> Bool), ([[Int]] -> [[Int]] -> Bool), ([[Int]] -> [[Int]] -> Bool), ([[Int]] -> [[Int]] -> Bool), ([[Int]] -> [[Int]] -> [[Int]]), ([[Int]] -> [[Int]] -> [[Int]]), ([[Int]] -> [[Int]] -> _CMP_TAG)] [_DFUN_ Eq ([[Int]]), _CONSTM_ Ord (<) ([[Int]]), _CONSTM_ Ord (<=) ([[Int]]), _CONSTM_ Ord (>=) ([[Int]]), _CONSTM_ Ord (>) ([[Int]]), _CONSTM_ Ord max ([[Int]]), _CONSTM_ Ord min ([[Int]]), _CONSTM_ Ord _tagCmp ([[Int]])] _N_
+        (<) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (<=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (>=) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        (>) = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ },
+        max = { _A_ 2 _U_ 22 _N_ _S_ "SS" _N_ _N_ },
+        min = { _A_ 2 _U_ 22 _N_ _S_ "SS" _N_ _N_ },
+        _tagCmp = { _A_ 2 _U_ 11 _N_ _S_ "SS" _N_ _N_ } #-}
 instance Text a => Text [a]
        {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 1 _U_ 2 _N_ _N_ _N_ _N_ #-}
+instance Text [Bool]
+       {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 5 _!_ _TUP_4 [(Int -> [Char] -> [([Bool], [Char])]), (Int -> [Bool] -> [Char] -> [Char]), ([Char] -> [([[Bool]], [Char])]), ([[Bool]] -> [Char] -> [Char])] [_CONSTM_ Text readsPrec ([Bool]), _CONSTM_ Text showsPrec ([Bool]), _CONSTM_ Text readList ([Bool]), _CONSTM_ Text showList ([Bool])] _N_
+        readsPrec = { _A_ 1 _U_ 02 _N_ _S_ "A" {_A_ 0 _U_ 2 _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Text readList (Bool) _N_} _F_ _IF_ARGS_ 0 1 X 1 \ (u0 :: Int) -> _CONSTM_ Text readList (Bool) _N_ },
+        showsPrec = { _A_ 2 _U_ 012 _N_ _S_ "AS" {_A_ 1 _U_ 12 _N_ _N_ _F_ _IF_ARGS_ 0 1 X 3 \ (u0 :: [Bool]) -> _APP_  _TYAPP_  _ORIG_ PreludeCore _showList { Bool } [ _WRKR_ _CONSTM_ Text showsPrec (Bool), u0 ] _N_} _F_ _IF_ARGS_ 0 2 XX 3 \ (u0 :: Int) (u1 :: [Bool]) -> _APP_  _TYAPP_  _ORIG_ PreludeCore _showList { Bool } [ _WRKR_ _CONSTM_ Text showsPrec (Bool), u1 ] _N_ },
+        readList = { _A_ 0 _U_ 2 _N_ _N_ _N_ _N_ },
+        showList = { _A_ 1 _U_ 12 _N_ _N_ _N_ _N_ } #-}
 instance Text [Char]
        {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 5 _!_ _TUP_4 [(Int -> [Char] -> [([Char], [Char])]), (Int -> [Char] -> [Char] -> [Char]), ([Char] -> [([[Char]], [Char])]), ([[Char]] -> [Char] -> [Char])] [_CONSTM_ Text readsPrec ([Char]), _CONSTM_ Text showsPrec ([Char]), _CONSTM_ Text readList ([Char]), _CONSTM_ Text showList ([Char])] _N_
-        readsPrec = _A_ 1 _U_ 02 _N_ _S_ "A" {_A_ 0 _U_ 2 _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Text readList (Char) _N_} _F_ _IF_ARGS_ 0 1 X 1 \ (u0 :: Int) -> _CONSTM_ Text readList (Char) _N_,
-        showsPrec = _A_ 2 _U_ 022 _N_ _S_ "AL" {_A_ 1 _U_ 22 _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Text showList (Char) _N_} _F_ _IF_ARGS_ 0 2 XX 2 \ (u0 :: Int) (u1 :: [Char]) -> _APP_  _CONSTM_ Text showList (Char) [ u1 ] _N_,
-        readList = _A_ 0 _U_ 2 _N_ _N_ _N_ _N_,
-        showList = _A_ 0 _U_ 12 _N_ _N_ _N_ _N_ #-}
+        readsPrec = { _A_ 1 _U_ 02 _N_ _S_ "A" {_A_ 0 _U_ 2 _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Text readList (Char) _N_} _F_ _IF_ARGS_ 0 1 X 1 \ (u0 :: Int) -> _CONSTM_ Text readList (Char) _N_ },
+        showsPrec = { _A_ 2 _U_ 022 _N_ _S_ "AL" {_A_ 1 _U_ 22 _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Text showList (Char) _N_} _F_ _IF_ARGS_ 0 2 XX 2 \ (u0 :: Int) (u1 :: [Char]) -> _APP_  _CONSTM_ Text showList (Char) [ u1 ] _N_ },
+        readList = { _A_ 0 _U_ 2 _N_ _N_ _N_ _N_ },
+        showList = { _A_ 1 _U_ 12 _N_ _N_ _F_ _IF_ARGS_ 0 1 X 3 \ (u0 :: [[Char]]) -> _APP_  _TYAPP_  _ORIG_ PreludeCore _showList { [Char] } [ _CONSTM_ Text showList (Char), u0 ] _N_ } #-}
+instance Text [Complex Double]
+       {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 5 _!_ _TUP_4 [(Int -> [Char] -> [([Complex Double], [Char])]), (Int -> [Complex Double] -> [Char] -> [Char]), ([Char] -> [([[Complex Double]], [Char])]), ([[Complex Double]] -> [Char] -> [Char])] [_CONSTM_ Text readsPrec ([Complex Double]), _CONSTM_ Text showsPrec ([Complex Double]), _CONSTM_ Text readList ([Complex Double]), _CONSTM_ Text showList ([Complex Double])] _N_
+        readsPrec = { _A_ 1 _U_ 02 _N_ _S_ "A" {_A_ 0 _U_ 2 _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Text readList (Complex Double) _N_} _F_ _IF_ARGS_ 0 1 X 1 \ (u0 :: Int) -> _CONSTM_ Text readList (Complex Double) _N_ },
+        showsPrec = { _A_ 2 _U_ 022 _N_ _S_ "AL" {_A_ 1 _U_ 22 _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Text showList (Complex Double) _N_} _F_ _IF_ARGS_ 0 2 XX 2 \ (u0 :: Int) (u1 :: [Complex Double]) -> _APP_  _CONSTM_ Text showList (Complex Double) [ u1 ] _N_ },
+        readList = { _A_ 0 _U_ 2 _N_ _N_ _N_ _N_ },
+        showList = { _A_ 1 _U_ 12 _N_ _N_ _F_ _IF_ARGS_ 0 1 X 3 \ (u0 :: [[Complex Double]]) -> _APP_  _TYAPP_  _ORIG_ PreludeCore _showList { [Complex Double] } [ _CONSTM_ Text showList (Complex Double), u0 ] _N_ } #-}
+instance Text [Double]
+       {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 5 _!_ _TUP_4 [(Int -> [Char] -> [([Double], [Char])]), (Int -> [Double] -> [Char] -> [Char]), ([Char] -> [([[Double]], [Char])]), ([[Double]] -> [Char] -> [Char])] [_CONSTM_ Text readsPrec ([Double]), _CONSTM_ Text showsPrec ([Double]), _CONSTM_ Text readList ([Double]), _CONSTM_ Text showList ([Double])] _N_
+        readsPrec = { _A_ 1 _U_ 02 _N_ _S_ "A" {_A_ 0 _U_ 2 _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Text readList (Double) _N_} _F_ _IF_ARGS_ 0 1 X 1 \ (u0 :: Int) -> _CONSTM_ Text readList (Double) _N_ },
+        showsPrec = { _A_ 2 _U_ 022 _N_ _S_ "AL" {_A_ 1 _U_ 22 _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Text showList (Double) _N_} _F_ _IF_ARGS_ 0 2 XX 2 \ (u0 :: Int) (u1 :: [Double]) -> _APP_  _CONSTM_ Text showList (Double) [ u1 ] _N_ },
+        readList = { _A_ 0 _U_ 2 _N_ _N_ _N_ _N_ },
+        showList = { _A_ 1 _U_ 12 _N_ _N_ _F_ _IF_ARGS_ 0 1 X 3 \ (u0 :: [[Double]]) -> _APP_  _TYAPP_  _ORIG_ PreludeCore _showList { [Double] } [ _CONSTM_ Text showList (Double), u0 ] _N_ } #-}
 instance Text [Int]
        {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 5 _!_ _TUP_4 [(Int -> [Char] -> [([Int], [Char])]), (Int -> [Int] -> [Char] -> [Char]), ([Char] -> [([[Int]], [Char])]), ([[Int]] -> [Char] -> [Char])] [_CONSTM_ Text readsPrec ([Int]), _CONSTM_ Text showsPrec ([Int]), _CONSTM_ Text readList ([Int]), _CONSTM_ Text showList ([Int])] _N_
-        readsPrec = _A_ 1 _U_ 02 _N_ _S_ "A" {_A_ 0 _U_ 2 _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Text readList (Int) _N_} _F_ _IF_ARGS_ 0 1 X 1 \ (u0 :: Int) -> _CONSTM_ Text readList (Int) _N_,
-        showsPrec = _A_ 1 _U_ 022 _N_ _S_ "A" {_A_ 0 _U_ 22 _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Text showList (Int) _N_} _F_ _IF_ARGS_ 0 1 X 1 \ (u0 :: Int) -> _CONSTM_ Text showList (Int) _N_,
-        readList = _A_ 0 _U_ 2 _N_ _N_ _N_ _N_,
-        showList = _A_ 0 _U_ 12 _N_ _N_ _N_ _N_ #-}
+        readsPrec = { _A_ 1 _U_ 02 _N_ _S_ "A" {_A_ 0 _U_ 2 _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Text readList (Int) _N_} _F_ _IF_ARGS_ 0 1 X 1 \ (u0 :: Int) -> _CONSTM_ Text readList (Int) _N_ },
+        showsPrec = { _A_ 2 _U_ 022 _N_ _S_ "AL" {_A_ 1 _U_ 22 _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Text showList (Int) _N_} _F_ _IF_ARGS_ 0 2 XX 2 \ (u0 :: Int) (u1 :: [Int]) -> _APP_  _CONSTM_ Text showList (Int) [ u1 ] _N_ },
+        readList = { _A_ 0 _U_ 2 _N_ _N_ _N_ _N_ },
+        showList = { _A_ 1 _U_ 12 _N_ _N_ _F_ _IF_ARGS_ 0 1 X 3 \ (u0 :: [[Int]]) -> _APP_  _TYAPP_  _ORIG_ PreludeCore _showList { [Int] } [ _CONSTM_ Text showList (Int), u0 ] _N_ } #-}
+instance Text [Integer]
+       {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 5 _!_ _TUP_4 [(Int -> [Char] -> [([Integer], [Char])]), (Int -> [Integer] -> [Char] -> [Char]), ([Char] -> [([[Integer]], [Char])]), ([[Integer]] -> [Char] -> [Char])] [_CONSTM_ Text readsPrec ([Integer]), _CONSTM_ Text showsPrec ([Integer]), _CONSTM_ Text readList ([Integer]), _CONSTM_ Text showList ([Integer])] _N_
+        readsPrec = { _A_ 1 _U_ 02 _N_ _S_ "A" {_A_ 0 _U_ 2 _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Text readList (Integer) _N_} _F_ _IF_ARGS_ 0 1 X 1 \ (u0 :: Int) -> _CONSTM_ Text readList (Integer) _N_ },
+        showsPrec = { _A_ 2 _U_ 022 _N_ _S_ "AL" {_A_ 1 _U_ 22 _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Text showList (Integer) _N_} _F_ _IF_ARGS_ 0 2 XX 2 \ (u0 :: Int) (u1 :: [Integer]) -> _APP_  _CONSTM_ Text showList (Integer) [ u1 ] _N_ },
+        readList = { _A_ 0 _U_ 2 _N_ _N_ _N_ _N_ },
+        showList = { _A_ 1 _U_ 12 _N_ _N_ _F_ _IF_ARGS_ 0 1 X 3 \ (u0 :: [[Integer]]) -> _APP_  _TYAPP_  _ORIG_ PreludeCore _showList { [Integer] } [ _CONSTM_ Text showList (Integer), u0 ] _N_ } #-}
+instance Text [[Char]]
+       {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 5 _!_ _TUP_4 [(Int -> [Char] -> [([[Char]], [Char])]), (Int -> [[Char]] -> [Char] -> [Char]), ([Char] -> [([[[Char]]], [Char])]), ([[[Char]]] -> [Char] -> [Char])] [_CONSTM_ Text readsPrec ([[Char]]), _CONSTM_ Text showsPrec ([[Char]]), _CONSTM_ Text readList ([[Char]]), _CONSTM_ Text showList ([[Char]])] _N_
+        readsPrec = { _A_ 1 _U_ 02 _N_ _S_ "A" {_A_ 0 _U_ 2 _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Text readList ([Char]) _N_} _F_ _IF_ARGS_ 0 1 X 1 \ (u0 :: Int) -> _CONSTM_ Text readList ([Char]) _N_ },
+        showsPrec = { _A_ 2 _U_ 012 _N_ _S_ "AS" {_A_ 1 _U_ 12 _N_ _N_ _F_ _IF_ARGS_ 0 1 X 3 \ (u0 :: [[Char]]) -> _APP_  _TYAPP_  _ORIG_ PreludeCore _showList { [Char] } [ _CONSTM_ Text showList (Char), u0 ] _N_} _F_ _IF_ARGS_ 0 2 XX 2 \ (u0 :: Int) (u1 :: [[Char]]) -> _APP_  _CONSTM_ Text showList ([Char]) [ u1 ] _N_ },
+        readList = { _A_ 0 _U_ 2 _N_ _N_ _N_ _N_ },
+        showList = { _A_ 1 _U_ 12 _N_ _N_ _N_ _N_ } #-}
+instance Text [[Int]]
+       {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 5 _!_ _TUP_4 [(Int -> [Char] -> [([[Int]], [Char])]), (Int -> [[Int]] -> [Char] -> [Char]), ([Char] -> [([[[Int]]], [Char])]), ([[[Int]]] -> [Char] -> [Char])] [_CONSTM_ Text readsPrec ([[Int]]), _CONSTM_ Text showsPrec ([[Int]]), _CONSTM_ Text readList ([[Int]]), _CONSTM_ Text showList ([[Int]])] _N_
+        readsPrec = { _A_ 1 _U_ 02 _N_ _S_ "A" {_A_ 0 _U_ 2 _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Text readList ([Int]) _N_} _F_ _IF_ARGS_ 0 1 X 1 \ (u0 :: Int) -> _CONSTM_ Text readList ([Int]) _N_ },
+        showsPrec = { _A_ 2 _U_ 012 _N_ _S_ "AS" {_A_ 1 _U_ 12 _N_ _N_ _F_ _IF_ARGS_ 0 1 X 3 \ (u0 :: [[Int]]) -> _APP_  _TYAPP_  _ORIG_ PreludeCore _showList { [Int] } [ _CONSTM_ Text showList (Int), u0 ] _N_} _F_ _IF_ARGS_ 0 2 XX 2 \ (u0 :: Int) (u1 :: [[Int]]) -> _APP_  _CONSTM_ Text showList ([Int]) [ u1 ] _N_ },
+        readList = { _A_ 0 _U_ 2 _N_ _N_ _N_ _N_ },
+        showList = { _A_ 1 _U_ 12 _N_ _N_ _N_ _N_ } #-}
 instance _CCallable [Char]
        {-# GHC_PRAGMA _M_ PreludeBuiltin {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _!_ _TUP_0 [] [] _N_ #-}
 instance _CReturnable [Char]