X-Git-Url: http://svarog.pmf.uns.ac.rs/gitweb/?p=mjc2wsl.git;a=blobdiff_plain;f=samples%2FRekFib.mj;fp=samples%2FRekFib.mj;h=1c297e5a3244cb372a2a29ea9dffb44368826f86;hp=0000000000000000000000000000000000000000;hb=27987606881f12aa387b6c978b56433cf9170fdb;hpb=8f8cbd8366373da7251a39f2e415ad22ae388e50

diff --git a/samples/RekFib.mj b/samples/RekFib.mj
new file mode 100644
index 0000000..1c297e5
--- /dev/null
+++ b/samples/RekFib.mj
@@ -0,0 +1,16 @@
+program RekFib{
+
+	int fib(int f)
+	{
+		if (f==0) return 0;
+		if (f==1) return 1;
+		return fib(f-1)+fib(f-2) ;
+	}
+	
+	void main()
+	int i;
+	{
+		print(fib(0));
+		print(fib(7));
+	}
+}
\ No newline at end of file