]> gerrit.simantics Code Review - simantics/platform.git/blobdiff - bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/Fibonacci3.scl
Merged changes from feature/scl to master.
[simantics/platform.git] / bundles / org.simantics.scl.compiler / tests / org / simantics / scl / compiler / tests / scl / Fibonacci3.scl
diff --git a/bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/Fibonacci3.scl b/bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/Fibonacci3.scl
deleted file mode 100644 (file)
index d5ce91c..0000000
+++ /dev/null
@@ -1,20 +0,0 @@
-import "JavaBuiltin" as Java\r
\r
-class Num a where\r
-    (+) :: a -> a -> a\r
-    (-) :: a -> a -> a\r
-\r
-instance Num Integer where\r
-    (+) = Java.iadd\r
-    (-) = Java.isub\r
-\r
-(<=) = Java.icmple\r
-\r
-fibonacci x = if x <= (1 :: Integer) \r
-              then 1 :: Integer\r
-              else fibonacci (x - (1 :: Integer)) \r
-                 + fibonacci (x - (2 :: Integer))\r
-\r
-main = fibonacci 10\r
---\r
-89
\ No newline at end of file