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.)