ハスケルデータ型ソートのリスト

Question

私は2つの科目のためのマークを持つ学生という名前のカスタムデータ型を得ました。平均の2つを計算するaverageという名前の関数を作成しました。すべて正常に動作します。

私の質問は、平均で学生のリストを並べ替えるにはどうすればいいですか？

data Student = Student 
    {studentName :: String, 
    subject1 :: Double, 
    subject2 :: Double} deriving (Show) 

average :: Student -> Double 
average (Student _ sub1 sub2) = (sub1 + sub2)/2 

students :: [Student] 
students = [Student "Dave" 50.0 40.0, 
      Student "Joe" 65.0 90.0, 
      Student "Ann" 75.0 82.0] 

P.S.私はハスケルの初心者で、それが inbuilt平均関数を持っているかどうかわからないが、同じように の方法でリストをソートすることができれば、私は好む（これがあれば）inbuilt平均関数を使用せずにこの 代わりに異なるタイプの関数 を使用してください。

Answer 1

import Data.Function (on) 
import Data.List (sortBy) 

studentsSortedByAverage = sortBy (compare `on` average) students 

これらは、一重引用符ではなく、onのバッククォートであることに注意してください。

sortByとonのドキュメントへのリンクです。

---

あなたはData.Functionが付属していない古いコンパイラを使用している場合は、ここでonの定義は次のとおりです。

on :: (b -> b -> c) -> (a -> b) -> a -> a -> c 
(.*.) `on` f = \x y -> f x .*. f y