1 ==================== Typechecked ====================
3 _/\_ a_tr3q -> \ tpl_B1 -> Var{-r5,x-}{i} {_@_ a_tr3q tpl_B1}
5 _/\_ a_tr3q -> \ tpl_B1 tpl_B2 ->
6 App{-r4,x-}{i} {_@_ a_tr3q tpl_B1 tpl_B2}
7 AbsBinds [taRR] [] [([taRR], g{-r3t,x-}, g_aRu)]
8 g_aRu (a_r3j, (Var{-r5,x-}{i} name_r3k))
9 = [name_r3k] ([PrelBase.Char{-38,W-}])
10 g_aRu (a_r3m, (App{-r4,x-}{i} e1_r3n e2_r3o))
11 = ++_aSf [PrelBase.Char{-38,W-}] (g_aRu e1_r3n) (g_aRu e2_r3o)
12 AbsBinds [taSe] [] [([taSe], $d1{-rSi,x-}, d.Eval_aSb)]
13 d.Eval_aSb = ({-dict-} [] [])
14 d.MonadPlus_aSd = PrelBase.$d23{-rpi,p-}
15 ++_aSf = PrelBase.++{-ruo,p-} PrelBase.[]{-3j,W-} d.MonadPlus_aSd
17 ghc: module version changed to 1; reason: no old .hi file
18 _interface_ ShouldSucceed 1
22 PrelBase 1 :: $d2 1 $d23 1 $d24 1 $d25 1 $d38 1 $d39 1 $d40 1 $d42 1 $d45 1 $d47 1 $m>> 1 Eval 1 Monad 1 MonadPlus 1 MonadZero 1;
25 ShouldSucceed g AnnExpr Expr(Var App);
27 instance _forall_ [a] => {PrelBase.Eval (Expr a)} = $d1;
29 1 $d1 _:_ _forall_ [a] => {PrelBase.Eval (Expr a)} ;;
30 1 type AnnExpr a = (a, Expr a) ;
31 1 data Expr a = Var [PrelBase.Char] | App (AnnExpr a) (AnnExpr a) ;
32 1 g _:_ _forall_ [ta] => (ta, Expr ta) -> [[PrelBase.Char]] ;;