blob: 6215ce6ad2648e2c6c275905a3a35e3b3ea84014 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
|
tcfail043.hs:38:17:
No instance for (Ord_ a0) arising from a use of ‘gt’
The type variable ‘a0’ is ambiguous
Relevant bindings include
bs :: [a0] (bound at tcfail043.hs:38:8)
a :: a0 (bound at tcfail043.hs:38:6)
search :: a0 -> [a0] -> Bool (bound at tcfail043.hs:37:1)
Note: there is a potential instance available:
instance Ord_ Int -- Defined at tcfail043.hs:34:10
In the expression: gt (hd bs) a
In the expression:
if gt (hd bs) a then
False
else
if eq a (hd bs) then True else search a (tl bs)
In the expression:
\ a bs
-> if gt (hd bs) a then
False
else
if eq a (hd bs) then True else search a (tl bs)
tcfail043.hs:40:25:
No instance for (Eq_ a0) arising from a use of ‘eq’
The type variable ‘a0’ is ambiguous
Relevant bindings include
bs :: [a0] (bound at tcfail043.hs:38:8)
a :: a0 (bound at tcfail043.hs:38:6)
search :: a0 -> [a0] -> Bool (bound at tcfail043.hs:37:1)
Note: there are several potential instances:
instance Eq_ a => Eq_ [a] -- Defined at tcfail043.hs:23:10
instance Eq_ Int -- Defined at tcfail043.hs:20:10
In the expression: eq a (hd bs)
In the expression: if eq a (hd bs) then True else search a (tl bs)
In the expression:
if gt (hd bs) a then
False
else
if eq a (hd bs) then True else search a (tl bs)
|