qlang 0.0.27182000 → 0.0.27182100

data/lib/qlang/lexer/func_lexer.rb

@@ -1,13 +0,0 @@
-module Qlang
-  module Lexer
-    class FuncLexer < Base
-      rule(%r@#{FUNCCV}@) { :FDEF }
-      rule(/\=/) { :EQL }
-
-      rule(/[ \t\f]/)
-
-      rule(/\r\n/) { :NLIN }
-      rule(/[\w\(].*/) { :FOML }
-    end
-  end
-end

data/lib/qlang/lexer/wrap_lexer.rb

@@ -1,25 +0,0 @@
-module Qlang
-  module Lexer
-    class WrapLexer < Base
-      rule(/#{FUNCCV}#{ANYSP}=#{ANYSP}#{FORMULA}+/) { :def_func }
-      rule(/#{FUNCCN}/) { :eval_func }
-      rule(/S#{ANYSP}#{LPRN}#{ANYSTR}#{RPRN}\[#{ANYSTR}\]/) { :integral }
-      rule(/d\/d#{VAR} #{FORMULA}/) { :differential }
-      rule(/#{LPRN}#{NUMS_BY_SP}#{RPRN}/) { :vector }
-      rule(/#{LPRN}#{NUMS_BY_SP_BY_SCLN}#{RPRN}t/) { :tmatrix }
-      rule(/#{LPRN}#{NUMS_BY_SP_BY_SCLN}#{RPRN}/) { :matrix }
-
-
-      rule(/\(/) { :LPRN }
-      rule(/\)/) { :RPRN }
-      rule(/\{/) { :LBRC }
-      rule(/\}/) { :RBRC }
-
-      rule(/[ \t\f]/)
-
-      rule(/(\r|\n)+/) { :NLIN }
-
-      rule(/[^\(\)\{\}(\n\n)]+/) { :CONT }
-    end
-  end
-end

data/spec/iq_spec.rb

@@ -1,141 +0,0 @@
-require 'spec_helper'
-
-describe Qlang do
-  describe Iq do
-    def self.def_test(name, input, output)
-      it name + '_def' do
-        expect(Iq.execute(input)).to eq(output)
-      end
-    end
-
-    def self.cal_test(name, input, output)
-      it name + '_cal' do
-        expect(Iq.execute(input)).to eq(output)
-        reset
-      end
-    end
-
-    describe 'General' do
-      cal_test('ex1', '2x', '2x')
-      cal_test('ex2', 'x + x', '2x')
-      cal_test('ex3', 'x * y', 'xy')
-    end
-
-    describe 'Matrix' do
-      cal_test('ex1',
-        '(1 2 3; 4 5 6)',
-        '(1 2 3; 4 5 6)'
-      )
-
-      cal_test('ex2',
-        '(1 2 3; 4 5 6) + (1 2 3; 4 5 6)',
-        '(2 4 6; 8 10 12)'
-      )
-
-      cal_test('ex3',
-        '(1 2 3; 4 5 6) - (2 4 1; 8 3 9)',
-        '(-1 -2 2; -4 2 -3)'
-      )
-
-      cal_test('ex4',
-        '(1 2; 3 4) * (1 2; 3 4)',
-        '(7 10; 15 22)'
-      )
-
-      cal_test('ex5',
-        '(1 2; 3 4) ** 2',
-        '(7 10; 15 22)'
-      )
-
-      cal_test('ex6',
-        '(1 2; 3 4) ** 2',
-        '(7 10; 15 22)'
-      )
-
-      cal_test('ex7',
-        '(1 2; 3 4) * (1 2)',
-        '(5 11)'
-      )
-
-      cal_test('ex8',
-        '(1 2 3; 4 5 6)t',
-        '(1 4; 2 5; 3 6)'
-      )
-    end
-
-    describe 'Vector' do
-      it do
-        expect(Iq.execute('(1 2 3)')).to eq('(1 2 3)')
-        expect(Iq.execute('(1 2 3) + (1 2 3)')).to eq('(2 4 6)')
-        expect(Iq.execute('(1  2  3 )  +  ( 1 2 3 )')).to eq('(2 4 6)')
-        expect(Iq.execute('(1 2 3) - (1 2 3) - (1 2 3)')).to eq('(-1 -2 -3)')
-      end
-    end
-
-    describe 'List' do
-      it do
-      end
-    end
-
-    describe 'Diff' do
-      it do
-        expect(Iq.execute('d/dx(e ** x)')).to eq('e ^ x')
-        expect(Iq.execute('d/dx(x ** 2)')).to eq('2x')
-        expect(Iq.execute('d/dx(x * 2)')).to eq('2')
-        expect(Iq.execute('d/dx( sin(x) )')).to eq('cos( x )')
-        expect(Iq.execute('d/dx(log( x ))')).to eq('1 / x')
-      end
-      cal_test('ex1', 'd/dx cos(x)', '- sin( x )')
-      cal_test('ex2', 'd/dx xx', '2x')
-    end
-
-    describe 'Integral' do
-      it do
-        expect(Iq.execute('S( log(x)dx )[0..1]')).to eq('-oo')
-        expect(Iq.execute('S( sin(x)dx )[0..pi]')).to eq('2.0')
-        expect(Iq.execute('S( cos(x)dx )[0..pi]')).to eq('0.0')
-        expect(Iq.execute('S( cos(x)dx )[0..pi]')).to eq('0.0')
-      end
-      cal_test('ex1', 'S(xx dx)[0..1]', '0.33333333')
-      cal_test('ex2', 'S(2pi dx)[0..1]', '6.28318531')
-    end
-
-    describe 'Function' do
-      def_test('ex1', 'f(x, y) = x + y', 'x + y')
-      cal_test('ex1', 'f( 4, 5 )', '9.0')
-
-      def_test('ex2', 'f( x     ,    y) = xy', 'x * y')
-      cal_test('ex2', 'f( 3, 9 )', '27.0')
-
-      def_test('ex3', 'f(x, y) = xy^2', 'x * ( y ** 2 )')
-      cal_test('ex3', 'f( 3, 2 )', '12.0')
-
-      def_test('ex4', 'f(x, y) = xy^2', 'x * ( y ** 2 )')
-      cal_test('ex4', 'df/dx', 'y ^ 2')
-
-      def_test('ex5', 'g(x) = x ^ 2', 'x ** 2')
-      cal_test('ex5', 'g(2)', '4.0')
-
-      def_test('ex6', 'h(x) = e ^ 2', 'e ** 2')
-      cal_test('ex6', 'h(2)', '7.3890560989306495')
-
-      def_test('ex7', 'h(x) = pix', 'pi * x')
-      cal_test('ex7', 'h(3)', '9.42477796076938')
-
-      def_test('ex8', 'h(x) = pie', 'pi * e')
-      cal_test('ex8', 'h(2)', '8.539734222673566')
-
-      def_test('ex9', 'h(x) = ( 1 / ( 2pi ) ^ ( 1 / 2.0 ) ) * e ^ ( - x ^ 2 / 2 )', '( ( 4503599627370496 / 6369051672525773 ) / ( pi ** 0.5 ) ) * ( e ** ( ( - ( x ** 2 ) ) / 2 ) )')
-      cal_test('ex9', 'S( h(x)dx )[-oo..oo]', '1.0')
-
-      def_test('ex10', 'f(x) = sin(x)', 'sin( x )')
-      cal_test('ex10', 'f(pi)', '0.0')
-
-      def_test('ex11', 'f(x) = cos(x)', 'cos( x )')
-      cal_test('ex11', 'f(pi)', '-1.0')
-
-      def_test('ex11', 'f(x) = log(x)', 'log( x )')
-      cal_test('ex11', 'f(e)', '1.0')
-    end
-  end
-end

data/spec/lexer/regular_expressions_spec.rb

@@ -1,45 +0,0 @@
-require 'spec_helper'
-
-include Lexer::Tokens
-
-describe 'Regular expressions' do
-  def self.should_match(num, rgx, str)
-    it 'ex' + num.to_s do
-      expect(rgx =~ str).to eq(0)
-      expect($&).to eq(str)
-    end
-  end
-
-  def self.should_not_match(num, rgx, str)
-    it 'ex' + num.to_s do
-      expect(rgx =~ str).not_to eq(0)
-    end
-  end
-
-  describe 'tokens' do
-    describe 'nums' do
-      should_match(1, NUM, '1')
-      should_match(2, NUM, '234987423')
-      should_match(3, NUM, '23423948.298743')
-      should_match(4, NUM, 'e')
-      should_match(5, NUM, 'pi')
-      should_not_match(6, NUM, 'a')
-    end
-    describe 'vars' do
-      # should_match(1, VAR_MUL, 'ab')
-      # should_not_match(2, VAR_MUL, 'pi')
-      # should_not_match(3, VAR_MUL, 'sin')
-    end
-  end
-
-
-  describe 'function' do
-    should_match(1, /[fgh]\(\w( ?, ?\w)*\) ?= ?[^\r\n]+/, 'f(x) = xy')
-  end
-
-  describe 'differentiate' do
-    rgx = /d\/d[a-zA-Z] .*/
-    should_match(1, rgx, 'd/dx sin(x)')
-    should_match(2, rgx, 'd/dz z^2')
-  end
-end

data/spec/objects/function_spec.rb

@@ -1,33 +0,0 @@
-require 'spec_helper'
-
-describe Qlang do
-  describe 'Function' do
-    context 'into R' do
-      it do
-        expect(
-          Q.to_r.compile('f(x, y) = x + y')
-        ).to eq(
-          "f <- function(x, y) x + y"
-        )
-
-        expect(
-          Q.to_r.compile('g(x) = x ^ 2')
-        ).to eq(
-          "g <- function(x) x ^ 2"
-        )
-
-        expect(
-          Q.to_r.compile('g(x) = x ^ (2 + 2)')
-        ).to eq(
-          "g <- function(x) x ^ (2 + 2)"
-        )
-
-        expect(
-          Q.to_r.compile('h(a, b, c) = a ^ 2 + b ^ 2 + c ^ 2')
-        ).to eq(
-          "h <- function(a, b, c) a ^ 2 + b ^ 2 + c ^ 2"
-        )
-      end
-    end
-  end
-end

data/spec/objects/integral_spec.rb

@@ -1,21 +0,0 @@
-require 'spec_helper'
-
-describe Qlang do
-  describe 'Integral' do
-    context 'into R' do
-      it do
-
-      end
-    end
-
-    context 'into Ruby' do
-      it do
-        expect(
-          Q.to_ruby.compile('S( log(x)dx )[0..1]')
-        ).to eq(
-          'S(log(x), dx)[0, 1]'
-        )
-      end
-    end
-  end
-end

data/spec/q_lang_spec.rb

@@ -1,47 +0,0 @@
-require 'spec_helper'
-
-describe Qlang do
-  it 'has a version number' do
-    expect(Qlang::VERSION).not_to be nil
-  end
-
-  it 'has alias as Q' do
-    expect(Qlang).to eq Q
-  end
-
-  describe Dydx do
-    it 'check some example' do
-      expect(d/dx(sin(x))).to eq cos(x)
-
-      expect(
-        Q.to_ruby.compile('d/dx(sin(x))')
-      ).to eq(
-        "d/dx(sin (x))"
-      )
-
-      expect(
-        Q.to_ruby.compile('d/dx(log(x))')
-      ).to eq(
-        "d/dx(log (x))"
-      )
-
-      expect(
-        Q.to_ruby.compile('f(x, y) = x + y')
-      ).to eq(
-        "f(x, y) <= x + y"
-      )
-
-      expect(
-        Matrix[[1, 2, 3], [4, 5, 6]].to_q
-      ).to eq(
-        "(1 2 3; 4 5 6)"
-      )
-
-      expect(
-        Vector[1, 2, 3].to_q
-      ).to eq(
-        "(1 2 3)"
-      )
-    end
-  end
-end