carray 2.0.1 → 3.0.1

data/lib/carray/autoload/autoload_gem_opencv.rb

@@ -1,16 +0,0 @@
-module OpenCV
-  class CvMat
-    autoload_method "ca", "carray-opencv"
-    autoload_method "to_ca", "carray-opencv"
-    autoload_method "from_ca", "carray-opencv"
-    autoload_method "image", "carray-opencv"
-  end
-  class IplImage < CvMat
-    autoload_method "ca", "carray-opencv"
-  end
-end
-
-class CArray
-  autoload_method "to_cvmat", "carray-opencv"
-  autoload_method "to_iplimage", "carray-opencv"
-end

data/lib/carray/autoload/autoload_gem_random.rb

@@ -1,8 +0,0 @@
-class CArray
-  class << self
-    autoload_method :srand, "carray-random"
-  end
-  autoload_method :random!, "carray-random"
-  autoload_method :shuffle, "carray-random"
-  autoload_method :shuffle!, "carray-random"
-end

data/lib/carray/autoload/autoload_gem_rmagick.rb

@@ -1,23 +0,0 @@
-module Magick
-  class Image
-    autoload_method "export_pixels_to_ca", "carray-rmagick"
-    autoload_method "import_pixels_from_ca", "carray-rmagick"
-  end
-end
-
-class CArray
-  autoload_method "self.load_image", "carray-rmagick"
-  autoload_method "save_image", "carray-rmagick"
-  autoload_method "display_image", "carray-rmagick"
-  autoload_method "to_image", "carray-rmagick"
-end
-
-autoload :CAMagickImage, "carray-rmagick"
-
-module Magick
-  class Image
-    autoload_method "ca", "carray-rmagick"
-    autoload_method "to_ca", "carray-rmagick"
-  end
-end
-

data/lib/carray/autoload/autoload_gem_zimg.rb

@@ -1,3 +0,0 @@
-class CArray
-  autoload_method "zimg", "carray/graphics/zimg"
-end

data/lib/carray/autoload/autoload_io_imagemagick.rb

@@ -1,6 +0,0 @@
-autoload_method "CArray.load_by_magick", "carray/io/imagemagick"
-
-class CArray
-  autoload_method "save_by_magick", "carray/io/imagemagick"
-  autoload_method "display_by_magick", "carray/io/imagemagick"
-end

data/lib/carray/autoload/autoload_math_histogram.rb

@@ -1,5 +0,0 @@
-autoload :CAHistogram, "carray/math/histogram"
-
-class CArray
-  autoload_method :bin, "carray/math/histogram"
-end

data/lib/carray/autoload/autoload_math_recurrence.rb

@@ -1,6 +0,0 @@
-autoload :CARecurrence,       'carray/math/recurrence'
-
-class CArray
-  autoload_method "recurrence!", "carray/math/recurrence"
-  autoload_method "recurrence", "carray/math/recurrence"
-end

data/lib/carray/autoload/autoload_object_iterator.rb

@@ -1 +0,0 @@
-autoload :CAIteratorArray, 'carray/object/ca_obj_iterator'

data/lib/carray/autoload/autoload_object_link.rb

@@ -1 +0,0 @@
-autoload :CALink, 'carray/object/ca_obj_link'

data/lib/carray/autoload/autoload_object_pack.rb

@@ -1,2 +0,0 @@
-autoload :CAPack, "carray/object/ca_obj_pack"
-autoload_method "CArray.pack", "carray/object/ca_obj_pack"

data/lib/carray/autoload.rb

@@ -1,141 +0,0 @@
-# ----------------------------------------------------------------------------
-#
-#  carray/autoload.rb
-#
-#  This file is part of Ruby/CArray extension library.
-#
-#  Copyright (C) 2005-2010  Hiroki Motoyoshi
-#
-# ----------------------------------------------------------------------------
-
-def autoload_method (method, library)
-  eval %{
-    def #{method} (*argv, &block)
-      begin
-        require "#{library}"
-      rescue LoadError
-        raise "error in autoloading '#{library}' hooked by method '#{method}', check gem installation."
-      end
-      #{method}(*argv, &block)
-    end
-  }
-end
-
-class Class
-  def autoload_method (method, library)
-    class_eval %{
-      def #{method} (*argv, &block)
-        begin
-          require "#{library}"
-        rescue LoadError
-          raise "error in autoloading '#{library}' hooked by method '#{method}', check gem installation."
-        end
-        #{method}(*argv, &block)
-      end
-    }
-  end
-end
-
-class Module
-  def autoload_method (method, library)
-    class_eval %{
-      def #{method} (*argv, &block)
-        begin
-          require "#{library}"
-        rescue LoadError
-          raise "error in autoloading '#{library}' hooked by method '#{method}', check gem installation."
-        end
-        #{method}(*argv, &block)
-      end
-    }
-  end
-end
-
-class Module
-  def autoload_module_function (method, library)
-    class_eval %{
-      module_function
-      def #{method} (*argv, &block)
-        begin
-          require "#{library}"
-        rescue LoadError
-          raise "error in autoloading '#{library}' hooked by method '#{method}', check gem installation."
-        end
-        #{method}(*argv, &block)
-      end
-    }
-  end
-end
-
-module CA
-
-  def self.each_load_path (name) # :nodoc:
-    autoload_dirs = $:.clone
-    if defined? Gem
-      autoload_dirs.push File.expand_path(File.join(__FILE__,"..","..",".."))
-      accounted = {}
-      Gem::Specification.each do |spec|
-        if accounted.has_key?(spec.name)
-          next
-        end
-        if spec.name =~ /carray\-/
-          spec.require_paths.each do |path|
-            if path !~ /^\//
-              path = File.join(spec.full_gem_path, path)
-            end
-            autoload_dirs.push(path)                
-          end
-          accounted[spec.name] = true
-        end
-      end
-    end
-    autoload_dirs.each do |path|
-      dir = File.join(path, name)
-      if File.directory?(dir)
-        Dir.chdir(dir) {
-          yield
-        }
-      end
-    end
-  end
-
-end
-
-__END__
-names = {"carray" => true}
-Gem.path.each do |path|
-  gems = File.join(path, "gems")
-  if File.directory?(gems)
-    Dir.chdir(gems) {
-      Dir["carray-*"].sort.reverse.each do |dir|
-        name = dir.sub(/\-\d+\.\d+\.\d+\z/, '')
-        next if names[name]
-        lib = File.join(dir, "lib")
-        if File.directory?(lib)
-          Dir.chdir(lib) {
-            Dir["carray/autoload/autoload_*"].each do |loader|
-              begin
-                load File.expand_path(File.join(gems, dir, lib, loader.sub(/\.rb\z/, "")))
-              rescue LoadError
-              end
-            end
-          }
-        end
-        names[name] = true
-      end
-    }
-  end
-end
-
-__END__
-CA.each_load_path("carray/autoload") {
-  Dir["autoload_*.rb"].each do |basename|
-    if basename =~ /\A(autoload_.+)\.rb\Z/
-      begin
-        require "carray/autoload/" + $1
-      rescue LoadError
-      end
-    end
-  end
-}
-

data/lib/carray/basic.rb

@@ -1,191 +0,0 @@
-# ----------------------------------------------------------------------------
-#
-#  carray/basic.rb
-#
-#  This file is part of Ruby/CArray extension library.
-#
-#  Copyright (C) 2005-2025 Hiroki Motoyoshi
-#
-# ----------------------------------------------------------------------------
-
-module CAMath
-  include Math
-end
-
-#
-# monkey patch
-#
-
-def nan
-  0.0/0.0
-end
-
-class Array                          # :nodoc:
-  def +@
-    return CA_SIZE(self)
-  end
-  def to_ca
-    return CA_OBJECT(self)
-  end
-end
-
-class Range                          # :nodoc: 
-  def +@
-    return CA_SIZE(self)    
-  end
-  def to_ca
-    return CA_OBJECT(self)
-  end
-end
-
-class Numeric
-  
-  def eq (other)
-    case other
-    when CArray
-      return other.eq(self)
-    else
-      return send(:eq, *other.coerce(self))
-    end
-  end
-
-  def ne (other)
-    case other
-    when CArray
-      return other.ne(self)
-    else
-      return send(:ne, *other.coerce(self))
-    end
-  end
-  
-end
-
-class CArray
-
-  def has_attribute?
-    if ( not @attribute ) or @attribute.empty?
-      return false
-    else
-      return true
-    end
-  end
-
-  def attribute= (obj)
-    unless obj.is_a?(Hash)
-      raise "attribute should be a hash object"
-    end
-    @attribute = obj
-  end
-
-  def attribute
-    @attribute ||= {}
-    return @attribute
-  end
-  
-  def first
-    ( self.elements == 0 ) ? nil : self[0]
-  end
-  
-  def last
-    ( self.elements == 0 ) ? nil :self[-1]
-  end
-
-  # matchup
-
-  def matchup (ref)
-    ri = ref.sort_addr
-    rs = ref[ri].to_ca
-    si = rs.bsearch(self)
-    return ri.project(si)
-  end
-
-  def matchup_nearest (ref, direction: "round")
-    ri = ref.sort_addr
-    rs = ref[ri].to_ca
-    si = rs.section(self).send(direction.intern).int64
-    si.trim!(0,si.size)
-    return ri[si].to_ca
-  end
-
-
-  # index / indices / axes
-
-  def address ()
-    return CArray.int32(*dim).seq!
-  end
-
-  def index (n = 0)
-    unless n.is_a?(Integer)
-      raise ArgumentError, "argument should be an integer"
-    end
-    if n.between?(0, ndim-1)
-      return CArray.int32(dim[n]).seq!
-    else
-      raise ArgumentError,
-            "invalid dimension specifier #{n} (0..#{self.ndim-1})"
-    end
-  end
-
-  #
-  #
-  #
-
-  def indices
-    list = Array.new(ndim) {|i|
-      rpt = self.dim
-      rpt[i] = :%
-      index(i)[*rpt]
-    }
-    if block_given?
-      return yield(*list)
-    else
-      return list
-    end
-  end
-
-    
-
-end
-
-class CArray
-
-  # Returns object carray has elements of splitted carray at dimensions 
-  #      which is given by arguments
-  #
-  #    a = CA_INT([[1,2,3], [4,5,6], [7,8,9]])
-  #
-  #    a.split(0) 
-  #      [1,2,3], [4,5,6], [7,8,9]
-  #
-  #    a.split(1)
-  #      [1,4,7], [2,5,8], [3,6,9]
-  #
-
-  def split (*argv)
-    odim = dim.values_at(*argv)
-    out  = CArray.object(*odim)
-    idx  = [nil] * ndim
-    attach {
-      out.map_with_index! do |o, v|
-        argv.each_with_index do |r, i|
-          idx[r] = v[i]
-        end
-        self[*idx].to_ca
-      end
-    }
-    return out
-  end
-
-end
-
-class CAUnboundRepeat
-
-  def template (*argv, &block)
-    return parent.template(*argv,&block)[*spec.map{|x| x != :* ? nil : x}]
-  end
-
-end
-
-
-
-

data/lib/carray/broadcast.rb

@@ -1,101 +0,0 @@
-# ----------------------------------------------------------------------------
-#
-#  carray/broadcast.rb
-#
-#  This file is part of Ruby/CArray extension library.
-#
-#  Copyright (C) 2005-2025 Hiroki Motoyoshi
-#
-# ----------------------------------------------------------------------------
-
-class CArray
-
-  def broadcast_to (*newdim)
-    
-    if newdim.size < ndim
-      raise "(Broadcasting) can't broadcast to #{newdim.inspect} because too small rank is specified"
-    end
-
-    #
-    # Try to build unbound repeat index (includes :*)
-    #                     with broadcasting rule in Numpy.
-    #
-    repdim = []
-    shape  = []
-
-    srcdim = dim.dup 
-    dstdim = newdim.dup
-    sd = srcdim.pop
-    dd = dstdim.pop
-    while dd
-      if sd == dd
-        repdim.unshift nil
-        shape.unshift(dd)
-        sd = srcdim.pop
-      elsif dd == 1
-        repdim.unshift :*
-      elsif sd == 1 
-        repdim.unshift :*
-        sd = srcdim.pop
-      else
-        raise "(Broadcasting) can't broadcast to #{newdim.inspect} " 
-      end
-      dd = dstdim.pop
-    end
-
-    #
-    # Call Unbound repeat's bind
-    #
-    return self.reshape(*shape)[*repdim].bind(*newdim) if repdim.include?(:*)
-    
-    self
-  end
-
-end
-
-class CScalar
-  
-  def broadcast_to (*newdim)
-    out = CArray.new(data_type, newdim, bytes: bytes)
-    out[] = self
-    out
-  end
-
-end
-
-class CAUnboundRepeat
-
-  alias broadcast_to bind
-
-end
-
-def CArray.broadcast (*argv, expand_scalar: false, &block)
-  
-  sel = argv.select { |arg| arg.is_a?(CArray) }
-  return argv if sel.empty?
-  
-  dim = []
-  ndim = sel.map(&:ndim).max
-  ndim.times do |k|
-    dim[k] = sel.map { |arg| arg.dim[k] || 1 }.max
-  end
-
-  if not expand_scalar
-    list = argv.map { |arg| 
-      case arg
-      when CScalar
-        arg
-      when CArray
-        arg.broadcast_to(*dim)
-      else
-        arg
-      end
-    }
-  else
-    list = argv.map { |arg| arg.is_a?(CArray) ? arg.broadcast_to(*dim) : arg }
-  end
-  
-  return block.call(*list) if block
-  return list
-end
-