Better unit tests for Rational

Author: MarcinMoskala

src/test/java/functional/RationalTest.kt

@@ -7,9 +7,20 @@ class RationalTest {
     @Test
     fun testIntExtension() {
         assertEquals(Rational(4, 1), 4.r())
+        for (i in 1..100) {
+            assertEquals(Rational(i, 1), i.r())
+        }
     }
 
-    @Test fun testPairExtension() {
+    @Test
+    fun testPairExtension() {
         assertEquals(Rational(2, 3), Pair(2, 3).r())
+
+        for (l in 1..10) {
+            for (r in 1..10) {
+                val p = Pair(l, r)
+                assertEquals(Rational(l, r), p.r())
+            }
+        }
     }
-}
+}