diff options
Diffstat (limited to 'examples/gcd_nd.c')
-rw-r--r-- | examples/gcd_nd.c | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/examples/gcd_nd.c b/examples/gcd_nd.c new file mode 100644 index 0000000..260af41 --- /dev/null +++ b/examples/gcd_nd.c @@ -0,0 +1,15 @@ +a = rand(5,15); +b = rand(3,8); + +if (a < 0) a = -a; +if (b < 0) b = -b; +while (b > 0) { // try changing this to b >= 0 + tmp = b; + b = a % b; + a = tmp; + } +assert (b==0); // should be true +//assert (a>6); // try uncommenting this line +tmp = 0; +print (a); + |