module HaskellCourse where
data MiniCourse = MiniCourse
{ title ∷ String
, startDate ∷ Date
, endDate ∷ Date
, schedule ∷ [(ScheduleDay, Timetable, Location)]
, spots ∷ Integer
, certificate ∷ Bool
, teachers ∷ [Person]
, contact ∷ String
}
haskell ∷ MiniCourse
haskell = MiniCourse
{ title = "Functional programming with Haskell"
, startDate = (2017, 3, 24) -- no sessions on Holidays:
, endDate = (2017, 5, 26) -- 14/4 & 21/4
, schedule = [(Every Friday, T12, IMD "A103")]
, spots = 40
, certificate = False -- not guaranteed!
, teachers = ["Thanos Tsouanas", "Elias Gabriel Amaral da Silva"]
, contact = "thanos" ++ ('@' : "imd.ufrn.br")
}
-- Subscribe to the event via SIGAA → Extensão → Eventos
-- (Search for «Haskell» to find the event.)