Bu web sitesi JavaScript ile daha iyi çalışır.
Ana Sayfa
Keşfet
lain.church
Yardım
Üye Ol
Giriş Yap
tA
/
aoc2020
İ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
whoops deleted stray file
master
Thorn Avery
3 yıl önce
ebeveyn
2dc820fc5b
işleme
c1c14a1fe9
1 değiştirilmiş dosya
ile
0 ekleme
ve
6 silme
Görünümü Böl
Diff Seçenekleri
İstatistikleri Göster
Yama Dosyasını İndir
Diff Dosyasını İndir
+0
-6
split.hs
+ 0
- 6
split.hs
Dosyayı Görüntüle
@@ -1,6 +0,0 @@
split :: Eq a => a -> [a] -> [[a]]
split _ [] = []
split d as = chunk : (split d rest)
where
chunk = takeWhile (/= d) as
rest = drop 1 $ dropWhile (/= d) as
Yaz
Önizleme
Yükleniyor…
İptal
Kaydet