X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=examples%2Fexample.spl;h=ee36ff365032a8a060c26d54407b06b215208919;hb=42f469bb622f254f8008b064bdb720c72daaf2e3;hp=b4efb27f25c05ed6a10a9941ac5958004adb639b;hpb=6b3981fb80952fe2c510b6f9b849adb0dff77d2c;p=cc1516.git

diff --git a/examples/example.spl b/examples/example.spl
index b4efb27..ee36ff3 100644
--- a/examples/example.spl
+++ b/examples/example.spl
@@ -2,6 +2,11 @@
 	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;