Este sitio web funciona mejor con JavaScript.
Inicio
Explorar
lain.church
Ayuda
Registro
Iniciar sesión
tA
/
beer
Seguir
1
Destacar
0
Fork
0
Código
Incidencias
0
Pull Requests
0
Lanzamientos
0
Wiki
Actividad
Explorar el Código
todo
master
Shaun Kerr
hace 5 años
padre
62d06d47c4
commit
b0e3f25bad
Se han
modificado 1 ficheros
con
2 adiciones
y
0 borrados
Dividir vista
Opciones de diferencias
Mostrar estadísticas
Descargar archivo de parche
Descargar archivo de diferencias
+2
-0
beer.hs
+ 2
- 0
beer.hs
Ver fichero
@@ -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
Escribir
Vista previa
Cargando…
Cancelar
Guardar