本網站在啟用 JavaScript 的情況下可以運作的更好。
首頁
探索
lain.church
說明
註冊
登入
tA
/
beer
關注
1
收藏
0
複製
0
程式碼
問題
0
合併請求
0
版本發佈
0
Wiki
活動
瀏覽代碼
todo
master
Shaun Kerr
5 年之前
父節點
62d06d47c4
當前提交
b0e3f25bad
共有
1 個檔案被更改
,包括
2 行新增
和
0 行删除
分割檢視
Diff Options
Show Stats
Download Patch File
Download Diff File
+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
Write
Preview
Loading…
取消
儲存