(lambda f: f(f))(lambda func: lambda x: 1 if x < 2 else x * func(func)(x — 1))
@ulidtko: посмотрите на это Ω
Тебе б на перле пейсать.
мне ентерпрайс-программирование больше по душе
пойчему парсер минус превратил в тире?
потому что пстач как бы для мыслей, а не для кода
в мыслях не может быть минусов? или использовать –?
ага, в мыслях код может быть, а в коде мысли. Но вообще да, в мыслях минус — слово "минус".
говно, даже читается нормально
кстати, в хаскеле точно такое же сделать нельзя, из-за ограничений системы типов. Только с помощью fix:ghci> let g = \f → \x → if x < 2 then 1 else x * f(x-1)ghci> let fact = fix gghci> fact 11ghci> fact 5120Алсо, further reading для заинтересовавшихся: http://en.wikipedia.org/wiki/Fixed-point...
лошара.Prelude Control.Monad.Fix> (fix $ (\s → \x → if x < 2 then 1 else x * s (x — 1))) 5120
> (fix $> fix> Только с помощью fix
алсо, тебе следует вести себя поучтивее, поуважительнее и повежливее. А то хамишь, как самый настоящий хуй.
добавь меня в блеклист
нет, ты интересные вещи пишешь и постишь. Вот только хамишь в ответ почему-то.
Тебе б на перле пейсать.
мне ентерпрайс-программирование больше по душе
пойчему парсер минус превратил в тире?
потому что пстач как бы для мыслей, а не для кода
в мыслях не может быть минусов? или использовать –?
ага, в мыслях код может быть, а в коде мысли. Но вообще да, в мыслях минус — слово "минус".
говно, даже читается нормально
кстати, в хаскеле точно такое же сделать нельзя, из-за ограничений системы типов. Только с помощью fix:
ghci> let g = \f → \x → if x < 2 then 1 else x * f(x-1)
ghci> let fact = fix g
ghci> fact 1
1
ghci> fact 5
120
Алсо, further reading для заинтересовавшихся: http://en.wikipedia.org/wiki/Fixed-point...
лошара.
Prelude Control.Monad.Fix> (fix $ (\s → \x → if x < 2 then 1 else x * s (x — 1))) 5
120
> (fix $
> fix
> Только с помощью fix
алсо, тебе следует вести себя поучтивее, поуважительнее и повежливее. А то хамишь, как самый настоящий хуй.
добавь меня в блеклист
нет, ты интересные вещи пишешь и постишь. Вот только хамишь в ответ почему-то.