Цей веб-сайт працює краще з JavaScript.
Головна
Огляд
lain.church
Довідка
Реєстрація
Увійти
tA
/
beer
Слідкувати
1
В обрані
0
Форк
0
Код
Проблеми
0
Запити на злиття
0
Релізи
0
Вікі
Активність
Переглянути джерело
todo
master
Shaun Kerr
5 роки тому
джерело
62d06d47c4
коміт
b0e3f25bad
1 змінених файлів
з
2 додано
та
0 видалено
Розділений перегляд
Параметри порівняння
Показати статистику
Завантажити патч
Завантажити файл різниці
+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
Писати
Попередній перегляд
Завантаження…
Відмінити
Зберегти