2 drv003.hs:15: No explicit method nor default method for `PrelBase.=='
3 in an instance declaration for `PrelBase.Eq'
5 drv003.hs:12: No explicit method nor default method for `PrelBase.=='
6 in an instance declaration for `PrelBase.Eq'
9 ================================================================================
12 _/\_ a_tr3u -> \ tpl_B1 tpl_B2 ->
13 MkBar{-r3I,x-}{i} {_@_ a_tr3u tpl_B1 tpl_B2}
15 _/\_ a_tr3z -> \ tpl_B1 tpl_B2 ->
16 MkFoo{-r3H,x-}{i} {_@_ a_tr3z tpl_B1 tpl_B2}
18 _/\_ a_tr3B b_tr3C -> \ tpl_B1 tpl_B2 ->
19 C1{-r9,x-}{i} {_@_ a_tr3B _@_ b_tr3C tpl_B1 tpl_B2}
21 _/\_ a_tr3B b_tr3C -> \ tpl_B1 tpl_B2 ->
22 C2{-r8,x-}{i} {_@_ a_tr3B _@_ b_tr3C tpl_B1 tpl_B2}
24 _/\_ a_tr3B b_tr3C -> \ tpl_B1 ->
25 C3{-rb,x-}{i} {_@_ a_tr3B _@_ b_tr3C tpl_B1}
28 [d.Eq_aDz, d.Ping_aDA, d.Eq_aDB, d.Ping_aDC]
29 [([taCu, taCv], $d3{-rFu,x-}, d.Eq_aCh)]
31 d.Eq_aDG = $d2{-rFC,x-} taCu d.Eq_aDI
32 ==_aFE = PrelBase.=={-8Y,p-} (Foo{-r3F,x-} taCu) d.Eq_aDG
33 d.Ping_aDM = d.Ping_aDC
34 d.Eq_aDK = $d1{-rFB,x-} taCv d.Ping_aDM
35 ==_aFF = PrelBase.=={-8Y,p-} (Bar{-r3E,x-} taCv) d.Eq_aDK
37 d.Ping_aDT = d.Ping_aDC
39 d.Ping_aDV = d.Ping_aDA
41 $d3{-rFu,x-} [taCv, taCu]
42 [d.Eq_aDS, d.Ping_aDT, d.Eq_aDU, d.Ping_aDV]
43 ==_aFG = PrelBase.=={-8Y,p-} (T{-r3G,x-} taCv taCu) d.Eq_aDQ
45 d.Ping_aE0 = d.Ping_aDA
47 d.Ping_aE2 = d.Ping_aDA
49 $d3{-rFu,x-} [taCu, taCu]
50 [d.Eq_aDZ, d.Ping_aE0, d.Eq_aE1, d.Ping_aE2]
51 ==_aFH = PrelBase.=={-8Y,p-} (T{-r3G,x-} taCu taCu) d.Eq_aDX
53 AbsBinds [] [] [([], ==_aFJ, ==_aCl)]
54 ==_aCl (C1{-r9,x-}{i} a1_rBE a2_rBF) (C1{-r9,x-}{i} b1_rBG b2_rBH)
55 = (a1_rBE ==_aFE b1_rBG)
56 PrelBase.&&{-rfy,p-} (a2_rBF ==_aFF b2_rBH)
57 ==_aCl (C2{-r8,x-}{i} a1_rBJ a2_rBK) (C2{-r8,x-}{i} b1_rBL b2_rBM)
58 = (a1_rBJ ==_aFD b1_rBL)
59 PrelBase.&&{-rfy,p-} (a2_rBK ==_aFG b2_rBM)
60 ==_aCl (C3{-rb,x-}{i} a1_rBO) (C3{-rb,x-}{i} b1_rBP)
61 = a1_rBO ==_aFH b1_rBP
62 ==_aCl a_rBR b_rBS = PrelBase.False{-58,w-}{i}
63 AbsBinds [] [] [([], /=_aFK, /=_aDs)]
64 /=_aDs a_rBW b_rBX = PrelBase.not{-r3D,p-} ==_aFI a_rBW b_rBX
65 d.Eq_aCh = ({-dict-} [] [==_aFJ, /=_aFK])
66 AbsBinds [taFp] [] [([taFp], $d4{-rFw,x-}, d.Eval_aEc)]
67 d.Eval_aEc = ({-dict-} [] [])
68 AbsBinds [taFq] [] [([taFq], $d5{-rFy,x-}, d.Eval_aEi)]
69 d.Eval_aEi = ({-dict-} [] [])
70 AbsBinds [taFr, taFs] [] [([taFr, taFs], $d6{-rFA,x-}, d.Eval_aEp)]
71 d.Eval_aEp = ({-dict-} [] [])
72 AbsBinds [taED] [d.Ping_aEM] [([taED], $d1{-rFB,x-}, d.Eq_aEv)]
74 $m/=_aFL = PrelBase.$m/={-rfk,p-} (Bar{-r3E,x-} taED) d.Eq_aEQ
75 AbsBinds [] [] [([], ==_aFM, ==_aEA)]
77 = GHCerr.noDefaultMethodError{-8k,w-}
80 -> PrelBase.Bool{-34,W-}) "<NoSrcLoc>|PrelBase.=="
81 AbsBinds [] [] [([], /=_aFN, /=_aEJ)]
83 d.Eq_aEv = ({-dict-} [] [==_aFM, /=_aFN])
84 AbsBinds [taF5] [d.Eq_aFe] [([taF5], $d2{-rFC,x-}, d.Eq_aEX)]
86 $m/=_aFO = PrelBase.$m/={-rfk,p-} (Foo{-r3F,x-} taF5) d.Eq_aFi
87 AbsBinds [] [] [([], ==_aFP, ==_aF2)]
89 = GHCerr.noDefaultMethodError{-8k,w-}
92 -> PrelBase.Bool{-34,W-}) "<NoSrcLoc>|PrelBase.=="
93 AbsBinds [] [] [([], /=_aFQ, /=_aFb)]
95 d.Eq_aEX = ({-dict-} [] [==_aFP, /=_aFQ])
96 AbsBinds [taFt] [d.Ping_aFm] []
97 d.Eq_aFo = PrelBase.$d8{-rbg,p-}
98 ==_aFD = PrelBase.=={-8Y,p-} PrelBase.Int{-3g,W-} d.Eq_aFo
99 ghc: module version changed to 1; reason: no old .hi file
100 _interface_ ShouldSucceed 1
104 PrelBase 1 :: $d16 1 $d2 1 $d33 1 $d38 1 $d40 1 $d42 1 $d47 1 $d8 1 $m/= 1 && 1 not 1 Eq 1 Eval 1;
107 ShouldSucceed Bar(MkBar) Foo(MkFoo) Ping T(C1 C2 C3);
109 instance _forall_ [b] {Ping b} => {PrelBase.Eq (Bar b)} = $d1;
110 instance _forall_ [a] {PrelBase.Eq a} => {PrelBase.Eq (Foo a)} = $d2;
111 instance _forall_ [a b] {PrelBase.Eq a, Ping a, PrelBase.Eq b, Ping b} => {PrelBase.Eq (T a b)} = $d3;
112 instance _forall_ [a] => {PrelBase.Eval (Bar a)} = $d4;
113 instance _forall_ [a] => {PrelBase.Eval (Foo a)} = $d5;
114 instance _forall_ [a b] => {PrelBase.Eval (T a b)} = $d6;
116 1 $d1 _:_ _forall_ [b] {Ping b} => {PrelBase.Eq (Bar b)} ;;
117 1 $d2 _:_ _forall_ [a] {PrelBase.Eq a} => {PrelBase.Eq (Foo a)} ;;
118 1 $d3 _:_ _forall_ [a b] {PrelBase.Eq a, Ping a, PrelBase.Eq b, Ping b} => {PrelBase.Eq (T a b)} ;;
119 1 $d4 _:_ _forall_ [a] => {PrelBase.Eval (Bar a)} ;;
120 1 $d5 _:_ _forall_ [a] => {PrelBase.Eval (Foo a)} ;;
121 1 $d6 _:_ _forall_ [a b] => {PrelBase.Eval (T a b)} ;;
122 1 data Bar a = MkBar PrelBase.Int PrelBase.Int ;
123 1 data Foo a = MkFoo PrelBase.Double a ;
125 1 data T a b = C1 (Foo a) (Bar b) | C2 PrelBase.Int (T b a) | C3 (T a a) ;