1 ghc: module version changed to 1; reason: no old .hi file
2 _interface_ ShouldSucceed 1 302
4 IO PrelAddr PrelArr PrelBounded PrelCCall PrelForeign PrelNum
6 PrelBase 1 :: $dEval0 1 $dEval1 1 $dEval2 1 $dEvalBool0 1 $dEvalDouble0 1 $dEvalInt0 1 Eval 1;
7 PrelTup 1 :: $dEval0 1;
9 ShouldSucceed mAp ranAFE ranOAL sNd AFE(MkAFE) FG(MkFG) OL(MkOL);
11 instance _forall_ [a b c] => {PrelBase.Eval (AFE a b c)} = $dEvalAFE0;
12 instance _forall_ [a b] => {PrelBase.Eval (FG a b)} = $dEvalFG0;
13 instance _forall_ [a] => {PrelBase.Eval (OL a)} = $dEvalOL0;
15 1 $dEvalAFE0 _:_ _forall_ [a b c] => {PrelBase.Eval (AFE a b c)} ;;
16 1 $dEvalFG0 _:_ _forall_ [a b] => {PrelBase.Eval (FG a b)} ;;
17 1 $dEvalOL0 _:_ _forall_ [a] => {PrelBase.Eval (OL a)} ;;
18 1 data AFE n a b = MkAFE (OL (n, FG a b)) ;
19 1 data FG a b = MkFG (OL (a, b)) ;
20 1 data OL a = MkOL [a] ;
21 1 mAp _:_ _forall_ [a b] => (a -> b) -> [a] -> [b] ;;
22 1 ranAFE _:_ _forall_ [a b c] => AFE a b c -> [FG b c] ;;
23 1 ranOAL _:_ _forall_ [a b] => OL (a, b) -> [b] ;;
24 1 sNd _:_ _forall_ [a b] => (a, b) -> b ;;