aboutsummaryrefslogtreecommitdiff
path: root/sample/gcd.in
diff options
context:
space:
mode:
authorShinya Sato <shinnya.sato@gmail.com>2024-03-05 18:19:27 +0900
committerShinya Sato <shinnya.sato@gmail.com>2024-03-05 18:19:27 +0900
commit49960d8950d001a372a0abde670a66ee60026957 (patch)
treeadad1d5fe428bf0bea151f71ed114223fc246bca /sample/gcd.in
parent0cf73da9ad035089c66d21021a656e4606796c47 (diff)
downloadinpla-49960d8950d001a372a0abde670a66ee60026957.tar.gz
inpla-49960d8950d001a372a0abde670a66ee60026957.zip
v0.12.0
Diffstat (limited to 'sample/gcd.in')
-rw-r--r--sample/gcd.in16
1 files changed, 0 insertions, 16 deletions
diff --git a/sample/gcd.in b/sample/gcd.in
deleted file mode 100644
index 5a57d8d..0000000
--- a/sample/gcd.in
+++ /dev/null
@@ -1,16 +0,0 @@
-// Greatest common divisor
-//
-//def gcd(a: Int, b: Int): Int =
-// if (b==0) a else gcd(b, a%b)
-
-
-// Rule
-gcd(ret, int a) >< (int b)
-| b==0 => ret ~ a
-| _ => gcd(ret, b) ~ a%b;
-
-// Net
-gcd(r, 14) ~ 21;
-r; // it should be 7
-
-