mergo
authorMart Lubbers <mart@martlubbers.net>
Thu, 7 Apr 2016 10:53:23 +0000 (12:53 +0200)
committerMart Lubbers <mart@martlubbers.net>
Thu, 7 Apr 2016 10:53:23 +0000 (12:53 +0200)
1  2 
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;