This website works better with JavaScript.
Home
Explore
lain.church
Help
Register
Sign In
tA
/
beer
Watch
1
Star
0
Fork
0
Code
Issues
0
Pull Requests
0
Releases
0
Wiki
Activity
Browse Source
todo
master
Shaun Kerr
5 years ago
parent
62d06d47c4
commit
b0e3f25bad
1 changed files
with
2 additions
and
0 deletions
Split View
Diff Options
Show Stats
Download Patch File
Download Diff File
+2
-0
beer.hs
+ 2
- 0
beer.hs
View File
@@ -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…
Cancel
Save