chore: Min/Max typeclasses
This commit is contained in:
parent
39feeaab74
commit
783a61ab76
2 changed files with 4 additions and 0 deletions
|
|
@ -153,6 +153,8 @@ instance : Repr MTime := inferInstanceAs (Repr SystemTime)
|
|||
instance : Ord MTime := inferInstanceAs (Ord SystemTime)
|
||||
instance : LT MTime := ltOfOrd
|
||||
instance : LE MTime := leOfOrd
|
||||
instance : Min MTime := minOfLe
|
||||
instance : Max MTime := maxOfLe
|
||||
|
||||
instance : NilTrace MTime := ⟨0⟩
|
||||
instance : MixTrace MTime := ⟨max⟩
|
||||
|
|
|
|||
|
|
@ -36,6 +36,8 @@ deriving Inhabited, Repr, DecidableEq, Ord
|
|||
|
||||
instance : LT BuildType := ltOfOrd
|
||||
instance : LE BuildType := leOfOrd
|
||||
instance : Min BuildType := minOfLe
|
||||
instance : Max BuildType := maxOfLe
|
||||
|
||||
/-- The arguments to pass to `leanc` based on the build type. -/
|
||||
def BuildType.leancArgs : BuildType → Array String
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue