2 ==================== Typechecked ====================
4 _/\_ a_tr3x -> \ tpl_B1 ->
5 case tpl_B1 of { Word.:Bits{-r3B-} tpl_B2 tpl_B3 -> tpl_B2;}
7 _/\_ a_tr3x -> \ tpl_B1 ->
8 case tpl_B1 of { Word.:Bits{-r3B-} tpl_B2 tpl_B3 -> tpl_B3;}
9 AbsBinds [a_tan2] [d.Bits_an1] []
12 ghc: module version changed to 1; reason: no old .hi file
15 IO PrelAddr PrelArr PrelBounded PrelCCall PrelForeign PrelNum
17 Word Bits(:Bits :Bits bitRsh bitLsh);
22 1 class Bits a where {bitRsh :: a -> PrelBase.Int -> a; bitLsh :: a -> PrelBase.Int -> a} ;