module Model.Round ( Round , roundOrder ) where import Time (Time) type alias Round = { duration : Time , score : Int } roundOrder : Round -> Round -> Order roundOrder round1 round2 = if round1.score == round2.score then compare round2.duration round1.duration else compare round1.score round2.score