Добавил:
Tushkan
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Готовые лабораторные работы / 2 / 24
.hs --Описать функцию, получающую по заданному списку список тех же элементов в обратном порядке.
f24 xs = f24_1 xs []
--Первый параметр - исходный список, второй - инвариант - полученный список.
f24_1 [] y = y
f24_1 (x:xs) y = f24_1 xs (x:y)
f24 xs = f24_1 xs []
--Первый параметр - исходный список, второй - инвариант - полученный список.
f24_1 [] y = y
f24_1 (x:xs) y = f24_1 xs (x:y)