Denna sida fungerar bättre med Javascript igång.
Startsida
Utforska
lain.church
Hjälp
Registrera dig
Logga in
tA
/
beer
Bevaka
1
Stjärnmärk
0
Förgrening
0
Kod
Ärenden
0
Pull-förfrågningar
0
Släpp
0
Wiki
Aktiviteter
Bläddra i källkod
todo
master
Shaun Kerr
5 år sedan
förälder
62d06d47c4
incheckning
b0e3f25bad
1 ändrade filer
med
2 tillägg
och
0 borttagningar
Delad Vy
Diff Options
Show Stats
Download Patch File
Download Diff File
+2
-0
beer.hs
+ 2
- 0
beer.hs
Visa fil
@@ -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
Förhandsgranska
Laddar…
Avbryt
Spara