## Recently, I started reading Knuth’s Art of Computer Science. To spice up the exercises, I am writing them out in Ruby. Thinking about the basic math of programming and how to implement it in a high level language like Ruby has been fun.

The evolution of programming languages has gone far since the book was written. We can use Ruby syntax to do multiple steps in an algorithm!

Also, this is an exercise in writing clean code. Some of the algorithms in the book are a bit hard to read in there pure math form. So, when I write them out in Ruby, I try to use as much expressiveness as possible without adding any clutter.

This is no easy task, and often times I have to walk away from an algorithm for awhile and come back to it, because I will have my head deep in the math and less in the code. Or vice versa.

I was showing one of my solutions to a colleague of mine, Doug Bradbury, who saw a better way in Ruby to solve the same problem I was with less lines of code and a higher readability.

So, I decided to share one of the problems, and in a few days, I will post my version of the solution. We can see different solutions in different languages and different styles. Go ahead and try it out.

Here is Euclid’s algorithm for the greatest common divisor, as written in the book:

```
1 E0 [Ensure m >= n.] If m < n, exchange m < n.
2 E1 [Find remainder.] Divide m by n and let r be the remainder. (We will have 0 <= r < n.)
3 E2 [Is it zero?] If r = 0, the algorithm terminates;n is the answer.
4 E3 [Reduce.] Set m <- n><- r>
```

And here is a solution written in Ruby:

```
1 def are_whole_numbers?(*numbers)
2 numbers.each {|number| return false if number.to_i.to_f != number}
3 return true
4 end
5
6 def euclid(m, n)
7 raise "Must be whole numbers." unless are_whole_numbers?(m, n)
8 return euclid(n, m) if m < n
9
10 remainder = m % n
11
12 return n if remainder == 0
13 return euclid(n, remainder)
14 end
15
16 #Here are some examples
17 puts euclid(35.0, 40.0) #should be 17.0
18 puts euclid(119.0, 544.0) #should be 17.0
19 puts euclid(555.0, 666.0) #should be 111.0
```