목록의 일부를 누적시키는 프로그램 만들기 - Haskell

Question

나는 프로그램에서 일하고있다. 의지는 트리플의 목록을 취하고 그 중 하나에 따라 다른 부분의 합을 찾고 싶다. 트리플.

totalWeightOfFirstClass :: [Parcel] -> Weight 
totalWeightOfFirstClass [] = go 
totalWeightOfFirstClass ((weight, postcode, firstclass):xs) = 
    if firstclass == True then 
    go weight 
    totalWeightOfFirstClass xs 
    else 
    totalWeightOfFirstClass xs 
where 
    go :: Int -> Int 
    go _ = 0 
    go x = 

따라서 프로그램은 목록에있는 모든 가중치를 더하고 그 트리플이 첫 번째 클래스 인 경우에만 끝에 표시해야합니다. 지금까지 필자는 모든 값을 누적하고 결과적으로 결국 표시하고자하는 도우미 선언문을 가지고 있습니다.

도움이나 조언을 주시면 감사하겠습니다.

안부, Kieran. 코드에서 너무 많은 일을의

totalWeightOfFirstClass :: [Parcel] -> Weight 
totalWeightOfFirstClass [] = 0 
totalWeightOfFirstClass ((weight, postcode, firstclass):xs) 
    | firstclass = weight + totalWeightOfFirstClass xs 
    | otherwise = totalWeightOfFirstClass xs 

Answer 1

, 당신은 소포가 첫 수업을 전송되는 가중치의 합이,이 트릭을 할해야합니다. 이와 같이 기본적인 재귀를 작성하는 대신 코드를 표현하기 위해 일반 결합자를 사용하는 것이 좋습니다.

totalWeightOfFirstClass = sum . (fmap (\(weight, _, _) -> weight)) . filter (\(_, _, firstc) -> firstc) 

필터를 적용한 후에 모든 가중치의 합계입니다. 보시다시피, 코드는 읽기에 매우 깨끗합니다.

Answer 2

: 내가 제대로 이해 해요 경우