This website works better with JavaScript.
Начало
Каталог
lain.church
Помощ
Регистрация
Вход
tA
/
beer
Наблюдаван
1
Харесван
0
Разклонения
0
Код
Задачи
0
Заявки за сливане
0
Версии
0
Уики
Activity
Преглед на файлове
todo
master
Shaun Kerr
преди 5 години
родител
62d06d47c4
ревизия
b0e3f25bad
променени са
1 файла
, в които са
добавени 2
реда и са
изтрити 0
реда
Разделен изглед
Diff Options
Show Stats
Download Patch File
Download Diff File
+2
-0
beer.hs
+ 2
- 0
beer.hs
Целия файл
@@ -46,6 +46,8 @@ thap f x = x f
thop :: (Integer -> String) -> [((Integer -> String) -> String)] -> [String]
thop f l = map (thap f) l
--TO DO
--edit this function to convert digits to english words
tran :: Integer -> String
tran = show
Write
Preview
Loading…
Отказ
Запис