music-performance 0.2.1

data/spec/music-performance_spec.rb

@@ -0,0 +1,7 @@
+require 'spec_helper'
+
+describe Music::Performance do
+  it "should have a VERSION constant" do
+    subject.const_get('VERSION').should_not be_empty
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,8 @@
+require 'rspec'
+require 'music-performance'
+
+include Music::Performance
+include Music::Transcription
+include Pitches
+include Meters
+include Articulations

data/spec/util/note_linker_spec.rb

@@ -0,0 +1,68 @@
+require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')
+
+describe NoteLinker do
+  describe '.find_unlinked_pitches' do
+    {
+      'note has no pitches' => [Note.quarter,[]],
+      'note has 1 pitch, no links' => [Note.quarter([C4]),[C4]],
+      'note has 2 pitches, no links' => [Note.quarter([C4,E4]),[C4,E4]],
+      'note has 1 pitch, which is linked' => [Note.quarter([C4], links: {C4 => Link::Tie.new} ),[]],
+      'note has 2 pitch, 1 of which is linked' => [Note.quarter([C4,E4], links: {C4 => Link::Tie.new} ),[E4]],
+      'note has 2 pitches, both of which are linked' => [Note.quarter([C4,E4], links: {C4 => Link::Tie.new, E4 => Link::Tie.new} ),[]],
+      'note has 1 pitch, and 1 unrelated link' => [Note.quarter([C4], links: {D4 => Link::Tie.new}),[C4]],
+      'note has 2 pitch, and 2 unrelated links' => [Note.quarter([C4,E4], links: {D4 => Link::Tie.new, F4 => Link::Tie.new}),[C4,E4]],
+    }.each do |descr,given_expected|
+      context descr do
+        given, expected = given_expected
+        it "should return #{expected}" do
+          actual = NoteLinker.find_unlinked_pitches(given)
+          actual.should eq(expected)
+        end
+      end
+    end
+  end
+  
+  describe '.find_untargeted_pitches' do
+    {
+      'note has no pitches, next note has no pitches' => [Note.quarter,Note.quarter,[]],
+      'note has no pitches, next note has 3 pitch' => [Note.quarter,Note.quarter([C3,E3,F3]),[C3,E3,F3]],
+      'note has 3 pitches + no links, next note has 2 pitches' => [Note.quarter([C3,E3,F3]),Note.quarter([D2,F2]),[D2,F2]],
+      'note has 1 pitch + 1 unrelated link, next note has 1 pitch' => [Note.quarter([C3], links: {C3 => Link::Slur.new(C2)}),Note.quarter([D2]),[D2]],
+      'note has 1 pitch + 1 related link, next note has 1 pitch' => [Note.quarter([C3], links: {C3 => Link::Slur.new(D2)}),Note.quarter([D2]),[]],
+      'note has 2 pitches + 2 related link, next note has 2 pitches' => [Note.quarter([C3,E3], links: {C3 => Link::Slur.new(D2), E3 => Link::Slur.new(E2) }),Note.quarter([D2,E2]),[]],
+      'note has 2 pitches + 1 unrelated link, next note has 2 pitches' => [Note.quarter([C3,E3], links: {C3 => Link::Slur.new(D2), E3 => Link::Slur.new(F2) }),Note.quarter([D2,E2]),[E2]],
+    }.each do |descr,given_expected|
+      context descr do
+        given_note, given_next_note, expected = given_expected
+        it "should return #{expected}" do
+          actual = NoteLinker.find_untargeted_pitches(given_note, given_next_note)
+          actual.should eq(expected)
+        end
+      end
+    end    
+  end
+  
+  describe '.fully_link' do
+    [
+      [ Note.quarter([C4,E4,G4]), Note.quarter, Note.quarter([C4,E4,G4]) ],
+      [ Note.quarter([G4]), Note.quarter([A4]), Note.quarter([G4], links: {G4 => Link::Slur.new(A4)}) ],
+      [
+        Note.quarter([G4,A4]),
+        Note.quarter([A4]),
+        Note.quarter([G4,A4], links: {A4 => Link::Slur.new(A4)})
+      ],
+      [
+        Note.quarter([G4,A4], links: {A4 => Link::Slur.new(B4)}),
+        Note.quarter([A4,B4]),
+        Note.quarter([G4,A4], links: {G4 => Link::Slur.new(A4), A4 => Link::Slur.new(B4)})
+      ],
+    ].each do |note,next_note,modified|
+      context "given note: #{note.to_s}, next_note: #{next_note.to_s}" do
+        it "should modifiy note to equal #{modified.to_s}" do
+          NoteLinker.fully_link(note, next_note, Link::Slur)
+          note.should eq(modified)
+        end
+      end
+    end
+  end
+end

data/spec/util/optimization_spec.rb

@@ -0,0 +1,73 @@
+require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')
+
+describe Optimization do
+  describe '.linking' do
+    context 'one unlinked, one untargeted' do
+      it 'should map the one unlinked to the one untargeted' do
+        [ C4, Bb4, G2, A3 ].each do |p1|
+          [ C4, Bb4, G2, A3 ].each do |p2|
+            sol = Optimization.linking([p1], [p2])
+            sol.size.should eq 1
+            sol.should have_key p1
+            sol[p1].should eq p2
+          end
+        end
+      end
+    end
+    
+    context 'two unlinked, one untargeted' do
+      it 'should map the closest unlinked to the one untargeted' do
+        unlinked = [C4,G4]
+        { [Bb4] => {G4 => Bb4},
+          [F4] => {G4 => F4},
+          [E4] => {G4 => E4},
+          [Eb4] => {C4 => Eb4},
+          [D4] => {C4 => D4},
+          [Bb3] => {C4 => Bb3}
+        }.each do |untargeted, expected_map|
+          sol = Optimization.linking(unlinked, untargeted)
+          sol.should eq expected_map
+        end
+      end
+    end
+    
+    context 'one unlinked, two untargeted' do
+      it 'should map the one unlinked to the closest untargeted' do
+        unlinked = [C4]
+        { [G4,Bb4] => {C4 => G4},
+          [G4,F4] => {C4 => F4},
+          [Eb4,D4] => {C4 => D4},
+          [G4,Bb3] => {C4 => Bb3},
+          [G3,G4] => {C4 => G3}
+        }.each do |untargeted, expected_map|
+          sol = Optimization.linking(unlinked, untargeted)
+          sol.should eq expected_map
+        end
+      end
+    end
+    
+    context 'many unlinked, many untargeted' do
+      it 'should map [unlinked.size, untargeted.size].min unlinked to untargeted, such that total pitch diffs is minimized' do
+        {
+          [[A3,B3,C3],[B3,Db3]] => { B3 => B3, C3 => Db3 },
+          [[A3,B3,C3],[Bb3,C3]] => { A3 => Bb3, C3 => C3 },
+          [[A3,B3,C3],[Gb3,Bb3]] => { A3 => Gb3, B3 => Bb3 },
+          [[D5,Gb5],[B5,E5,G5]] => { D5 => E5, Gb5 => G5 },
+          [[D5,Gb5],[Db5,E5,G5]] => { D5 => Db5, Gb5 => G5 },
+          [[D5,Gb5],[C5,E5,G5]] => { D5 => C5, Gb5 => G5 },
+          [[D5,Gb5],[B5,E5,G5]] => { D5 => E5, Gb5 => G5 },
+          [[D5,Gb5],[B5,E5,F5,G5]] => { D5 => E5, Gb5 => F5 },
+          [[D5,Gb5],[B5,F5,G5]] => { D5 => F5, Gb5 => G5 },
+          [[G5],[B5,F5,G5]] => { G5 => G5 },
+          [[B5,F5,G5],[G5]] => { G5 => G5 },
+          [[G5],[C5,A5,B5]] => { G5 => A5 },
+          [[C4,E4,G4,Bb4],[D4,Gb4,A4,C5]] => { C4 => D4, E4 => Gb4, G4 => A4, Bb4 => C5 }
+        }.each do |unlinked_untargeted, expected_map|
+          unlinked,untargeted = unlinked_untargeted
+          sol = Optimization.linking(unlinked, untargeted)
+          sol.should eq expected_map
+        end
+      end
+    end
+  end
+end

data/spec/util/value_computer_spec.rb

@@ -0,0 +1,146 @@
+require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')
+
+describe ValueComputer do
+  describe '#value_at' do
+    before :all do
+      @value_change1 = Change::Immediate.new(0.6)
+      @value_change2 = Change::Gradual.new(0.6, 1.0)
+    end
+    
+    context "constant value" do
+      before :each do
+        @comp = ValueComputer.new 0.5
+      end
+      
+      it "should always return default value if no changes are given" do
+        [ValueComputer.domain_min, -1000, 0, 1, 5, 100, 10000, ValueComputer.domain_max].each do |offset|
+          @comp.value_at(offset).should eq(0.5)
+        end
+      end
+    end
+    
+    context "one change, no transition" do
+      before :each do
+        @comp = ValueComputer.new 0.5, 1.0 => @value_change1
+      end
+      
+      it "should be the default value just before the first change" do
+        @comp.value_at(0.999).should eq(0.5)
+      end
+          
+      it "should transition to the second value immediately" do
+        @comp.value_at(1.0).should eq(0.6)
+      end
+
+      it "should be the first value for all time before" do
+        @comp.value_at(ValueComputer.domain_min).should eq(0.5)
+      end
+      
+      it "should be at the second value for all time after" do
+        @comp.value_at(ValueComputer.domain_max).should eq(0.6)
+      end
+    end
+    
+    context "one change, linear transition" do
+      before :each do
+        @comp = ValueComputer.new 0.2, 1.0 => @value_change2
+      end
+      
+      it "should be the first (starting) value just before the second value" do
+        @comp.value_at(0.999).should eq(0.2)
+      end
+          
+      it "should be the first (starting) value exactly at the second value" do
+        @comp.value_at(1.0).should eq(0.2)
+      end
+    
+      it "should be 1/4 to the second value after 1/4 transition duration has elapsed" do
+        @comp.value_at(Rational(5,4).to_f).should eq(0.3)
+      end
+    
+      it "should be 1/2 to the second value after 1/2 transition duration has elapsed" do
+        @comp.value_at(Rational(6,4).to_f).should eq(0.4)
+      end
+    
+      it "should be 3/4 to the second value after 3/4 transition duration has elapsed" do
+        @comp.value_at(Rational(7,4).to_f).should eq(0.5)
+      end
+    
+      it "should be at the second value after transition duration has elapsed" do
+        @comp.value_at(Rational(8,4).to_f).should eq(0.6)
+      end
+    end
+
+  #  context "one change, sigmoid transition" do
+  #    before :all do
+  #      @cases = [
+  #        { :start_value => 0, :end_value => 1, :offset => 0, :duration => 1.0, :abruptness => 0.75 },
+  #        { :start_value => 0.25, :end_value => 0.75, :offset => 1.0, :duration => 2.0, :abruptness => 0.75 },
+  #        { :start_value => -1.0, :end_value => 5.5, :offset => 2.4, :duration => 20, :abruptness => 0.75 },
+  #        { :start_value => 10, :end_value => 100, :offset => 20, :duration => 4, :abruptness => 0.75 },
+  #      ]
+  #  
+  #      @computers = {}
+  #      @cases.each do |case_hash|
+  #        start_value = case_hash[:start_value]
+  #        offset = case_hash[:offset]
+  #        end_value = case_hash[:end_value]
+  #        duration = case_hash[:duration]
+  #        #abruptness = case_hash[:abruptness]
+  #        
+  #        change = Change::Gradual.new(end_value, duration)
+  #        @computers[case_hash] = ValueComputer.new start_value, offset => change
+  #        # @computers[case_hash].plot_range(offset..(offset + duration), 0.01)
+  #      end
+  #    end
+  #  
+  #    it "should be the first (starting) value just before the value change offset" do
+  #      @computers.each do |case_hash, comp|
+  #        comp.value_at(case_hash[:offset] - 0.0001).should eq(case_hash[:start_value])
+  #      end
+  #    end
+  #        
+  #    it "should be very nearly the first (starting) value exactly at the value change offset" do
+  #      @computers.each do |case_hash, comp|
+  #        comp.value_at(case_hash[:offset]).should be_within(0.0001).of(case_hash[:start_value])
+  #      end
+  #    end
+  #  
+  #    it "should be within 1% of start/end difference away from the start value after 1/4 transition duration has elapsed" do
+  #      @computers.each do |case_hash, comp|
+  #        test_offset = case_hash[:offset] + (case_hash[:duration] * 0.25)
+  #        start_value = case_hash[:start_value]
+  #        end_value = case_hash[:end_value]
+  #        tolerance = 0.01 * (end_value - start_value)
+  #        comp.value_at(test_offset).should be_within(tolerance).of(start_value)
+  #      end
+  #    end
+  #  
+  #    it "should be half way to the end value after half way through transition" do
+  #      @computers.each do |case_hash, comp|
+  #        test_offset = case_hash[:offset] + (case_hash[:duration] * 0.5)
+  #        start_value = case_hash[:start_value]
+  #        expected_value = start_value + (case_hash[:end_value] - start_value) * 0.5
+  #        comp.value_at(test_offset).should be_within(0.0001).of(expected_value)
+  #      end
+  #    end
+  #  
+  #    it "should be within 1% of start/end difference away from the end value after 3/4 transition duration has elapsed" do
+  #      @computers.each do |case_hash, comp|
+  #        test_offset = case_hash[:offset] + (case_hash[:duration] * 0.75)
+  #        start_value = case_hash[:start_value]
+  #        end_value = case_hash[:end_value]
+  #        tolerance = 0.01 * (end_value - start_value)
+  #        comp.value_at(test_offset).should be_within(tolerance).of(end_value)
+  #      end
+  #    end
+  #  
+  #    it "should be at the second value after transition duration has elapsed" do
+  #      @computers.each do |case_hash, comp|
+  #        comp.value_at(case_hash[:offset] + case_hash[:duration]).should eq(case_hash[:end_value])
+  #      end
+  #    end
+  #  end
+  end
+end
+

metadata

@@ -0,0 +1,242 @@
+--- !ruby/object:Gem::Specification
+name: music-performance
+version: !ruby/object:Gem::Version
+  version: 0.2.1
+platform: ruby
+authors:
+- James Tunnell
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2014-10-29 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '1.5'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '1.5'
+- !ruby/object:Gem::Dependency
+  name: rubygems-bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '1.4'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '1.4'
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '10.1'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '10.1'
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '2.14'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '2.14'
+- !ruby/object:Gem::Dependency
+  name: yard
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '0.8'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '0.8'
+- !ruby/object:Gem::Dependency
+  name: pry
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: pry-nav
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: music-transcription
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: 0.17.0
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: 0.17.0
+- !ruby/object:Gem::Dependency
+  name: midilib
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '2.0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '2.0'
+- !ruby/object:Gem::Dependency
+  name: docopt
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+description: |
+  Prepare a transcribed musical score for performance by a computer.
+email: jamestunnell@gmail.com
+executables:
+- midify
+extensions: []
+extra_rdoc_files: []
+files:
+- .document
+- .gitignore
+- .rspec
+- .ruby-version
+- .yardopts
+- ChangeLog.rdoc
+- Gemfile
+- LICENSE.txt
+- README.rdoc
+- Rakefile
+- bin/midify
+- lib/music-performance.rb
+- lib/music-performance/arrangement/midi/midi_events.rb
+- lib/music-performance/arrangement/midi/midi_util.rb
+- lib/music-performance/arrangement/midi/part_sequencer.rb
+- lib/music-performance/arrangement/midi/score_sequencer.rb
+- lib/music-performance/conversion/glissando_converter.rb
+- lib/music-performance/conversion/note_sequence_extractor.rb
+- lib/music-performance/conversion/note_time_converter.rb
+- lib/music-performance/conversion/portamento_converter.rb
+- lib/music-performance/conversion/score_collator.rb
+- lib/music-performance/conversion/score_time_converter.rb
+- lib/music-performance/model/note_attacks.rb
+- lib/music-performance/model/note_sequence.rb
+- lib/music-performance/util/interpolation.rb
+- lib/music-performance/util/note_linker.rb
+- lib/music-performance/util/optimization.rb
+- lib/music-performance/util/piecewise_function.rb
+- lib/music-performance/util/value_computer.rb
+- lib/music-performance/version.rb
+- music-performance.gemspec
+- spec/conversion/glissando_converter_spec.rb
+- spec/conversion/note_sequence_extractor_spec.rb
+- spec/conversion/note_time_converter_spec.rb
+- spec/conversion/portamento_converter_spec.rb
+- spec/conversion/score_collator_spec.rb
+- spec/conversion/score_time_converter_spec.rb
+- spec/model/note_sequence_spec.rb
+- spec/music-performance_spec.rb
+- spec/spec_helper.rb
+- spec/util/note_linker_spec.rb
+- spec/util/optimization_spec.rb
+- spec/util/value_computer_spec.rb
+homepage: https://github.com/jamestunnell/music-performance
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.4.2
+signing_key: 
+specification_version: 4
+summary: Classes for representing music notational features like pitch, note, loudness,
+  tempo, etc.
+test_files:
+- spec/conversion/glissando_converter_spec.rb
+- spec/conversion/note_sequence_extractor_spec.rb
+- spec/conversion/note_time_converter_spec.rb
+- spec/conversion/portamento_converter_spec.rb
+- spec/conversion/score_collator_spec.rb
+- spec/conversion/score_time_converter_spec.rb
+- spec/model/note_sequence_spec.rb
+- spec/music-performance_spec.rb
+- spec/spec_helper.rb
+- spec/util/note_linker_spec.rb
+- spec/util/optimization_spec.rb
+- spec/util/value_computer_spec.rb
+has_rdoc: