- 1
- 2
- 3
- 4
- 5
- 6
happy_numbers = [ tos (a,b,c,d,e,f a b c d e) | a <- [0..9], b <- [0..9], c <- [0..9], d <- [0..9], e <- [0..9], f a b c d e <= 9, f a b c d e >= 0 ]
where
tos (a,b,c,d,e,f) = show a ++ show b ++ show c ++ show d ++ show e ++ show f
f a b c d e = a + b + c - d - e
main = mapM print $ happy_numbers
Fai 11.11.2012 11:22 # +5
bormand 11.11.2012 11:34 # +3
LispGovno 11.11.2012 11:37 # 0
А как это работает над списками? Аппликативые функторы в монадах?
bormand 11.11.2012 11:39 # +1
Раскури устройство списковой монады, если интересно узнать как это работает.
LispGovno 11.11.2012 11:49 # 0
http://ideone.com/QTh4a0
Fai 11.11.2012 11:58 # 0
bormand 11.11.2012 12:11 # +3
Надмозг детектед.
Fai 11.11.2012 12:14 # 0
bormand 11.11.2012 12:16 # +1
P.S. А ну да, там еще функторы в этом пакете.
http://hackage.haskell.org/packages/archive/base/latest/doc/html/Control-Monad.html
roman-kashitsyn 11.11.2012 11:59 # +3
Ты смешал две монады и ожидаешь, что это будет работать.
bormand 11.11.2012 12:20 # +4
...а взболтать забыл.
LispGovno 11.11.2012 13:06 # −1
roman-kashitsyn 11.11.2012 13:17 # +2
Fai 11.11.2012 12:09 # 0
bormand 11.11.2012 14:00 # +1
LispGovno 11.11.2012 14:08 # −1
bormand 11.11.2012 14:11 # 0
Fai 11.11.2012 14:15 # +1
Монады - это модель грязного мира на чистом языке.
Это как пластиковая какашка. Она только выглядит как побочный эффект.
Fai 11.11.2012 14:10 # 0
roman-kashitsyn 11.11.2012 11:32 # +1
Fai 11.11.2012 11:33 # 0
suc-daniil 11.11.2012 11:55 # +6
Fai 11.11.2012 11:57 # +3
1. Ух ты! Хоть что то хаскелевое на говнокоде.
2. Это же хаскель... Ничего не понимаю, значит говно - плюсану.
scriptin 11.11.2012 12:12 # +4
2. Отличный повод расширить кругозор
Fai 11.11.2012 12:15 # +4
http://govnokod.reformal.ru/proj/?ia=376309
LispGovno 11.11.2012 13:33 # −1
Fai 11.11.2012 13:51 # 0
bormand 11.11.2012 14:07 # +2
UPD: Frag, http://www.youtube.com/watch?v=0jYdu2u8gAU
zim 11.11.2012 15:18 # +1
LispGovno 11.11.2012 15:23 # 0
bormand 11.11.2012 15:25 # +1
bormand 11.11.2012 15:25 # 0
Fai 11.11.2012 15:29 # 0
bormand 11.11.2012 15:35 # 0
Fai 11.11.2012 15:41 # 0
LispGovno 11.11.2012 15:41 # −1
Fai 11.11.2012 15:44 # +1
Для всех языков использую Sublime Text 2. Рекомендую попробовать.
LispGovno 11.11.2012 15:50 # 0
Fai 11.11.2012 17:12 # 0
Рекомендую уже всё-таки попробовать.
scriptin 11.11.2012 15:42 # 0
Fai 11.11.2012 15:44 # 0
Yuuri 11.11.2012 20:38 # +3
roman-kashitsyn 11.11.2012 21:46 # −1
Yuuri 11.11.2012 22:52 # +1
roman-kashitsyn 11.11.2012 23:30 # +2
А так редактор неплохой, довольно шустрый, правда, мутные глюки портят всё впечатление. Ну и мне почему-то кажется, что динамические языки лучше подходят в качестве языка расширения для интерактивных программ вроде текстового редактора.
unu-foja 12.11.2012 08:23 # 0
zim 11.11.2012 16:01 # 0
Lure Of Chaos 11.11.2012 14:22 # +3
LispGovno 11.11.2012 14:38 # −1
Lure Of Chaos 11.11.2012 14:40 # 0
bormand 11.11.2012 14:49 # 0
Fai 11.11.2012 15:15 # +7