Re[5]: [Haskell] point-free - этюды
От: deniok Россия  
Дата: 16.10.09 08:34
Оценка: :))
Здравствуйте, nikov, Вы писали:

N>Здравствуйте, Пельмешко, Вы писали:


П>>
П>>let fpower = Seq.init >> (>>) Const >> (<<) (Seq.fold (>>) id)
П>>


N>Мои варианты на Haskell:


N>
N>fpower = (foldr (.) id.).replicate
N>

N>или
N>
N>fpower = (appEndo.).(mconcat.).(.Endo).replicate
N>


Это похоже на рождение нового стиля, nikov-style
Активное использование point-free плюс конструкции
-- для f :: a -> b
(f .) :: (c -> a) -> c -> b
(. f) :: (b -> c) -> a -> c
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.