Este site funciona melhor com JavaScript.
Página inicial
Explorar
lain.church
Ajuda
Cadastrar
Acessar
tA
/
beer
Observar
1
Favorito
0
Fork
0
Código
Issues
0
Pull requests
0
Versões
0
Wiki
Atividade
Ver código fonte
todo
master
Shaun Kerr
5 anos atrás
pai
62d06d47c4
commit
b0e3f25bad
1 arquivos alterados
com
2 adições
e
0 exclusões
Visão dividida
Opções de diferenças
Mostrar estatísticas
Baixar arquivo de patch
Baixar arquivo de diferenças
+2
-0
beer.hs
+ 2
- 0
beer.hs
Ver arquivo
@@ -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
Escrever
Pré-visualização
Carregando…
Cancelar
Salvar