Учебник по Haskell | страница 35



Обратите внимание на эту особенность языка, вид значения определяется пользователем, в экземпляре

класса Show. Из соображений наглядности вид значения может сильно отличаться от его внутреннего пред-

ставления.

В этом разделе мы рассмотрим несколько примеров с классом Show, но перед этим мы поговорим о стро-

ках и символах в языке Haskell.

Строки и символы

Посмотрим в интерпретаторе на определение строк (тип String), для этого мы воспользуемся командой

:i (сокращение от :info):

Prelude> :i String

type String = [Char]

-- Defined in ‘GHC.Base’

Интерпретатор показал определение типа и в комментариях указал в каком модуле тип определён. В

этом определении мы видим новое ключевое слово type. До этого для определения типов нам встречалось

лишь слово data. Ключевое слово type определяет синоним типа. При этом мы не вводим новый тип, мы

лишь определяем для него псевдоним. String является синонимом для списка значений типа Char. Тип

Char представляет символы. Итак строка – это список символов. В Haskell символы пишутся в ординарных

кавычках, а строки в двойных:

Prelude> [’H’,’e’,’l’,’l’,’o’]

”Hello”

it :: [Char]

Prelude> ”Hello”

”Hello”

it :: [Char]

Prelude> ’+’

’+’

it :: Char

Для обозначения перехода на новую строку используется специальный символ \n. Если строка слишком

длинная и не помещается на одной строке, то её можно перенести так:

str = ”My long long long long \

\long long string”

Перенос осуществляется с помощью комбинации следующих друг за другом обратных слэшей.

Нам понадобится функция конкатенации списков (++), она определена в Prelude, с её помощью мы будем

объединять строки:

Prelude> :t (++)

(++) :: [a] -> [a] -> [a]

Prelude> ”Hello” ++ [’ ’] ++ ”World”

”Hello World”

it :: [Char]

Пример: Отображение дат и времени

Приведём, пример в котором отображаемое значение не совпадает с видом значения в коде. Мы отобра-

зим значения из мира календаря. Для начала давайте сохраним определения в отдельном модуле:

module Calendar where

import Prelude (Int, Char, String, Show(.. ), (++))

-- Дата

Класс Show. Строки и символы | 29

data Date = Date Year Month Day

-- Год

data Year

= Year Int

-- Int это целые числа

-- Месяц

data Month

= January

| February

| March

| April

| May

| June

| July

| August

| September

| October

| November | December

data Day = Day Int

-- Неделя

data Week

= Monday

| Tuesday

| Wednesday

| Thursday

| Friday

| Saturday

| Sunday

-- Время

data Time = Time Hour Minute Second

data Hour

= Hour

Int

-- Час

data Minute = Minute Int

-- Минута