小编Jac*_*ck 的帖子

这是我的代码:

connected :: [(Integer,Integer)] -> Bool
connected [] = True
connected [(_,_)] = True
connected (a,b):(c,d):xs
                 | a > c     = False
                 |otherwise = connected (c,d):xs

当我加载它GHCi它显示

error: parse error in pattern: connected

我在哪里弄错了？