repositories
/
cc1516.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
added type to sem.icl =/=
[cc1516.git]
/
examples
/
Markus
/
multiple_recursion.spl
1
// Generates a list of zeros and ones
2
3
flip(n, l)
4
{
5
if( n <= 0 )
6
return l;
7
else
8
return flop(n-1, 0:l);
9
}
10
11
flop(n, l)
12
{
13
return flip(n, 1:l);
14
}