次のような関数に問題があります。
data City = City {Car :: String, Weight :: Int, Color :: String}
-「City」のリストがあり、関数はタプルのリストを作成する必要があり、各タプルは (Car、「重みの合計」) であるため、Car が等しい場合、重みは追加して、次のようにします。
main> [(Porche,180),(Ferrari,400),(Opel,340)]
車の重量を追加する必要があるため、出力リストで車を繰り返すことはできません。
全車種のリストを作って、重みをフィルタリングして足し合わせてリストを作ろうと思ったのですが、うまくいきません。