Haskell - >在'哪里'解析错误

-2

任何人都可以帮助我理解为什么我得到这个错误？ tar2.hs：40：41：错误：输入“C”解析错误Haskell - >在'哪里'解析错误

我试图移动在那里，但我得到了同样的错误......

函数“avancar”接收位置和方向，并给出了新的位置，按照同方向

type Caminho = [Passo] 
data Passo 
    = Avanca 
    | Sobe 
    | Desce 
    | CurvaEsq 
    | CurvaDir 
    deriving (Eq,Read,Show) 

data Mapa = Mapa (Posicao,Orientacao) Tabuleiro 
    deriving (Eq,Read,Show) 

type Tabuleiro = [[Peca]] 

data Peca = Peca Tipo Altura 
    deriving (Eq,Read,Show) 

data Tipo = Rampa Orientacao | Curva Orientacao | Recta | Lava 
    deriving (Eq,Read,Show) 

type Posicao = (Int,Int) 
type Dimensao = (Int,Int) 
type Altura = Int 


    posi :: Tabuleiro -> Posicao -> Orientacao -> Peca 
    posi t (x,y) orientacao = (t !! y) !! x 

    tipo :: Peca -> Tipo 

tipo (Peca a h) = a 


new_pos :: Mapa -> Mapa 
new_pos (Mapa ((x,y), orientacao) []) = Mapa ((x,y),orientacao) [] 
new_pos (Mapa ((x,y), orientacao) (h:t)) | e == Recta = Mapa (b, orientacao) (h:t) 
             | e == Curva Norte && orientacao == Norte = Mapa (d, Este) (h:t) 
             | e == Curva Norte && orientacao == Oeste = Mapa (c, Sul) (h:t) 
             | e == Curva Sul && orientacao == Sul = Mapa (d, Oeste) (h:t) 
             | e == Curva Sul && orientacao == Este = Mapa (c, Norte) (h:t) 
             | e == Curva Este && orientacao == Este = Mapa (d, Sul) (h:t) 
             | e == Curva Este && orientacao == Norte = Mapa (c, Oeste) (h:t) 
             | e == Curva Oeste && orientacao == Oeste = Mapa (d, Norte) (h:t) 
             | e == Curva Oeste && orientacao == Sul = Mapa (c, Este) (h:t) 
             | e == Rampa Norte && orientacao == Norte = Mapa (b, orientacao) (h:t) 
             | e == Rampa Sul && orientacao == Norte = Mapa (b, orientacao) (h:t) 
             | e == Rampa Este && orientacao == Este = Mapa (b, orientacao) (h:t) 
             | e == Rampa Oeste && orientacao == Este = Mapa (b, orientacao) (h:t) 
             | e == Rampa Sul && orientacao == Sul = Mapa (b, orientacao) (h:t) 
             | e == Rampa Norte && orientacao == Sul = Mapa (b, orientacao) (h:t) 
             | e == Rampa Oeste && orientacao == Oeste = Mapa (b, orientacao) (h:t) 
             | e == Rampa Este && orientacao == Oeste = Mapa (b, orientacao) (h:t) 
             where 
             b = avancar (x,y) orientacao 
             c = avancar (x,y) (muda_esq orientacao) 
             d = avancar (x,y) (muda_dir orientacao) 
             e = tipo (posi (h:t) (x,y) orientacao) 

avancar :: Posicao -> Orientacao -> Posicao 
avancar (x,y) orientacao = if (orientacao == Norte) then (x,y - 1) 
    else if (orientacao == Sul) then (x,y + 1) 
     else if (orientacao == Este) then (x + 1,y) 
      else (x - 1,y)

来源

2017-10-18 João Pimentel

'where'行应该缩进到上面的'|'块。我会建议在第一个'|'之前开始一个换行符以避免大量空白。 – cdk

@cdk这不是问题的原因：警卫不参与布局。（我自己在一个文件中测试了这个文件：有一个'where'块的缩进比一个函数定义更多，但是小于它的守卫是完全没问题的。） –

请复制并粘贴源代码本身;图像不允许我们自己重现您的错误并测试我们提出的修正。还包括足够的代码，我们可以将它加载到ghci中，并测试自己发布的代码是否会给出您声称的错误。 SO还有一些[开发MVCE的提示]（https://stackoverflow.com/help/mcve）。 –

唯一的解析错误我看到的是，posi和tipo类型声明缩进比什么都重要。一旦我解决了这个问题，这个文件解析得很好（尽管还有其他错误）。

来源

2017-10-18 19:41:57

Haskell - >在'哪里'解析错误

回答

相关问题