Mercurial > repo

annotate 98076 @ 4275:e598a5b6ac0e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<tswett> locale -a | paste
author HackBot
date Tue, 07 Jan 2014 04:01:39 +0000
parents b70362a4c382
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
4269
b70362a4c382 <Bike> fetch http://lpaste.net/raw/98076
HackBot
parents:
diff changeset
1 -- Hi everyone!
b70362a4c382 <Bike> fetch http://lpaste.net/raw/98076
HackBot
parents:
diff changeset
2 -- Could please someone explain me an output of the function:
b70362a4c382 <Bike> fetch http://lpaste.net/raw/98076
HackBot
parents:
diff changeset
3
b70362a4c382 <Bike> fetch http://lpaste.net/raw/98076
HackBot
parents:
diff changeset
4 splitEvery n list = first : ( splitEvery n rest )
b70362a4c382 <Bike> fetch http://lpaste.net/raw/98076
HackBot
parents:
diff changeset
5 where (first, rest) = splitAt n list
b70362a4c382 <Bike> fetch http://lpaste.net/raw/98076
HackBot
parents:
diff changeset
6
b70362a4c382 <Bike> fetch http://lpaste.net/raw/98076
HackBot
parents:
diff changeset
7 -- it returns a lis of lists splitEvery :: Int -> [a] -> [[a]]
b70362a4c382 <Bike> fetch http://lpaste.net/raw/98076
HackBot
parents:
diff changeset
8 -- But I don't understand how it works, why it returns list of lists.
b70362a4c382 <Bike> fetch http://lpaste.net/raw/98076
HackBot
parents:
diff changeset
9 -- splitAt returns TUPLE and "first" is somehow joined to it.