Я продолжаю получать это сообщение, что я делаю неправильно?Haskell: ошибка синтаксического анализа на входе '='
data Pile a = Pile [a] deriving (Show,Eq,Ord)
flpile:: (Eq a, Eq b, Eq c) => Pile (a,(b,c))-> Pile (a,b,c)
flpile (Pile (a,(b,c)) = Pile [asocr (a,(b,c))]
asocr :: (a,(b,c)) -> (a,b,c)
asocr (a,(b,c)) = (a,b,c)
Спасибо, это сработало, я noob в haskell пытается реализовать стек, с некоторыми полезными функциями. – user2278354