Bu web sitesi JavaScript ile daha iyi çalışır.
Ana Sayfa
Keşfet
lain.church
Yardım
Üye Ol
Giriş Yap
tA
/
beer
İzle
1
Yıldızla
0
Çatalla
0
Kod
Konular
0
Değişiklik İstekleri
0
Sürümler
0
Wiki
Aktivite
Kaynağa Gözat
todo
master
Shaun Kerr
5 yıl önce
ebeveyn
62d06d47c4
işleme
b0e3f25bad
1 değiştirilmiş dosya
ile
2 ekleme
ve
0 silme
Görünümü Böl
Diff Seçenekleri
İstatistikleri Göster
Yama Dosyasını İndir
Diff Dosyasını İndir
+2
-0
beer.hs
+ 2
- 0
beer.hs
Dosyayı Görüntüle
@@ -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
Yaz
Önizleme
Yükleniyor…
İptal
Kaydet