[Haskell] Поиск в структуре

 
0
 
Functional languages
ava
FewG | 17.05.2011, 23:39
Всем Добрый вечер,

было задание написать что-то вроде расписания. В этоге вышло сие чудо:


type Day = Int
type Month = String
type Year = Int

data Timetable
    = Lesson {
        title :: String,
        hs :: Timetable,
        db :: Timetable
    }
    | Teacher {
        name :: String,
        termine :: Timetable

    }
    | Dates{
        date :: [(Day, Month, Year)]
    }

    deriving (Show, Read, Eq)


Также это было заполнено содержанием:


let test = Lesson "Math" 
        (Teacher "Wasja W." (Dates [(13, "April", 2011), (20, "April", 2011), (25, "Mai", 2011)]))
        (Teacher "Katja K." (Dates [(1, "Juni", 2011), (8, "Juni", 2011), (13, "Juli", 2011)]))


А теперь вопрос, как сделать так, чтобы при вводе blablabla (это имя функции) Предмет и Дата выдавало имя Учителя?

added later:
Забыл в названии указать, что речь идет о [Haskell].  smile  smile 
Comments (1)
ava
Kakadu | 18.05.2011, 17:55 #
Я не спец по х-ю, но по-моему типы выглядят как-то чересчур сложно. Попробуйте как-нибудь сделать, чтобы расписание было как список "троек" (название,учитель,дата)? Думаю там поиск будет проще писать....
Please register or login to write.
Firm of day
Вы также можете добавить свою фирму в каталог IT-фирм, и публиковать статьи, новости, вакансии и другую информацию от имени фирмы.
Подробнее
Contributors
  Kakadu   FewG
advanced
Submit