Hakell의 구문 분석 오류

Question

invalidset :: Int -> Int -> Int -> [Int] 

invalidset _ 0 _ = [] 
invalidset 0 _ _ = [] 
invalidset n k 0 = [ z | z <- [1..n], mod z k == 1] 
invalidset n k x = [ z |z <- (validset n k (x-1)) , mod (z-1) k == mod(head(invalidset n k (x-1)) k ] 


validset :: Int -> Int -> Int -> [Int] 

validset _ 0 _ = [] 
validset 0 _ _ = [] 
validset n k 0 = [x | x <-[1..n], mod x k /= 1 ] 
validset n k x = [z | z <- validset n k (x-1) , elem z (invalidset n k x) == False ] 

GHCi에서이 파일을로드 할 때 "입력시 구문 분석 오류가 발생했습니다."] "행의 6 : 104에 나와 있습니다.

사전에

감사합니다 (그것은 "invalidset N K x"를 정의의 라인에 구문 분석 오류를 말하는).

Answer 1

그냥 missmatch ) :

invalidset n k x = [ z |z <- (validset n k (x-1)) , mod (z-1) k == mod(head(invalidset n k (x-1))) k ] 

하나 더 )

Here(x-1)) 후에 당신은 그것을 실행해야합니다.