1 ==================== Typechecked ====================
2 AbsBinds [takX, takZ] [] [([takX, takZ], k{-r3n,x-}, k_akH)]
3 k_akH x_r3l y_r3m = x_r3l
7 [([talz, talB, talD], s{-r3o,x-}, s_al1)]
8 s_al1 f_r3h g_r3i x_r3j = f_r3h x_r3j g_r3i x_r3j
9 AbsBinds [talP] [] [([talP], main{-r3p,x-}, main_alF)]
11 = s{-r3o,x-} [talP, talP, GHC.Void{-3T,W-} -> talP] k{-r3n,x-}
14 k{-r3n,x-} [GHC.Void{-3T,W-}, talP]
17 ghc: module version changed to 1; reason: no old .hi file
18 _interface_ ShouldSucceed 1
22 ShouldSucceed k main s;
24 1 k _:_ _forall_ [ta tb] => tb -> ta -> tb ;;
25 1 main _:_ _forall_ [ta] => ta -> ta ;;
26 1 s _:_ _forall_ [ta tb tc] => (tb -> tc -> ta) -> (tb -> tc) -> tb -> ta ;;