daff 1.1.2

data/lib/lib/coopy/table_io.rb

@@ -0,0 +1,33 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+
+module Coopy
+  class TableIO 
+    
+    def initialize
+    end
+    
+    def get_content(name)
+      return ::Sys::Io::HxFile.get_content(name)
+    end
+    
+    def save_content(name,txt)
+      ::Sys::Io::HxFile.save_content(name,txt)
+      return true
+    end
+    
+    def args 
+      return HxSys.args
+    end
+    
+    def write_stdout(txt)
+      HxSys.stdout.write_string(txt)
+    end
+    
+    def write_stderr(txt)
+      HxSys.stderr.write_string(txt)
+    end
+    
+  end
+
+end

data/lib/lib/coopy/table_modifier.rb

@@ -0,0 +1,39 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+
+module Coopy
+  class TableModifier 
+    
+    def initialize(t)
+      @t = t
+    end
+    
+    protected
+    
+    attr_accessor :t
+    
+    public
+    
+    def remove_column(at)
+      fate = []
+      begin
+        _g1 = 0
+        _g = @t.get_width
+        while(_g1 < _g) 
+          i = _g1
+          _g1+=1
+          if i < at 
+            fate.push(i)
+          elsif i > at 
+            fate.push(i - 1)
+          else 
+            fate.push(-1)
+          end
+        end
+      end
+      return @t.insert_or_delete_columns(fate,@t.get_width - 1)
+    end
+    
+  end
+
+end

data/lib/lib/coopy/table_text.rb

@@ -0,0 +1,25 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+
+module Coopy
+  class TableText 
+    
+    def initialize(rows)
+      @rows = rows
+      @view = rows.get_cell_view
+    end
+    
+    protected
+    
+    attr_accessor :rows
+    attr_accessor :view
+    
+    public
+    
+    def get_cell_text(x,y)
+      return @view.to_s(@rows.get_cell(x,y))
+    end
+    
+  end
+
+end

data/lib/lib/coopy/unit.rb

@@ -0,0 +1,70 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+
+module Coopy
+  class Unit 
+    
+    def initialize(l = -2,r = -2,p = -2)
+      @l = l
+      @r = r
+      @p = p
+    end
+    
+    attr_accessor :l
+    attr_accessor :r
+    attr_accessor :p
+    
+    def lp 
+      if @p == -2 
+        return @l
+      else 
+        return @p
+      end
+    end
+    
+    def to_s 
+      return _hx_str(::Coopy::Unit.describe(@p)) + "|" + _hx_str(::Coopy::Unit.describe(@l)) + ":" + _hx_str(::Coopy::Unit.describe(@r)) if @p >= -1
+      return _hx_str(::Coopy::Unit.describe(@l)) + ":" + _hx_str(::Coopy::Unit.describe(@r))
+    end
+    
+    def from_string(txt)
+      txt += "]"
+      at = 0
+      begin
+        _g1 = 0
+        _g = txt.length
+        while(_g1 < _g) 
+          i = _g1
+          _g1+=1
+          ch = (txt[i].ord rescue nil)
+          if ch >= 48 && ch <= 57 
+            at *= 10
+            at += ch - 48
+          elsif ch == 45 
+            at = -1
+          elsif ch == 124 
+            @p = at
+            at = 0
+          elsif ch == 58 
+            @l = at
+            at = 0
+          elsif ch == 93 
+            @r = at
+            return true
+          end
+        end
+      end
+      return false
+    end
+    
+    def Unit.describe(i)
+      if i >= 0 
+        return "" + _hx_str(i)
+      else 
+        return "-"
+      end
+    end
+    
+  end
+
+end

data/lib/lib/coopy/view.rb

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+
+module Coopy
+  class View 
+    def toString(d) puts "Abstract View.toString called" end
+    def getBag(d) puts "Abstract View.getBag called" end
+    def getTable(d) puts "Abstract View.getTable called" end
+    def hasStructure(d) puts "Abstract View.hasStructure called" end
+    def equals(d1,d2) puts "Abstract View.equals called" end
+    def toDatum(str) puts "Abstract View.toDatum called" end
+  end
+
+end

data/lib/lib/coopy/viewed_datum.rb

@@ -0,0 +1,37 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+
+module Coopy
+  class ViewedDatum 
+    
+    def initialize(datum,view)
+      @datum = datum
+      @view = view
+    end
+    
+    attr_accessor :datum
+    attr_accessor :view
+    
+    def to_s 
+      return @view.to_s(@datum)
+    end
+    
+    def get_bag 
+      return @view.get_bag(@datum)
+    end
+    
+    def get_table 
+      return @view.get_table(@datum)
+    end
+    
+    def has_structure 
+      return @view.has_structure(@datum)
+    end
+    
+    def ViewedDatum.get_simple_view(datum)
+      return ::Coopy::ViewedDatum.new(datum,::Coopy::SimpleView.new)
+    end
+    
+  end
+
+end

data/lib/lib/coopy/viterbi.rb

@@ -0,0 +1,172 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+
+module Coopy
+  class Viterbi 
+    
+    def initialize
+      @k = @t = 0
+      self.reset
+      @cost = ::Coopy::SparseSheet.new
+      @src = ::Coopy::SparseSheet.new
+      @path = ::Coopy::SparseSheet.new
+    end
+    
+    protected
+    
+    attr_accessor :k
+    attr_accessor :t
+    attr_accessor :index
+    attr_accessor :mode
+    attr_accessor :path_valid
+    attr_accessor :best_cost
+    attr_accessor :cost
+    attr_accessor :src
+    attr_accessor :path
+    
+    public
+    
+    def reset 
+      @index = 0
+      @mode = 0
+      @path_valid = false
+      @best_cost = 0
+    end
+    
+    def set_size(states,sequence_length)
+      @k = states
+      @t = sequence_length
+      @cost.resize(@k,@t,0)
+      @src.resize(@k,@t,-1)
+      @path.resize(1,@t,-1)
+    end
+    
+    def assert_mode(_next)
+      @index+=1 if _next == 0 && @mode == 1
+      @mode = _next
+    end
+    
+    def add_transition(s0,s1,c)
+      resize = false
+      if s0 >= @k 
+        @k = s0 + 1
+        resize = true
+      end
+      if s1 >= @k 
+        @k = s1 + 1
+        resize = true
+      end
+      if resize 
+        @cost.non_destructive_resize(@k,@t,0)
+        @src.non_destructive_resize(@k,@t,-1)
+        @path.non_destructive_resize(1,@t,-1)
+      end
+      @path_valid = false
+      self.assert_mode(1)
+      if @index >= @t 
+        @t = @index + 1
+        @cost.non_destructive_resize(@k,@t,0)
+        @src.non_destructive_resize(@k,@t,-1)
+        @path.non_destructive_resize(1,@t,-1)
+      end
+      sourced = false
+      if @index > 0 
+        c += @cost.get(s0,@index - 1)
+        sourced = @src.get(s0,@index - 1) != -1
+      else 
+        sourced = true
+      end
+      if sourced 
+        if c < @cost.get(s1,@index) || @src.get(s1,@index) == -1 
+          @cost.set(s1,@index,c)
+          @src.set(s1,@index,s0)
+        end
+      end
+    end
+    
+    def end_transitions 
+      @path_valid = false
+      self.assert_mode(0)
+    end
+    
+    def begin_transitions 
+      @path_valid = false
+      self.assert_mode(1)
+    end
+    
+    def calculate_path 
+      return if @path_valid
+      self.end_transitions
+      best = 0
+      bestj = -1
+      if @index <= 0 
+        @path_valid = true
+        return
+      end
+      begin
+        _g1 = 0
+        _g = @k
+        while(_g1 < _g) 
+          j = _g1
+          _g1+=1
+          if (@cost.get(j,@index - 1) < best || bestj == -1) && @src.get(j,@index - 1) != -1 
+            best = @cost.get(j,@index - 1)
+            bestj = j
+          end
+        end
+      end
+      @best_cost = best
+      begin
+        _g11 = 0
+        _g2 = @index
+        while(_g11 < _g2) 
+          j1 = _g11
+          _g11+=1
+          i = @index - 1 - j1
+          @path.set(0,i,bestj)
+          ::Haxe::Log._trace.call("Problem in Viterbi",{ file_name: "Viterbi.hx", line_number: 119, class_name: "coopy.Viterbi", method_name: "calculatePath"}) if !(bestj != -1 && (bestj >= 0 && bestj < @k))
+          bestj = @src.get(bestj,i)
+        end
+      end
+      @path_valid = true
+    end
+    
+    def to_s 
+      self.calculate_path
+      txt = ""
+      begin
+        _g1 = 0
+        _g = @index
+        while(_g1 < _g) 
+          i = _g1
+          _g1+=1
+          if @path.get(0,i) == -1 
+            txt += "*"
+          else 
+            txt += @path.get(0,i)
+          end
+          txt += " " if @k >= 10
+        end
+      end
+      txt += " costs " + _hx_str(self.get_cost)
+      return txt
+    end
+    
+    def length 
+      self.calculate_path if @index > 0
+      return @index
+    end
+    
+    def get(i)
+      self.calculate_path
+      return @path.get(0,i)
+    end
+    
+    def get_cost 
+      self.calculate_path
+      return @best_cost
+    end
+    
+  end
+
+end

data/lib/lib/coopy/workspace.rb

@@ -0,0 +1,22 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+
+module Coopy
+  class Workspace 
+    
+    def initialize
+    end
+    
+    attr_accessor :parent
+    attr_accessor :local
+    attr_accessor :remote
+    attr_accessor :report
+    attr_accessor :tparent
+    attr_accessor :tlocal
+    attr_accessor :tremote
+    attr_accessor :p2l
+    attr_accessor :p2r
+    attr_accessor :l2r
+  end
+
+end

data/lib/lib/haxe/ds/int_map.rb

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+
+module Haxe
+module Ds
+  class IntMap 
+    
+    def initialize
+    end
+    
+  end
+
+end
+end

data/lib/lib/haxe/ds/string_map.rb

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+
+module Haxe
+module Ds
+  class StringMap 
+    
+    def initialize
+    end
+    
+  end
+
+end
+end