From 30309b2ba2d8bfa6fb656cd760f6315581204d1d Mon Sep 17 00:00:00 2001 From: paltherr Date: Fri, 18 Jul 2003 11:29:07 +0000 Subject: - Removed duplicates --- test/files/pos/cours2a.scala | 16 ---------------- test/files/pos/cours2b.scala | 18 ------------------ test/files/pos/sqrt.scala | 21 --------------------- 3 files changed, 55 deletions(-) delete mode 100644 test/files/pos/cours2a.scala delete mode 100644 test/files/pos/cours2b.scala delete mode 100644 test/files/pos/sqrt.scala (limited to 'test/files/pos') diff --git a/test/files/pos/cours2a.scala b/test/files/pos/cours2a.scala deleted file mode 100644 index 9afa703cd7..0000000000 --- a/test/files/pos/cours2a.scala +++ /dev/null @@ -1,16 +0,0 @@ -object m1 { - def factorial(n: Int): Int = - if (n == 0) 1 - else n * factorial(n-1); -} - -object m2 { - - def factorial(n: Int): Int = { - def factIter(n: Int, acc: Int): Int = { - if (n == 0) acc - else factIter(n - 1, acc * n) - } - factIter(n, 1) - } -} diff --git a/test/files/pos/cours2b.scala b/test/files/pos/cours2b.scala deleted file mode 100644 index aea7029656..0000000000 --- a/test/files/pos/cours2b.scala +++ /dev/null @@ -1,18 +0,0 @@ -object m1 { - - def gcd(x: Int, y: Int): Int = - if (y == 0) x - else gcd(y, x % y); - - gcd(14, 21); - - def smallestDivisor(n: Int) = { - def findDivisor(d: Int): Int = - if (d * d > n) n - else if (n % d == 0) d - else findDivisor(d + 1); - findDivisor(2); - } - - def isPrime(n: Int) = smallestDivisor(n) == n; -} diff --git a/test/files/pos/sqrt.scala b/test/files/pos/sqrt.scala deleted file mode 100644 index 5ad1718619..0000000000 --- a/test/files/pos/sqrt.scala +++ /dev/null @@ -1,21 +0,0 @@ -object test { - - def abs(x: Double) = if (x >= 0) x else 0 - x; - - - def square(x: Double) = x * x; - - def sqrt(x: Double) = { - def sqrtIter(guess: Double): Double = - if (isGoodEnough(guess)) guess - else sqrtIter(improve(guess)); - - def improve(guess: Double) = - (guess + x / guess) / 2; - - def isGoodEnough(guess: Double) = - abs(square(guess) - x) < 0.001; - - sqrtIter(1.0); - } -} \ No newline at end of file -- cgit v1.2.3