Day 9
This commit is contained in:
@@ -6,6 +6,9 @@ import Prelude
|
||||
nums' : String → String → List Int
|
||||
nums' by s = map stringToInt $ filter (_/=_ "") $ split (trim s) by
|
||||
|
||||
min : ∀ a. {{Ord a}} → a → a → a
|
||||
min x y = if x < y then x else y
|
||||
|
||||
max : ∀ a. {{Ord a}} → a → a → a
|
||||
max a b = if a < b then b else a
|
||||
|
||||
|
||||
Reference in New Issue
Block a user