small update so that retyping works

[cc1516.git] / examples / example.spl

diff --git a/examples/example.spl b/examples/example.spl
index e71c216..0bf275e 100644 (file)
--- a/examples/example.spl
+++ b/examples/example.spl
@@ -2,14 +2,6 @@
        Three ways to implement the f acto rial function in SPL.
        First the recursive version .
 */
-Int r = 1;
-Char r = 1;
-Int r = -1;
-Void r = 0;
-Bool r = !True;
-Bool r = -True;
-//var facN = 1;
-//var ok = True;
 
 facR(n) :: Int -> Int {
        if (n < 2) {