- 1
- 2
- 3
- 4
- 5
data М = М { unМ :: String }
instance Show М where
show = map succ . unМ
main = print $ М"ФТИ"
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
Всего: 1
+131
data М = М { unМ :: String }
instance Show М where
show = map succ . unМ
main = print $ М"ФТИ"
Синтетический баян...