Šī lapa labāk darbojas, ja pārlūkam ir iespējots JavaScript.
Sākums
Izpētīt
lain.church
Palīdzība
Reģistrēties
Pierakstīties
tA
/
aoc2020
Vērot
1
Pievienot zvaigznīti
0
Atdalīts
0
Kods
Problēmas
0
Izmaiņu pieprasījumi
0
Laidieni
0
Vikivietne
Aktivitāte
Pārlūkot izejas kodu
whoops deleted stray file
master
Thorn Avery
pirms 3 gadiem
vecāks
2dc820fc5b
revīzija
c1c14a1fe9
1 mainītis faili
ar
0 papildinājumiem
un
6 dzēšanām
Dalītais skats
Salīdzināšanas iespējas
Rādīt statistiku
Lejupielādēt ielāpa failu
Lejupielādēt izmaiņu failu
+0
-6
split.hs
+ 0
- 6
split.hs
Parādīt failu
@@ -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
Rakstīt
Priekšskatītījums
Notiek ielāde…
Atcelt
Saglabāt