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

5a ex1+2

Browse Source
This commit is contained in:
Aaro Koivukangas
2025-12-22 21:43:39 +02:00
parent 9545dd72e9
commit 2e3a8a4538
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
exercises/Set5a.hs
+2 -1
View File
@@ -12,7 +12,7 @@ import Mooc.Todo
-- Bus, Tram and Train. -- Bus, Tram and Train.
-- --
-- The constructors don't need any fields. -- The constructors don't need any fields.
data Vehicle = Bike | Bus | Tram | Train
------------------------------------------------------------------------------ ------------------------------------------------------------------------------
-- Ex 2: Define the type BusTicket that can represent values like these: -- Ex 2: Define the type BusTicket that can represent values like these:
@@ -20,6 +20,7 @@ import Mooc.Todo
-- - MonthlyTicket "January" -- - MonthlyTicket "January"
-- - MonthlyTicket "December" -- - MonthlyTicket "December"
data BusTicket = SingleTicket | MonthlyTicket String
------------------------------------------------------------------------------ ------------------------------------------------------------------------------
-- Ex 3: Here's the definition for a datatype ShoppingEntry that -- Ex 3: Here's the definition for a datatype ShoppingEntry that