repositories
/
cc1516.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
combined
(merge:
42f469b
77b1990
)
mergo
author
Mart Lubbers
<mart@martlubbers.net>
Thu, 7 Apr 2016 10:53:23 +0000
(12:53 +0200)
committer
Mart Lubbers
<mart@martlubbers.net>
Thu, 7 Apr 2016 10:53:23 +0000
(12:53 +0200)
1
2
examples/example.spl
patch
|
diff1
|
diff2
|
blob
|
history
diff --cc
examples/example.spl
index
ee36ff3
,
0bf275e
..
4a55e35
---
1
/
examples/example.spl
---
2
/
examples/example.spl
+++ b/
examples/example.spl
@@@
-2,11
-2,7
+2,10
@@@
Three ways to implement the f acto rial function in SPL.
First the recursive version .
*/
+var r = 1;
+var facN = 1;
+var ok = True;
-
facR(n) :: Int -> Int {
if (n < 2) {
return 1;