Как написать собственную рекурсивную реализацию функции last?

@рами · Регистрация: 31.10.2014

как написать собственную рекурсивную реализацию функции last ?

@Catstail · 24.01.2016, 17:48

Например, так:

Haskell

last' :: [a] -> a
last' []  = error "Empty list"
last' [x] = x
last' (_:xs) = last' xs
 
Main> last' "asdf"
'f'
Main> last' [1,2,3,4]
4

@_Destructor_ · 01.02.2016, 10:46

Выбирай любой способ:

Haskell

last' :: [a] -> a
last' [] = error "list is empty."
last' list @ (x:xx)
 | null xx == True = x
 | otherwise = last' xx
 
last'' :: [a] -> a -- через оператор (!!)
last'' [] = error "list is empty."
last'' list = (!!(length list - 1)) list

@Catstail · 01.02.2016, 11:49

_Destructor_,

Вместо:

Haskell

1	\| null xx == True = x

можно без затей написать:

Haskell

1	\| null xx = x

А вычислять последний элемент с помощью length - нерационально, т.к. требует два прохода по списку.

@рами 0 / 0 / 0 Регистрация: 31.10.2014 Сообщений: 33
		1
	Как написать собственную рекурсивную реализацию функции last? 24.01.2016, 15:10. Показов 819. Ответов 3 Метки нет (Все метки) как написать собственную рекурсивную реализацию функции last ? __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

Опции темы