+++ /dev/null
-
-
---================================================================================
-Typechecked:
-{- nonrec -}
-Tag{-r3K,x-}{i} =
- _/\_ a{-r3G-} -> \ tpl_B1 ->
- Tag{-r3K,x-}{i}
- {_@_ a{-r3G-} tpl_B1}
-{- nonrec -}
-f{-r3I,x-} =
- _/\_ r{-r3C-} -> \ tpl_B1 ->
- tpl_B1
-{- nonrec -}
-AbsBinds
-[r{-aHm-}]
-[d.Reps_aHf]
-[([r{-aHm-}], $mf{-rGx,x-}, f_aHh)]
- AbsBinds [] [] [([], f_aHh, f_aHj)]
- f_aHj
- = GHCerr.noDefaultMethodError{-8k,p-}
- (r{-aHm-} -> r{-aHm-} -> r{-aHm-}) "Class Reps Method f"
-{- rec -}
-AbsBinds [a{-aHn-}] [] [([a{-aHn-}], $d3{-rHq,x-}, d.Eval_aGM)]
- d.Eval_aGM =
- ({-dict-} [] [])
-{- rec -}
-AbsBinds [] [] [([], $d1{-rHr,x-}, d.Reps_aGR)]
- AbsBinds [] [] [([], f_aHs, f_aGU)]
- f_aGU
- PrelBase.True{-5E,p-}{i} PrelBase.True{-5E,p-}{i}
- = PrelBase.True{-5E,p-}{i}
- f_aGU
- x_r3o y_r3q
- = PrelBase.False{-58,p-}{i}
- d.Reps_aGR =
- ({-dict-} [] [f_aHs])
-{- rec -}
-AbsBinds [q{-aH9-}] [] [([q{-aH9-}], $d2{-rHt,x-}, d.Reps_aH3)]
- AbsBinds [] [] [([], f_aHu, f_aH6)]
- f_aH6
- x_r3x y_r3z
- = y_r3z
- d.Reps_aH3 =
- ({-dict-} [] [f_aHu])
-{- nonrec -}
-{- nonrec -}
-AbsBinds [r{-aGB-}] [d.Reps_aGG] [([r{-aGB-}], g{-r3H,x-}, g_aGw)]
- f_aHv =
- f{-r3I,x-}
- r{-aGB-}
- d.Reps_aGG
- g_aGw
- x_r3h = f_aHv x_r3h x_r3h
-{- nonrec -}
-ghc: module version changed to 1; reason: no old .hi file
-_interface_ ShouldSucceed 1
-_instance_modules_
-ArrBase IO PrelNum
-_usages_
-PrelBase 1 :: $d37 1 $d39 1 $d41 1 $d46 1 Eval 1;
-_exports_
-ShouldSucceed g Reps(f) X(Tag);
-_instances_
-instance {Reps PrelBase.Bool} = $d1;
-instance _forall_ [a] => {Reps (X a)} = $d2;
-instance _forall_ [a] => {PrelBase.Eval (X a)} = $d3;
-_declarations_
-1 $d1 _:_ {Reps PrelBase.Bool} ;;
-1 $d2 _:_ _forall_ [a] => {Reps (X a)} ;;
-1 $d3 _:_ _forall_ [a] => {PrelBase.Eval (X a)} ;;
-1 $mf _:_ _forall_ [a] {Reps a} => a -> a -> a ;;
-1 class Reps r3C where {f :: r3C -> r3C -> r3C} ;
-1 data X r3G = Tag r3G ;
-1 g _:_ _forall_ [a] {Reps a} => a -> a ;;