Class: XArray

Inherits:

ValueAdd

• Object
• Value
• ValueAdd
• XArray

Defined in:

lib/primitive_wrapper.rb

Overview

need to figure out how left and right things work …

OK this is cool,  things on the right if more than one go in one array
... or a non-array if just one item

Constant Summary

LAM_ISORT =

lambda {|a,b| a.inspect <=> b.inspect }

LAM_SSORT =

lambda {|a,b| a.to_s <=> b.to_s }

Instance Method Summary

• #[](*list) ⇒ Object
• #[]=(*list) ⇒ Object
• #delete_at(*index_list) ⇒ Object
• #include?(*list) ⇒ Boolean

  replace with list of stuff.

• #include_any?(*list) ⇒ Boolean

  replace with list of stuff.

• #initialize(obj = []) ⇒ XArray constructor

  A new instance of XArray.

• #isort ⇒ Object
• #isort! ⇒ Object
• #ssort ⇒ Object
• #ssort! ⇒ Object
• #valid_type(prm) ⇒ Object

Methods inherited from ValueAdd

bestow_methods, capture_base_methods

Methods inherited from Value

#!=, #==, #ensure_valid, #freeze, freeze_raise?, ignore_on_freeze, #inspect, #prim_value, raise_on_freeze, #replace, #to_s, #to_wrapper, #type, #type_of?, #unwrap, #val, #val=, #wrapped?, #~

Constructor Details

#initialize(obj = []) ⇒ XArray

Returns a new instance of XArray.

# File 'lib/primitive_wrapper.rb', line 1143

def initialize(obj=[])
  obj = obj.prim_value
  ensure_valid(obj)
  @value = obj
end

Instance Method Details

#[](*list) ⇒ Object

# File 'lib/primitive_wrapper.rb', line 1166

def [](*list)
  list = PrimitiveWrapper::get_list(list,size)
  if list.empty?
    return nil
  elsif list.count==1
    if list.first == :all
      return @value
    elsif list.first.type_of? Range  # get_list may pick this appart
      rtn = []
      list.first.to_wrapper.re_range(size).each do |idx|
        rtn.push @value[idx]
      end
      return rtn  
    else
      return @value[list.first]
    end
  end
  rtn = []
  # for now keep this here until you can justify that it is not needed
  list.each do |ii|   # I don't need to do this do I ???  get_list should untangle things
    if ii.type_of? Range
      ii.to_wrapper.re_range(size).each do |idx|
        rtn.push @value[idx]
      end
    elsif ii.type_of? Array
      ii.each do |idx|
        rtn.push @value[idx]
      end
    else
      rtn.push @value[ii]
    end
  end
  return rtn
end

#[]=(*list) ⇒ Object

# File 'lib/primitive_wrapper.rb', line 1200

def []=(*list)
  data = list.pop
  list = PrimitiveWrapper::get_list(list,size)
  return nil if list.empty?
  if list.count==1
    if list.first.respond_to? :each
      list = list.first
      if list.type_of? Range
        list = list.to_xr.re_range(size)
      end
    end
  end
  if list.count==1
    if list.first == :all
      PrimitiveWrapper.copy(@value, data, :all) 
    end
    idxs = list.first
    if (idxs.respond_to? :each)
      if idxs.type_of? Range
        idxs = idxs.to_xr.re_range(size)
      end        
      idxs.each do |idx|
        @value[idx] = data
      end
    else
      @value[idxs] = data
    end 
  else
    if data.type_of? Array
      data = PrimitiveWrapper::get_list(data,size)
    end
    PrimitiveWrapper.copy(@value, data, list)
  end
end

#delete_at(*index_list) ⇒ Object

# File 'lib/primitive_wrapper.rb', line 1234

def delete_at(*index_list)
  return nil if index_list.empty?
  rtn = []
  if (index_list.count==1)
    if index_list.first==:all
      rtn = @value.dup
      @value.empty!
      return rtn
    else
      ii = index_list.first
      rtn = self[ii]
      if ii.type_of? Range
        ii = ii.to_xr
        ii.re_range!(size)
        ii.reorder!
        ii.reverse_each do |idx|
          @value.delete_at(idx)
        end
        return rtn
      end
    end
  end
  rtn = self[*index_list]
  list = PrimitiveWrapper::get_list(index_list,size)
  list = list & list  # remove duplicates
  list.sort.reverse.each do |idx|
    if idx.type_of? Range
      t_idx = idx.reorder
    else
      t_idx = idx
    end
    @value.delete_at(t_idx)
  end
  return rtn
end

#include?(*list) ⇒ Boolean

replace with list of stuff

Returns:

• (Boolean)

# File 'lib/primitive_wrapper.rb', line 1269

def include?(*list)  # replace with list of stuff
  if list.count==1
    if list.first.respond_to? :each
      list = list.first
    end
  end
  list.each do |item|
    return false unless @value.include? item
  end
  true
end

#include_any?(*list) ⇒ Boolean

replace with list of stuff

Returns:

• (Boolean)

# File 'lib/primitive_wrapper.rb', line 1280

def include_any?(*list)  # replace with list of stuff
  if list.count==1
    if list.first.respond_to? :each
      list = list.first
    end
  end
  list.each do |item|
    return true if @value.include? item
  end
  false
end

#isort ⇒ Object

# File 'lib/primitive_wrapper.rb', line 1154

def isort 
  @value.sort &LAM_ISORT
end

#isort! ⇒ Object

# File 'lib/primitive_wrapper.rb', line 1157

def isort!
  @value.sort! &LAM_ISORT
end

#ssort ⇒ Object

# File 'lib/primitive_wrapper.rb', line 1160

def ssort
  @value.sort &LAM_SSORT
end

#ssort! ⇒ Object

# File 'lib/primitive_wrapper.rb', line 1163

def ssort!
  @value.sort! &LAM_SSORT
end

#valid_type(prm) ⇒ Object

# File 'lib/primitive_wrapper.rb', line 1149

def valid_type(prm)
  return true if prm.kind_of? Array
  return true if prm.kind_of? XArray
  false
end