ruby-geometry 0.0.2

data/test/line/slope_test.rb

@@ -0,0 +1,53 @@
+require 'test/unit'
+require 'geometry'
+
+class SlopeTest < Test::Unit::TestCase
+  include Geometry
+
+  def setup
+    @inf = 1.0/0.0
+  end
+
+  def test_vertical
+    [-1, 0, 1].each do |x|
+      line = Line.new(Point.new(x, 0), Point.new(x, 1))
+      assert_equal @inf, line.slope
+    end
+  end
+
+  def test_vertical_negative
+    [-1, 0, 1].each do |x|
+      line = Line.new(Point.new(x, 0), Point.new(x, -1))
+      assert_equal -@inf, line.slope
+    end
+  end
+
+  def test_horizontal
+    [-1, 0, 1].each do |y|
+      line = Line.new(Point.new(0, y), Point.new(1, y))
+      assert_equal 0, line.slope
+    end
+  end
+
+  def test_horizontal_negative
+    [-1, 0, 1].each do |y|
+      line = Line.new(Point.new(0, y), Point.new(-1, y))
+      assert_equal 0, line.slope
+    end
+  end
+
+  def test_full_circle
+    delta = 0.000001
+    increment = Math::PI/10
+    divisions = 2*Math::PI/increment
+    radius = 1
+    (0..divisions).each do |d|
+      angle = d*increment
+      y = radius*Math::sin(angle)
+      x = radius*Math::cos(angle)
+      line = Line.new(Point.new(0, 0), Point.new(x, y))
+      
+      assert_in_delta Math::tan(angle), line.slope, delta
+    end
+  end
+end

data/test/line/vertical_test.rb

@@ -0,0 +1,18 @@
+require 'test/unit'
+require 'geometry'
+
+class VerticalTest < Test::Unit::TestCase
+  include Geometry
+
+  def test_vertical
+    x, y = 0, 0
+    l1 = Line.new_by_arrays([x, y], [x, y+1])
+    assert l1.vertical?
+  end
+
+  def test_not_vertical
+    x, y = 0, 0
+    l1 = Line.new_by_arrays([x, y], [x+1, y+1])
+    assert ! l1.vertical?
+  end
+end

data/test/line/x_intercept_test.rb

@@ -0,0 +1,44 @@
+require 'test/unit'
+require 'geometry'
+
+class XInterceptTest < Test::Unit::TestCase
+  include Geometry
+
+  def setup
+    @inf = 1.0/0.0
+  end
+
+  def test_anchored_at_x_axis
+    [-1, 0, 1].each do |xi|
+      line = Line.new(Point.new(xi, 0), Point.new(1, 1))
+      assert_equal xi, line.x_intercept
+    end
+  end
+
+  def test_floating
+    [-1, 1].each do |slope|
+      [-2, 0, 2].each do |yo|
+        [-1, 0, 1].each do |xi|
+          point1 = Point.new(xi+yo/slope, yo)
+          point2 = Point.new(xi+(yo+1)/slope, yo+1)
+          line = Line.new(point1, point2)
+          assert_equal xi, line.x_intercept
+        end
+      end
+    end
+  end
+
+  def test_verticals
+    [-1, 0, 1].each do |xi|
+      line = Line.new(Point.new(xi, 1), Point.new(xi, 2))
+      assert_equal xi, line.x_intercept
+    end
+  end
+
+  def test_horizontals
+    [-1, 0, 1].each do |yo|
+      line = Line.new(Point.new(0, yo), Point.new(1, yo))
+      assert line.x_intercept.nil?
+    end
+  end
+end

data/test/line/y_intercept_test.rb

@@ -0,0 +1,44 @@
+require 'test/unit'
+require 'geometry'
+
+class YInterceptTest < Test::Unit::TestCase
+  include Geometry
+
+  def setup
+    @inf = 1.0/0.0
+  end
+
+  def test_anchored_at_y_axis
+    [-1, 0, 1].each do |yi|
+      line = Line.new(Point.new(0, yi), Point.new(1, 1))
+      assert_equal yi, line.y_intercept
+    end
+  end
+
+  def test_floating
+    [-1, 1].each do |slope|
+      [-2, 0, 2].each do |xo|
+        [-1, 0, 1].each do |yi|
+          point1 = Point.new(xo, yi+slope*xo)
+          point2 = Point.new(xo+1, yi+slope*(xo+1))
+          line = Line.new(point1, point2)
+          assert_equal yi, line.y_intercept
+        end
+      end
+    end
+  end
+
+  def test_horizontals
+    [-1, 0, 1].each do |yi|
+      line = Line.new(Point.new(1, yi), Point.new(2, yi))
+      assert_equal yi, line.y_intercept
+    end
+  end
+
+  def test_verticals
+    [-1, 0, 1].each do |xo|
+      line = Line.new(Point.new(xo, 0), Point.new(xo, 1))
+      assert line.y_intercept.nil?
+    end
+  end
+end

data/test/point/equals_test.rb

@@ -0,0 +1,15 @@
+require 'test/unit'
+require 'geometry'
+ 
+class EqualsTest < Test::Unit::TestCase
+  include Geometry
+
+  def test_equal    
+    assert_equal Point.new(1, 3), Point.new(1, 3)
+  end
+  
+  def test_not_equal        
+    assert_not_equal Point.new(1, 3), Point.new(1, 2)
+    assert_not_equal Point.new(1, 2), Point.new(0, 2)
+  end
+end

data/test/point/initialize_test.rb

@@ -0,0 +1,20 @@
+require 'test/unit'
+require 'geometry'
+
+class InitializeTest < Test::Unit::TestCase
+  include Geometry
+  
+  def test_initialize_by_numbers
+    point = Point.new(1, 2)
+    
+    assert_equal 1, point.x
+    assert_equal 2, point.y
+  end
+  
+  def test_initialize_by_array
+    point = Point.new_by_array([1, 2])
+    
+    assert_equal 1, point.x
+    assert_equal 2, point.y
+  end
+end

data/test/polygon/edges_test.rb

@@ -0,0 +1,56 @@
+require 'test/unit'
+require 'geometry'
+
+class EdgesTest < Test::Unit::TestCase
+  include Geometry
+  
+#  +-----+
+#  |     |
+#  |     |
+#  +-----+
+  def test_regular
+    vertices = [
+      Point.new(0, 0),
+      Point.new(1, 0),
+      Point.new(1, 1),
+      Point.new(0, 1)
+    ]
+    
+    polygon = Polygon.new(vertices)
+
+    expected_edges = [
+      Segment.new_by_arrays(vertices[0], vertices[1]),
+      Segment.new_by_arrays(vertices[1], vertices[2]),
+      Segment.new_by_arrays(vertices[2], vertices[3]),
+      Segment.new_by_arrays(vertices[3], vertices[0])
+    ]
+
+    assert_equal expected_edges, polygon.edges    
+  end
+  
+#           /\
+#          /  \
+#    -----------
+#     \  /
+#      \/
+  def test_self_intersecting
+    vertices = [
+      Point.new(0, 0),
+      Point.new(4, 0),
+      Point.new(3, 2),
+      Point.new(1, -2),
+    ]
+
+    polygon = Polygon.new(vertices)
+
+    expected_edges = [
+      Segment.new_by_arrays(vertices[0], vertices[1]),
+      Segment.new_by_arrays(vertices[1], vertices[2]),
+      Segment.new_by_arrays(vertices[2], vertices[3]),
+      Segment.new_by_arrays(vertices[3], vertices[0])
+    ]
+
+    assert_equal expected_edges, polygon.edges
+  end
+  
+end

data/test/segment/bounds_test.rb

@@ -0,0 +1,26 @@
+require 'test/unit'
+require 'geometry'
+
+class BoundsTest < Test::Unit::TestCase
+  include Geometry
+
+  def setup
+    @segment = Segment.new(Point.new(1, 1), Point.new(2, 2))
+  end
+
+  def test_leftmost_endpoint    
+    assert_equal Point.new(1, 1), @segment.leftmost_endpoint
+  end
+
+  def test_rightmost_endpoint
+    assert_equal Point.new(2, 2), @segment.rightmost_endpoint
+  end
+
+  def test_topmost_endpoint
+    assert_equal Point.new(2, 2), @segment.topmost_endpoint
+  end
+
+  def test_botommost_endpoint
+    assert_equal Point.new(1, 1), @segment.bottommost_endpoint
+  end
+end

data/test/segment/contains_point_test.rb

@@ -0,0 +1,61 @@
+require 'test/unit'
+require 'geometry'
+
+class ContainsPointTest < Test::Unit::TestCase
+  include Geometry
+
+  #  ----*----
+  def test_point_belongs_to_horizontal_segment
+    point = Point.new(3, 1)
+    segment = Segment.new_by_arrays([2, 1], [4, 1])
+    
+    assert segment.contains_point?(point)
+  end
+  
+  #     /
+  #    *
+  #   /
+  def test_point_belongs_to_inclined_segment
+    point = Point.new(3, 3)
+    segment = Segment.new_by_arrays([2, 2], [4, 4])
+
+    assert segment.contains_point?(point)
+  end
+
+  #  *--------
+  def test_point_is_segment_endpoint
+    point = Point.new(2, 1)
+    segment = Segment.new_by_arrays([2, 1], [4, 1])
+
+    assert segment.contains_point?(point)
+  end
+  
+  #      *
+  #  ---------
+  def test_piont_does_not_belong_to_segment
+    point = Point.new(2, 3)
+    segment = Segment.new_by_arrays([2, 1], [4, 1])
+
+    assert ! segment.contains_point?(point)
+  end
+  
+  # *  ---------
+  def test_point_on_same_horizontal_line
+    point = Point.new(1, 1)
+    segment = Segment.new_by_arrays([2, 1], [4, 1])
+
+    assert ! segment.contains_point?(point)
+  end
+  
+  #     /
+  #    /
+  #   /
+  #
+  # *
+  def test_point_on_same_inclined_line
+    point = Point.new(1, 1)
+    segment = Segment.new_by_arrays([2, 2], [4, 4])
+
+    assert ! segment.contains_point?(point)
+  end  
+end

data/test/segment/initialize_test.rb

@@ -0,0 +1,20 @@
+require 'test/unit'
+require 'geometry'
+
+class InitializeTest < Test::Unit::TestCase
+  include Geometry
+
+  def test_initialize_by_points
+    segment = Segment.new(Point.new(1, 2), Point.new(3, 4))
+
+    assert_equal Point.new(1, 2), segment.point1
+    assert_equal Point.new(3, 4), segment.point2
+  end
+
+  def test_initialize_by_points_coordinates_arrays
+    segment = Segment.new_by_arrays([1, 2], [3, 4])
+
+    assert_equal Point.new(1, 2), segment.point1
+    assert_equal Point.new(3, 4), segment.point2
+  end
+end

data/test/segment/intersection_point_with_test.rb

@@ -0,0 +1,54 @@
+require 'test/unit'
+require 'geometry'
+
+class IntersectionPointWithTest < Test::Unit::TestCase
+  include Geometry
+  
+  def test_regular_case
+    segment1 = Segment.new_by_arrays([0, 0], [2, 2])
+    segment2 = Segment.new_by_arrays([0, 2], [2, 0])
+
+    assert_equal Point.new(1, 1), segment1.intersection_point_with(segment2)
+  end
+  
+  def test_segments_intersect_at_the_endpoint
+    segment1 = Segment.new_by_arrays([0, 0], [2, 2])
+    segment2 = Segment.new_by_arrays([0, 2], [2, 2])
+
+    assert_equal Point.new(2, 2), segment1.intersection_point_with(segment2)
+  end
+
+  def test_segments_do_not_intersect
+    segment1 = Segment.new_by_arrays([0, 0], [0, 2])
+    segment2 = Segment.new_by_arrays([1, 1], [2, 1])
+
+    assert_raise SegmentsDoNotIntersect do
+      segment1.intersection_point_with(segment2)
+    end
+  end
+
+  def test_segments_are_parallel
+    segment1 = Segment.new_by_arrays([0, 0], [2, 2])
+    segment2 = Segment.new_by_arrays([1, 0], [3, 2])
+
+    assert_raise SegmentsDoNotIntersect do
+      segment1.intersection_point_with(segment2)
+    end
+  end
+
+  def test_segments_overlap
+    segment1 = Segment.new_by_arrays([0, 0], [2, 2])
+    segment2 = Segment.new_by_arrays([1, 1], [3, 3])
+
+    assert_raise SegmentsOverlap do
+      segment1.intersection_point_with(segment2)
+    end
+  end
+
+  def test_segments_parallel_and_have_common_endpoint
+    segment1 = Segment.new_by_arrays([0, 0], [1, 0])
+    segment2 = Segment.new_by_arrays([1, 0], [2, 0])
+
+    assert_equal Point.new(0, 1), segment1.intersection_point_with(segment2)
+  end
+end

data/test/segment/intersects_with_test.rb

@@ -0,0 +1,98 @@
+require 'test/unit'
+require 'geometry'
+
+class IntersectsTest < Test::Unit::TestCase
+  include Geometry
+
+  #      |
+  #      |
+  # -----+-----
+  #      |
+  #      |
+  def test_segments_intersect
+    segment1 = Segment.new_by_arrays([0, 0], [2, 0])
+    segment2 = Segment.new_by_arrays([1, 1], [1, -1])
+
+    assert segment1.intersects_with?(segment2)
+  end
+
+  #   |
+  #   |  ------
+  #   |
+  def test_segments_does_not_intersect_but_lay_on_intersecting_lines
+    segment1 = Segment.new_by_arrays([0, 0], [0, 2])
+    segment2 = Segment.new_by_arrays([1, 1], [3, 1])
+
+    assert ! segment1.intersects_with?(segment2)
+  end
+  
+  # ---
+  #  |
+  #  |
+  #  |
+  # ---  |---------|
+  def test_segments_does_not_intersect_but_line_contains_end_point
+    segment1 = Segment.new_by_arrays([0, 0], [0, 2])
+    segment2 = Segment.new_by_arrays([1, 0], [3, 0])
+
+    assert ! segment1.intersects_with?(segment2)
+  end
+
+  #    /
+  #   /
+  #  /
+  # *--------
+  def test_segment_contains_endpoint
+    segment1 = Segment.new_by_arrays([0, 0], [2, 2])
+    segment2 = Segment.new_by_arrays([0, 0], [2, 0])
+    
+    assert segment1.intersects_with?(segment2)
+  end
+
+  # --------
+  # --------
+  def test_segments_parralel
+    segment1 = Segment.new_by_arrays([0, 1], [2, 1])
+    segment2 = Segment.new_by_arrays([0, 0], [2, 0])
+
+    assert ! segment1.intersects_with?(segment2)
+  end
+
+  # |------*------|
+  def test_segments_parallel_and_have_common_endpoint
+    segment1 = Segment.new_by_arrays([0, 0], [1, 0])
+    segment2 = Segment.new_by_arrays([1, 0], [2, 0])
+
+    assert segment1.intersects_with?(segment2)
+  end
+  
+  # |----|===|----|
+  def test_segments_overlap
+    segment1 = Segment.new_by_arrays([0, 0], [2, 0])
+    segment2 = Segment.new_by_arrays([1, 0], [3, 0])
+    
+    assert segment1.intersects_with?(segment2)
+  end
+  
+  def test_segments_overlap_on_vertical_line
+    segment1 = Segment.new_by_arrays([0, 0], [0, 2])
+    segment2 = Segment.new_by_arrays([0, 1], [0, 3])
+
+    assert segment1.intersects_with?(segment2)
+  end
+
+  # |----| |----|
+  def test_segments_lie_on_one_line
+    segment1 = Segment.new_by_arrays([0, 0], [1, 0])
+    segment2 = Segment.new_by_arrays([2, 0], [3, 0])
+
+    assert ! segment1.intersects_with?(segment2)
+  end
+
+  def test_segments_lie_on_one_vertical_line
+    segment1 = Segment.new_by_arrays([0, 0], [0, 1])
+    segment2 = Segment.new_by_arrays([0, 2], [0, 3])
+
+    assert ! segment1.intersects_with?(segment2)
+  end
+end