mll 0.0.1 → 0.1.0

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: 7adfea3942afe7d69c17c7eb21543b42e550b97b
-  data.tar.gz: a435aa21974c01485aea5ade3ebd024cb101b0f0
+  metadata.gz: d8b4f658534716d142d0dedb616584ab5a016b71
+  data.tar.gz: 5253d8e36e96f2e4dba389268d64215a41b2befb
 SHA512:
-  metadata.gz: c56f1539a27872154f60e742346852a5ee3d3fae77f330361b76dd7e289427c84ef569917cb8b8763a49c3f249fa0e886432c621d5ee008c4e2670fac45dea89
-  data.tar.gz: 8d7bdb509af3a9206dfa2b31c5f1aa428b7763c26ac75f6d7e48536a14b52fab99c3cf511e8201443e8219a9dc2082a26be9089efedf63fad3c12c92fcedd312
+  metadata.gz: 34e4ede0875ae7a9e5500bf10f081f4cb5dcecf9b357bc39b420886a190480b0e0ee07b499be9bf59cbb93cdea70aeeba5cb3a6b946a00cce7d7077076b96ef9
+  data.tar.gz: fe4688d9b0b2bcba1383bd7f8f6cfb51ff69e96be8d55d970adbe84fab34f80cdbfd7ee86f4d3d39840b097aa37c40effbe3ebcb37e15eebcfdfab70d884fe38

data/README.md

@@ -4,25 +4,21 @@
 
 ## Usage
 
-Планируется несколько способов использования этой библиотеки -- как доступ к ней через `MLL::`, так и манкипатчинг стандартных типов, таких как Numeric и Array.
+~~Планируется несколько способов использования этой библиотеки -- как доступ к ней через `MLL::`, так и манкипатчинг стандартных типов, таких как Numeric и Array.~~
 
 ### Examples:
 
-    MLL::range(3).to_a               #=> [1, 2, 3]
-    MLL::range(range(3)).map(&:to_a) #=> [[1], [1, 2], [1, 2, 3]]
+    MLL::range(3).to_a    #=> [1, 2, 3]
+    MLL::range(2, 3).to_a #=> [
+                               #<Enumerator: 1..2:step(1)>,
+                               #<Enumerator: 1..3:step(1)>,
+                              ]
+    MLL::range(1..3)      #=> [
+                               #<Enumerator: 1..1:step(1)>,
+                               #<Enumerator: 1..2:step(1)>,
+                               #<Enumerator: 1..3:step(1)>
+                              ]
 
 ## Installation
 
-Add this line to your application's Gemfile:
-
-```ruby
-gem 'mll'
-```
-
-And then execute:
-
-    $ bundle
-
-Or install it yourself as:
-
     $ gem install mll

data/lib/mll.rb

@@ -1,30 +1,67 @@
-# http://reference.wolfram.com/language/guide/LanguageOverview.html
 module MLL
 
-  # http://reference.wolfram.com/language/guide/ListManipulation.html
-
-    # http://reference.wolfram.com/language/guide/ConstructingLists.html
-
-    # http://reference.wolfram.com/language/ref/Range.html
-    def self.range *args
-      # see also http://ruby-doc.org/core-1.9.3/Range.html#method-i-step
-      raise ArgumentError.new("wrong number of arguments (#{args.size} for 1..3)") unless (1..3).include? args.size
-      if args.size == 1
-        if args[0].respond_to?(:map)
-          args[0].map &method(:range)
+  def self.define_function_that_can_enumerate name, &block
+    # http://stackoverflow.com/a/12792313/322020
+    (class << self; self end).class_eval do
+      define_method name do |*args|
+        if args.size == 1 && args.first.respond_to?(:map)
+          args.first.map &method(name)
         else
-          range 1, args[0]
+          block.call *args
         end
-      else
-        Range.new(args[0], args[1]).step(args[2] || 1)
       end
     end
+  end
+
+  define_function_that_can_enumerate :range do |*args|
+    raise ArgumentError.new("wrong number of arguments (#{args.size} for 1..3)") unless (1..3).include? args.size
+    next range 1, args[0] if args.size == 1
+    Range.new(args[0], args[1]).step(args[2] || 1)
+  end
+
+end
+
 
-    # http://reference.wolfram.com/language/guide/ElementsOfLists.html
-    # http://reference.wolfram.com/language/guide/RearrangingAndRestructuringLists.html
-    # http://reference.wolfram.com/language/guide/ApplyingFunctionsToLists.html
-    # http://reference.wolfram.com/language/guide/MathematicalAndCountingOperationsOnLists.html
+=begin
 
-  # http://reference.wolfram.com/language/guide/FunctionalProgramming.html
+      # http://reference.wolfram.com/language/guide/HandlingArraysOfData.html
+      # http://reference.wolfram.com/language/guide/ComputationWithStructuredDatasets.html
 
+module Enumerable
+  STDERR.puts "WARNING: #{name}#range was already defined" if method_defined? "range"
+  def range
+    # if self.respond_to? :each
+      if self.first.respond_to? :each
+        raise ArgumentError.new("if the first #range parameter responds to :each, it should be the only argument") \
+          if self.size > 1
+        self.first.zip.map &:range
+      else
+        case self.size
+        when 1 ; [1,self.first].range
+        when 2 ; Range.new(*self.take(2)).step(1) # to convert Rage into Enumerator
+        when 3 ; Range.new(*self.take(2)).step(self.drop(2).first)
+        when 4 ; raise ArgumentError.new("wrong number of arguments (#{self.size} for 1..3)")
+        end
+      end
+    # else
+    #   [1, self].range
+    # end
+  end
 end
+
+class Fixnum
+  STDERR.puts "WARNING: #{name}#range was already defined" if method_defined? "range"
+  def range
+    # if self.respond_to? :each
+    #   if self.first.respond_to? :each
+    #     self.map &:range
+    #   else
+    #     Range.new(*self[0,2]).step(self[2] || 1)
+    #   end
+    # else
+      [self].range
+    # end
+  end
+end
+
+=end

data/mll.gemspec

@@ -1,11 +1,11 @@
 Gem::Specification.new do |spec|
   spec.name          = "mll"
-  spec.version       = "0.0.1"
+  spec.version       = "0.1.0"
   spec.authors       = ["Victor Maslov"]
   spec.email         = ["nakilon@gmail.com"]
   spec.summary       = "Mathematica Language Library in Ruby"
   spec.description   = ""
-  # spec.homepage      = ""
+  spec.homepage      = "https://github.com/Nakilon/mll"
   spec.license       = "MIT"
 
   spec.files         = `git ls-files -z`.split("\x0")

data/spec/_spec.rb

@@ -1,26 +1,142 @@
 require_relative File.join "..", "lib", "mll"
 
-describe "mll" do
 
-  describe "range" do
+# http://reference.wolfram.com/language/guide/LanguageOverview.html
+describe MLL do
+
+  # http://reference.wolfram.com/language/guide/ListManipulation.html
+  describe "List Manipulation" do
+
+    # http://reference.wolfram.com/language/guide/ConstructingLists.html
+    describe "Constructing Lists" do
+
+      # http://reference.wolfram.com/language/ref/Range.html
+      describe "range" do
+
+        example "range( >3 args )" do
+          expect{ MLL::range(1,2,3,4) }.to raise_error ArgumentError
+        end
+
+        describe "Basic Examples" do
+
+          example "range(n)" do
+            expect(MLL::range(4)).to be_a Enumerator
+            expect(MLL::range(4).to_a).to eq [1,2,3,4]
+          end
+          example "range(imin, imax)" do
+            expect(MLL::range(2,5)).to be_a Enumerator
+            expect(MLL::range(2,5).to_a).to eq [2,3,4,5]
+          end
+          example "range(imin, imax, id)" do
+            expect(MLL::range(1,2,3)).to be_a Enumerator
+            expect(MLL::range(1,2,0.5).to_a).to eq [1,1.5,2]
+            expect(MLL::range(2,6,2).to_a).to eq [2,4,6]
+            expect(MLL::range(-4,9,3).to_a).to eq [-4,-1,2,5,8]
+          end
+          # example "range(imin, imax, id)" do
+          #   expect(MLL::range(2,5,2)).to be_a Enumerator
+          #   expect(MLL::range(2,5,2).to_a).to eq [2,4]
+          #   expect(MLL::range(2,6,2).to_a).to eq [2,4,6]
+          # end
+        end
+
+        describe "Generalizations & Extensions" do
+
+          example "range([n1, n2, n3, n4])" do
+            # expect(MLL::range([2,3])).to be_a Enumerator # TODO revive me
+            MLL::range([5,2,6,3]).each do |i|
+              expect(i).to be_a Enumerator
+            end
+            expect(MLL::range([5,2,6,3]).map(&:to_a)).to eq [[1,2,3,4,5],[1,2],[1,2,3,4,5,6],[1,2,3]]
+          end
+
+        end
+
+        describe "Applications" do
+
+          example "power(2, range(5))" do
+            pending "#power is yet to be implemented"
+            p power(2, range(5))
+            expect(power(2, range(5))).to eq [2,4,8,16,32]
+          end
+
+        end
+
+        describe "Neat Examples" do
+
+          example "range(1..3)" do
+            # expect(MLL::range(MLL::range(3))).to be_a Enumerator # TODO revive me
+            MLL::range(MLL::range(3)).each do |i|
+              expect(i).to be_a Enumerator
+            end
+            expect(MLL::range(1..3).map(&:to_a)).to eq [[1],[1,2],[1,2,3]]
+          end
+          example "range(range(range(n)))" do
+            # expect(MLL::range(MLL::range(3))).to be_a Enumerator # TODO revive me
+            # MLL::range(MLL::range(MLL::range(3))).each do |i|
+            #   expect(i).to be_a Enumerator
+            # end
+            expect(MLL::range(MLL::range(MLL::range(3))).map{ |i| i.map(&:to_a) }).to eq [[[1]],[[1],[1,2]],[[1],[1,2],[1,2,3]]]
+          end
+
+          # TODO Nest[Range,3,6]
+
+        end
+
+        # TODO "Find an inverse permutation:"
+        # TODO "Use Range or Span (;;) as Part specification:"
+
+      end
 
-    example "range(n)" do
-      expect(MLL::range(5).to_a).to eq [1,2,3,4,5]
-    end
-    example "range(imin, imax)" do
-      expect(MLL::range(2,5).to_a).to eq [2,3,4,5]
-    end
-    example "range(imin, imax, id)" do
-      expect(MLL::range(2,5,2).to_a).to eq [2,4]
-      expect(MLL::range(2,6,2).to_a).to eq [2,4,6]
-    end
-    example "range([n1,n2])" do
-      expect(MLL::range([2,3]).map(&:to_a)).to eq [[1,2],[1,2,3]]
     end
-    example "range(range(n))" do
-      expect(MLL::range(MLL::range(3)).map(&:to_a)).to eq [[1],[1,2],[1,2,3]]
+
+    # http://reference.wolfram.com/language/guide/ElementsOfLists.html
+    # http://reference.wolfram.com/language/guide/RearrangingAndRestructuringLists.html
+    # http://reference.wolfram.com/language/guide/ApplyingFunctionsToLists.html
+    # http://reference.wolfram.com/language/guide/MathematicalAndCountingOperationsOnLists.html
+
+  end
+
+  # http://reference.wolfram.com/language/guide/FunctionalProgramming.html
+
+end
+
+
+=begin
+
+describe "range" do
+
+  example "n.range" do
+    expect(5.range).to be_a Enumerator
+    expect(5.range.to_a).to eq [1,2,3,4,5]
+  end
+
+  example "[imin, imax].range" do
+    expect([2,5].range).to be_a Enumerator
+    expect([2,5].range.to_a).to eq [2,3,4,5]
+  end
+  example "[imin, imax, id].range" do
+    expect([2,5,2].range).to be_a Enumerator
+    expect([2,5,2].range.to_a).to eq [2,4]
+    expect([2,6,2].range.to_a).to eq [2,4,6]
+  end
+  example "[[n1,n2]].range" do
+    # expect([[2,3]].range).to be_a Enumerator # TODO revive me
+    [[2,3]].range.each do |i|
+      expect(i).to be_a Enumerator
     end
+    # expect([[2,3]].range.map(&:to_a)).to eq [[1,2],[1,2,3]]
+    expect([[2,3]].range.map(&:to_a)).to eq [[1,2],[1,2,3]]
+  end
 
+  # using methods instead of functions helps us with method_missing but forces to add []
+  example "n.range.range" do
+    # expect([3.range].range).to be_a Enumerator # TODO revive me
+    expect([3.range].range.map(&:to_a)).to eq [[1],[1,2],[1,2,3]]
   end
 
+  # TODO 4 args should fail
+
 end
+
+=end

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: mll
 version: !ruby/object:Gem::Version
-  version: 0.0.1
+  version: 0.1.0
 platform: ruby
 authors:
 - Victor Maslov
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2015-04-04 00:00:00.000000000 Z
+date: 2015-05-07 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: bundler
@@ -52,7 +52,7 @@ files:
 - lib/mll.rb
 - mll.gemspec
 - spec/_spec.rb
-homepage: 
+homepage: https://github.com/Nakilon/mll
 licenses:
 - MIT
 metadata: {}