carray 2.0.0 → 3.0.0

data/spec/Features/method_project_spec.rb

@@ -1,188 +0,0 @@
-require "carray"
-require 'rspec-power_assert'
-
-describe "CArray#project" do
-
-  example "basic" do
-    a = CA_DOUBLE([[11,22,33],
-                   [44,55,66],
-                   [77,88,99]])
-
-    # CA_SIZE
-    idxsz = CA_SIZE([[1,2,3],
-                     [4,5,6],
-                     [7,8,0]])
-
-                     
-    is_asserted_by { a.project(idxsz).class == CArray }          ### entity array
-    is_asserted_by { a.project(idxsz).data_type == a.data_type } ### data_type is inherited from base array
-    is_asserted_by { a.project(idxsz).shape == idxsz.shape }     ### shape is inherieted from index array
-
-    is_asserted_by { 
-      a.project(idxsz) == CA_DOUBLE([[22,33,44],
-                                     [55,66,77],
-                                     [88,99,11]])
-    }
-
-  end
-
-  example "permits integer array for index arugument" do
-
-    a = CA_DOUBLE([[11,22,33],
-                   [44,55,66],
-                   [77,88,99]])
-
-
-    is_asserted_by { 
-      # CA_INT8
-      idx8 = CA_INT8([[1,2,3],
-                      [4,5,6],
-                      [7,8,0]])
-
-      a.project(idx8) == CA_DOUBLE([[22,33,44],
-                                    [55,66,77],
-                                    [88,99,11]])
-    }
-
-    is_asserted_by { 
-      # CA_INT32
-      idx32 = CA_INT32([[1,2,3],
-                        [4,5,6],
-                        [7,8,0]])
-
-      a.project(idx32) == CA_DOUBLE([[22,33,44],
-                                     [55,66,77],
-                                     [88,99,11]])
-    }
-
-    is_asserted_by { 
-      # CA_INT64
-      idx64 = CA_INT64([[1,2,3],
-                        [4,5,6],
-                        [7,8,0]])
-
-      a.project(idx64) == CA_DOUBLE([[22,33,44],
-                                     [55,66,77],
-                                     [88,99,11]])
-    }
-    
-  end
-
-  example "returns array which has the shape of index argument" do
-    # 3x4
-    a = CA_DOUBLE([[0, 1, 2, 3],
-                   [4, 5, 6, 7],
-                                               [8, 9, 10,11]]) + 100
-
-    is_asserted_by { 
-      # 1x12
-      idx = CA_INT64([0,1,2,3,4,5,6,7,8,9,10,11])
-
-      a.project(idx).shape == idx.shape
-    }
-
-    is_asserted_by { 
-      # 2x6
-      idx = CA_INT64([[0,1,2,3,4,5],
-                      [6,7,8,9,10,11]])
-
-      a.project(idx).shape == idx.shape
-    }
-
-    is_asserted_by { 
-      # 4x3
-      idx = CA_INT64([[0,1,2],
-                      [3,4,5],
-                      [6,7,8],
-                      [9,10,11]])
-
-      a.project(idx).shape == idx.shape
-    }
-
-    is_asserted_by { 
-      # 2x3
-      idx = CA_INT64([[0,1,2],
-                      [3,4,5]])
-
-      a.project(idx).shape == idx.shape
-    }
-
-  end
-  
-  example "masked array" do
-
-    # masked base array
-
-    _ = UNDEF
-
-    a = CA_DOUBLE([[11,_ ,33],
-                   [44,55,66],
-                   [77,88,99]])
-
-    is_asserted_by { 
-      # idx without mask
-      idx = CA_INT64([[1,2,3],
-                      [4,5,6],
-                      [7,8,0]])
-
-      a.project(idx) == CA_DOUBLE([[_ ,33,44],
-                                   [55,66,77],
-                                   [88,99,11]])
-    }
-
-    is_asserted_by { 
-      # index with mask
-      idx = CA_SIZE([[1,2,3],
-                     [4,_,6],
-                     [7,8,0]])
-
-      a.project(idx) == CA_DOUBLE([[_ ,33,44],
-                                   [55,_ ,77],
-                                   [88,99,11]])
-    }
-
-    # Related: Comparing the behavior of CArray#[idx] with idx has mask
-    #
-
-    is_asserted_by { 
-      # For CArray#[idx], nothing is raised even if base array has masked element.
-
-      # idx without mask
-      idx = CA_SIZE([[1,2,3],
-                     [4,5,6],
-                     [7,8,0]])
-
-
-      a[idx] == CA_DOUBLE([[_ ,33,44],
-                           [55,66,77],
-                           [88,99,11]])
-    }
-
-    # For CArray#[idx], ArgumentError is raised if idx has masked element.
-    expect { 
-      # idx with mask
-      idx = CA_SIZE([[1,2,3],
-                     [4,_,6],
-                     [7,8,0]])
-      a[idx] 
-    }.to raise_error(ArgumentError)
-
-  end
-
-  example "edge cases" do
-    _ = UNDEF
-    a = CA_DOUBLE([[11,22,33],
-                   [44,55,66],
-                   [77,88,99]])
-    is_asserted_by { a.project(CA_SIZE([])) == CA_DOUBLE([]) }
-    is_asserted_by { a.project(CA_SIZE([9])) == CA_DOUBLE([_]) }
-    is_asserted_by { a.project(CA_SIZE([-1])) == CA_DOUBLE([_]) }
-    is_asserted_by { a.project(CA_SIZE([-1]), 999) == CA_DOUBLE([999]) }
-    is_asserted_by { a.project(CA_SIZE([9]), 999) == CA_DOUBLE([999]) }
-    is_asserted_by { a.project(CA_SIZE([-1]), -999) == CA_DOUBLE([-999]) }
-    is_asserted_by { a.project(CA_SIZE([9]), -999, 999) == CA_DOUBLE([999]) }
-    
-  end
-  
-
-end

data/spec/Features/method_ref_spec.rb

@@ -1,27 +0,0 @@
-require "carray"
-require 'rspec-power_assert'
-
-describe "CArray#[]" do
-
-  example "should return one element array with [nil,-1]" do
-    ca = CArray.int(4,4).seq!
-    is_asserted_by { ca[[nil,-1]].elements == 1 }
-    is_asserted_by { ca[[nil,-1]] == ca[[0]] }
-  end
-
-  example "should return self[[0],nil] with [nil,-1], nil" do
-    ca = CArray.int(4,4).seq!
-    is_asserted_by { ca[[nil,-1],nil] == ca[[0],nil] }
-  end
-
-  example "should return self[[0],nil] with nil, [nil,-1]" do
-    ca = CArray.int(4,4).seq!
-    is_asserted_by { ca[nil,[nil,-1]] == ca[nil,[0]] }
-  end
-
-  example "should return self[[0],nil] with [nil,-1], [nil,-1]" do
-    ca = CArray.int(4,4).seq!
-    is_asserted_by { ca[[nil,-1],[nil,-1]] == ca[[0],[0]] }
-  end
-
-end

data/spec/Features/method_round_spec.rb

@@ -1,11 +0,0 @@
-require "carray"
-require 'rspec-power_assert'
-
-describe "CArray#round" do
-  example "returns the nearest Integer" do
-    is_asserted_by { CA_DOUBLE(5.5).round[0] == 6 }
-    is_asserted_by { CA_DOUBLE(0.4).round[0] == 0 }
-    is_asserted_by { CA_DOUBLE(-2.8).round[0] == -3 }
-    is_asserted_by { CA_DOUBLE(0.0).round[0] == 0 }
-  end
-end

data/spec/Features/method_s_linspace_spec.rb

@@ -1,48 +0,0 @@
-require "carray"
-require 'rspec-power_assert'
-
-describe "CArray.linspace" do
-
-  # 2020-07-10
-  example "float range" do
-
-    a = CArray.linspace(0.0,1.0)
-    b = CArray.double(100).span(0.0..1.0)
-    
-    is_asserted_by { a == b }
-
-  end
-
-  # 2020-07-10
-  example "integer range -> float array" do
-
-    a = CArray.linspace(0,1)
-    b = CArray.double(100).span(0.0..1.0)
-    
-    is_asserted_by { a == b }
-
-  end
-
-  # 2020-07-10
-  example "specify number" do
-
-    a = CArray.linspace(0.0,1.0,5)
-    b = CArray.double(5).span(0.0..1.0)
-    
-    is_asserted_by { a == b }
-
-  end
-
-  # 2020-07-10
-  example "integer array" do
-
-    a = CArray::Int32.linspace(0.0,1.0)
-    b = CArray.int32(100).span(0.0..1.0)
-    
-    is_asserted_by { a == b }
-
-  end
-
-  
-end
-  

data/spec/Features/method_s_span_spec.rb

@@ -1,14 +0,0 @@
-require 'carray'
-require "rspec-power_assert"
-
-describe "CArray.span" do
-
-  # 2020-07-22
-  example "s_span" do
-    a = CArray.span(CA_FLOAT32, 0..2, 0.5)
-    is_asserted_by { a == CA_FLOAT32([0, 0.5, 1, 1.5, 2]) }
-    a = CArray.span(CA_FLOAT32, 0...2, 0.5)
-    is_asserted_by { a == CA_FLOAT32([0, 0.5, 1, 1.5]) }
-  end
-
-end

data/spec/Features/method_seq_spec.rb

@@ -1,47 +0,0 @@
-require "carray"
-require 'rspec-power_assert'
-
-describe "CArray#seq" do
-  
-  example "basic" do
-    res = CA_INT32([[0, 1, 2],
-                    [3, 4, 5],
-                    [6, 7, 8]])
-    a = CArray.int32(3, 3)
-    is_asserted_by { a.seq(0,1) == res }
-    is_asserted_by { a.seq(0) == res }
-    is_asserted_by { a.seq() == res }
-  end
-
-  example "offset" do
-    res = CA_INT32([[3, 4, 5],
-                    [6, 7, 8],
-                    [9, 10, 11]])
-    a = CArray.int32(3, 3)
-    is_asserted_by { a.seq(3,1) == res }
-    is_asserted_by { a.seq(3) == res }
-  end
-
-  example "step" do
-    res = CA_INT32([[0, 3, 6],
-                    [9, 12, 15],
-                    [18, 21, 24]])
-    a = CArray.int32(3, 3)
-    is_asserted_by { a.seq(0,3) == res }
-  end
-
-  example "fractional step for integer" do
-    res = CA_INT32([0, 0, 1, 1, 2, 2, 3, 3, 4, 4, 5])
-    a = CArray.int32(11)
-    is_asserted_by { a.seq(0,0.5) == res }
-
-    res = CA_INT32([0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 2])
-    a = CArray.int32(11)
-    is_asserted_by { a.seq(0,0.2) == res }
-
-    res = CA_INT32([0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1])
-    a = CArray.int32(11)
-    is_asserted_by { a.seq(0,0.1) == res }
-  end
-
-end

data/spec/Features/method_sort_with.rb

@@ -1,43 +0,0 @@
-require "carray"
-require 'rspec-power_assert'
-
-describe "CArray#sort_with" do
-
-  # 2020-07-09
-  example "basic" do
-   
-    a1 = CA_INT([3,2,4,1])
-    b1 = CA_INT([13,12,14,11])
-    c1 = CA_INT([23,22,24,21])
-    
-    a2,b2,c2 = a1.sort_with(b1,c1)
-    
-    is_asserted_by { a2 == CA_INT([1,2,3,4]) }
-    is_asserted_by { b2 == CA_INT([11,12,13,14]) }
-    is_asserted_by { c2 == CA_INT([21,22,23,24]) }
-
-    a2[0] = -999    
-    b2[0] = -999    
-    c2[0] = -999    
-    is_asserted_by { a1[3] != -999 }
-    is_asserted_by { b1[3] != -999 }
-    is_asserted_by { c1[3] != -999 }
-    
-  end
-
-  example "technique: reverse sort" do
-   
-    a1 = CA_INT([3,2,4,1])
-    b1 = CA_INT([13,12,14,11])
-    c1 = CA_INT([23,22,24,21])
-    
-    _,a2,b2,c2 = (-a1).sort_with(a1,b1,c1)
-    
-    is_asserted_by { a2 == CA_INT([1,2,3,4]).reverse }
-    is_asserted_by { b2 == CA_INT([11,12,13,14]).reverse }
-    is_asserted_by { c2 == CA_INT([21,22,23,24]).reverse }
-
-  end
-  
-end
-

data/spec/Features/method_sorted_with.rb

@@ -1,29 +0,0 @@
-require "carray"
-require 'rspec-power_assert'
-
-describe "CArray#sorted_with" do
-
-  # 2020-07-09
-  example "basic" do
-   
-    a1 = CA_INT([3,2,4,1])
-    b1 = CA_INT([13,12,14,11])
-    c1 = CA_INT([23,22,24,21])
-    
-    a2,b2,c2 = a1.sorted_with(b1,c1)
-    
-    is_asserted_by { a2 == CA_INT([1,2,3,4]) }
-    is_asserted_by { b2 == CA_INT([11,12,13,14]) }
-    is_asserted_by { c2 == CA_INT([21,22,23,24]) }
-    
-    a2[0] = -999    
-    b2[0] = -999    
-    c2[0] = -999    
-    is_asserted_by { a1[3] == -999 }
-    is_asserted_by { b1[3] == -999 }
-    is_asserted_by { c1[3] == -999 }
-    
-  end
-  
-end
-

data/spec/Features/method_span_spec.rb

@@ -1,42 +0,0 @@
-require "carray"
-require 'rspec-power_assert'
-
-describe "CArray#span" do
-
-  # 2020-07-10
-  example "integer range (integer steps)" do
-
-    a = CArray.int(10).span(1..10)
-    
-    is_asserted_by { a == CA_INT([1,2,3,4,5,6,7,8,9,10]) }
-
-    b = CArray.int(10).span(1...11)
-    
-    is_asserted_by { b == CA_INT([1,2,3,4,5,6,7,8,9,10]) }
-
-  end
-
-  # 2020-07-10
-  example "integer range (fraction steps)" do
-
-    a = CArray.int(10).span(1..5)
-    
-    is_asserted_by { a == CA_INT([1,1,2,2,3,3,4,4,5,5]) }
-
-    b = CArray.int(10).span(1...6)
-    
-    is_asserted_by { b == CA_INT([1,1,2,2,3,3,4,4,5,5]) }
-
-  end
-
-  # 2020-07-10
-  example "float range" do
-
-    a = CArray.double(11).span(0..5)
-    
-    is_asserted_by { a == CA_DOUBLE([0.0,0.5,1.0,1.5,2.0,2.5,3.0,3.5,4.0,4.5,5.0]) }
-
-  end
-  
-end
-  

data/spec/Features/method_wrap_readonly_spec.rb

@@ -1,43 +0,0 @@
-require 'carray'
-require "rspec-power_assert"
-
-describe "CArray#wrap_readonly" do
-
-  # 2020-07-22
-  example "array" do
-    ary = [[1,2,3], 
-           [4,5,6],
-           [7,8,9]]
-    a = CArray.wrap_readonly(ary, CA_INT32)
-    is_asserted_by { a.class == CAFake }
-    is_asserted_by { a.entity? == false }
-    is_asserted_by { a.data_type == CA_INT32 }
-    is_asserted_by { a.shape == [3,3] }
-    is_asserted_by { a == CA_INT32(ary) }
-  end
-
-  # 2020-07-22
-  example "string" do
-    a = CA_UINT8([0,1,2,3,4,5,6,7])
-    b = CArray.wrap_readonly(a.to_s, CA_UINT8)
-    is_asserted_by { b == a }
-
-    c = CArray.wrap_readonly(a.to_s, CA_OBJECT)
-    is_asserted_by { c == CA_OBJECT(a.to_s) }
-  end
-
-  # 2020-07-22
-  example "nil" do
-    a = CA_INT(0)
-    b = CArray.wrap_readonly(nil, CA_INT)
-    is_asserted_by { b == a }
-  end
-
-  # 2020-07-22
-  example "object" do
-    a = CA_FLOAT64(1.5)
-    b = CArray.wrap_readonly(1.5, CA_FLOAT64)
-    is_asserted_by { b == a }
-  end
-
-end

data/spec/UnitTest/test_CAVirtual.rb

@@ -1,214 +0,0 @@
-$:.unshift("../lib", "..")
-
-require 'test/unit'
-require 'carray'
-
-module TestCAVirtualMixin
-
-  def test_fetch_index
-    10.times do 
-      idx = @ref.dim.map{|x| rand(x)}
-      assert_equal(@ref[*idx], @obj[*idx])
-    end
-  end
-
-  def test_fetch_addr
-    10.times do 
-      addr = rand(@ref.elements)
-      assert_equal(@ref[addr], @obj[addr])
-    end
-  end
-
-  def test_store_index
-    unless @obj.read_only?
-      10.times do 
-        idx = @ref.dim.map{|x| rand(x)}
-        v = rand(10)
-        @ref[*idx] = v
-        @obj[*idx] = v
-        assert_equal(@ref[*idx], @obj[*idx])
-      end
-      assert_equal(@ref, @obj)
-    end
-  end
-
-  def test_store_addr
-    unless @obj.read_only?
-      10.times do 
-        addr = rand(@ref.elements)
-        @ref[addr] = @obj[addr] = rand(10)
-        assert_equal(@ref[addr], @obj[addr])
-      end
-      assert_equal(@ref, @obj)
-    end
-  end
-
-  def test_attach
-    assert_equal(@ref, @obj)
-  end
-
-  def test_sync
-    unless @obj.read_only?
-      assert_equal(@ref.seq!, @obj.seq!)
-    end
-  end
-
-  def test_copy_data
-    assert_equal(@ref, @obj.to_ca)
-  end
-
-  def test_sync_data
-    unless @obj.read_only?
-      val = @ref.reverse
-      @ref[] = val
-      @obj[] = val
-      assert_equal(@ref, @obj)
-    end
-  end
-
-  def test_fill_data
-    unless @obj.read_only?
-      @obj[] = 1
-      assert_equal(@ref.template{1}, @obj)
-    end
-  end
-
-  def test_create_mask
-    unless @obj.read_only?
-      5.times do 
-        addr = rand(@ref.elements)
-        @ref[addr] = UNDEF
-        @obj[addr] = UNDEF
-      end
-      assert_equal(@ref, @obj)
-    end
-  end
-
-end
-
-class TestCARefer < Test::Unit::TestCase
-
-  include TestCAVirtualMixin
-
-  def setup
-    @ref = CArray.int32(10, 10).seq!
-    orig = CArray.int32(10, 10).seq!
-    @obj = orig[]
-  end
-
-end
-
-class TestCABlock < Test::Unit::TestCase
-
-  include TestCAVirtualMixin
-
-  def setup
-    @ref = CArray.int32(10, 10).seq!
-    orig = CArray.int32(10, 10).seq!
-    @obj = orig[0..-1, 0..-1]
-  end
-
-end
-
-class TestCASelect < Test::Unit::TestCase
-
-  include TestCAVirtualMixin
-
-  def setup
-    @ref = CArray.int32(10, 10).seq!.flatten
-    orig = CArray.int32(10, 10).seq!
-    @obj = orig[orig.true]
-  end
-
-end
-
-class TestCAMapping < Test::Unit::TestCase
-
-  include TestCAVirtualMixin
-
-  def setup
-    @ref = CArray.int32(10, 10).seq!
-    orig = CArray.int32(10, 10).seq!
-    @obj = orig[orig]
-  end
-
-end
-
-class TestCAGrid < Test::Unit::TestCase
-
-  include TestCAVirtualMixin
-
-  def setup
-    @ref = CArray.int32(10, 10).seq!
-    orig = CArray.int32(10, 10).seq!
-    idx  = CArray.int32(10).seq!
-    @obj = @ref[idx,idx]
-  end
-
-end
-
-class TestCARepeat < Test::Unit::TestCase
-
-  include TestCAVirtualMixin
-
-  def setup
-    orig = CArray.int32(10).seq!
-    @ref = CArray.int32(10, 10)
-    10.times do |i|
-      @ref[nil,i] = orig
-    end
-    @obj = orig[:%, 10]
-  end
-
-end
-
-class TestCAFake < Test::Unit::TestCase
-
-  include TestCAVirtualMixin
-
-  def setup
-    @ref = CArray.int16(10, 10).seq!
-    orig = CArray.int32(10,10).seq!
-    @obj = orig.as_int16
-  end
-
-end
-
-class TestCAFarray < Test::Unit::TestCase
-
-  include TestCAVirtualMixin
-
-  def setup
-    @ref = CArray.int32(10,10).seq!
-    @ref[] = @ref.to_a.transpose
-    orig = CArray.int32(10,10).seq!
-    @obj = orig.t
-  end
-
-end
-
-class TestCATranspose < Test::Unit::TestCase
-
-  include TestCAVirtualMixin
-
-  def setup
-    @ref = CArray.int32(10,10).seq!
-    @ref[] = @ref.to_a.transpose
-    orig = CArray.int32(10,10).seq!
-    @obj = orig.transposed
-  end
-
-end
-
-class TestCAWindow < Test::Unit::TestCase
-
-  include TestCAVirtualMixin
-
-  def setup
-    @ref = CArray.int32(15,15).seq![0..9, 0..9].to_ca
-    orig = CArray.int32(15,15).seq!
-    @obj = orig.window(0..9, 0..9)
-  end
-
-end
-