- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
infixr 6 `then'`
then' True = fst
then' False = snd
if' = id
else' suc fail = (suc, fail)
main = do
print $ if' (1<5) `then'` "true" `else'` "false"
print $ if' False `then'` "true" `else'` "false"
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+126
infixr 6 `then'`
then' True = fst
then' False = snd
if' = id
else' suc fail = (suc, fail)
main = do
print $ if' (1<5) `then'` "true" `else'` "false"
print $ if' False `then'` "true" `else'` "false"
bormand
У ифа особый синтаксис. Как ты его реализуешь?
Challenge accepted:
Сначала был тред
http://govnokod.ru/12068#comment159236
а потом родилось говно:
http://ideone.com/rOKDPP
Реализовал if. За правильными приоритетами операций и ассоциативностью не следил.
HaskellGovno 07.11.2012 21:56 # +1
LispGovno 08.11.2012 22:20 # 0
HaskellGovno 07.11.2012 22:00 # +2
bormand 07.11.2012 22:05 # +5
Fai 07.11.2012 22:07 # +4
bormand 07.11.2012 23:18 # +2
roman-kashitsyn 07.11.2012 23:20 # +2
LispGovno 07.11.2012 23:24 # +1
bormand 07.11.2012 23:31 # +1
LispGovno 07.11.2012 23:36 # +2
кстати, вам можно преподавателем даже идти. То как вы рассказали про сахар do в соседней теме - это нечто. Я ещё не разбирался с монадами, но сразу все понял. ^_^
Fai 07.11.2012 23:49 # +4
LispGovno 07.11.2012 23:52 # +1
bormand 07.11.2012 23:51 # +3
LispGovno 08.11.2012 00:01 # +1
Сейчас читаю вот это :-[
Но там как то с реальным применением Хаскела - не очень. Я может ещё не дочитал, но помоему там даже массивов не будет за всю книгу. Не говоря уж о изучении стандартной библиотеки кроме некоторых алгоритмов над списками. Имхо не удачный выбор для серьёзного программирования. Как оказалось это обычный руссифицированный http://learnyouahaskell.com/
bormand 08.11.2012 00:04 # +1
Fai 08.11.2012 00:05 # +1
LispGovno 08.11.2012 00:17 # +1
Fai 08.11.2012 00:19 # +1
LispGovno 08.11.2012 00:29 # 0
Fai 08.11.2012 00:33 # +2
но файл битый.
LispGovno 07.11.2012 23:26 # +3
Fai 07.11.2012 22:20 # 0
Можно писать так:
http://ideone.com/c0Rpqd
Хаскелловский же if отловит все неправльные синтаксически записи.
andrewiv 24.08.2021 02:32 # 0