overlap

1 files changed, 20 insertions, 0 deletions

diff --git a/overlap b/overlap
new file mode 100755
index 0000000..81f9c4b
--- /dev/null
+++ b/overlap
@@ -0,0 +1,20 @@
+#!/usr/bin/env ruby
+
+require 'zipf'
+
+a = {}
+a.default = 0
+ReadFile.readlines_strip(ARGV[0]).map { |segment| a[segment] += 1 }
+b = {}
+b.default = 0
+ReadFile.readlines_strip(ARGV[1]).map { |segment| b[segment] += 1 }
+
+overlap = 0
+a.each_key { |seg|
+  puts b[seg] 
+  overlap = overlap+b[seg] 
+}
+
+puts "---"
+puts overlap
+