Massive speed up on e004.

jimweirich · Sep 9, 2009 · 71ceb57 · 71ceb57
1 parent e3a4170
commit 71ceb57
Showing 1 changed file with 8 additions and 1 deletion.
diff --git a/e004.rb b/e004.rb
@@ -6,4 +6,11 @@ def palindrome?
   end
 end
 
-p (100..999).map { |i| (i..999).map { |j| i*j } }.flatten.select { |n| n.palindrome? }.max
+answer = 0
+(100..999).each do |i|
+  (i..999).each do |j|
+    n = i*j
+    answer = n if n > answer && n.palindrome?
+  end
+end
+p answer