iritmaximus/haskell
1
0
Fork 0
mirror of https://github.com/iritmaximus/haskell.git synced 2026-10-12 19:13:39 +03:00
Code Issues Packages Projects Releases Wiki Activity

6 ex2

Browse Source
This commit is contained in:
Aaro Koivukangas
2025-12-26 19:15:56 +02:00
parent 6ee33f5f5b
commit fc4bd44ff0
1 changed files with 11 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files
exercises/Set6.hs
+11 -4
View File
@@ -25,10 +25,17 @@ instance Eq Country where
-- Remember minimal complete definitions!
instance Ord Country where
compare = todo -- implement me?
(<=) = todo -- and me?
min = todo -- and me?
max = todo -- and me?
compare Finland Norway = LT
compare Finland Switzerland = LT
compare Norway Switzerland = LT
compare Finland Finland = EQ
compare Norway Norway = EQ
compare Switzerland Switzerland = EQ
compare _ _ = GT
--(<=) = todo -- and me?
--min = todo -- and me?
--max = todo -- and me?
------------------------------------------------------------------------------
-- Ex 3: Implement an Eq instance for the type Name which contains a String.