Contents

module Meetup (Weekday(..), Schedule(..), meetupDay) where

import Data.Time.Calendar (Day)

data Weekday = Monday
             | Tuesday
             | Wednesday
             | Thursday
             | Friday
             | Saturday
             | Sunday

data Schedule = First
              | Second
              | Third
              | Fourth
              | Last
              | Teenth

meetupDay :: Schedule -> Weekday -> Integer -> Int -> Day
meetupDay schedule weekday year month = error "You need to implement this function."

Version data entries

329 entries across 329 versions & 1 rubygems

Version	Path
trackler-2.2.1.180	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.179	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.178	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.177	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.176	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.175	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.174	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.173	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.172	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.171	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.170	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.169	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.167	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.166	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.165	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.164	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.163	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.162	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.161	tracks/haskell/exercises/meetup/src/Meetup.hs
trackler-2.2.1.160	tracks/haskell/exercises/meetup/src/Meetup.hs