jazz_model 0.1.0

data/lib/jazz_model/chord_quality.rb

@@ -0,0 +1,19 @@
+module JazzModel
+  # A basic chord quality such as major or minor.  This may be abandoned in the future in favor of a 
+  # deep heirarchy based soley around chords.
+  # 
+  # == Associations
+  # * +chords+ - A collection of chords associated with the chord quality.
+  # 
+  class ChordQuality < JazzModel::Base
+    has_many :chords
+
+    class << self
+      def resolve(name)
+        self.find_by_name(name)
+      end
+      alias_method :[], :resolve
+    end
+
+  end
+end

data/lib/jazz_model/chord_scale.rb

@@ -0,0 +1,30 @@
+module JazzModel
+  # A relationship of one chord to one scale, with some other optional 
+  # information such as +strength+, representing the strength of the 
+  # relationships.
+  # 
+  # == Associations
+  # 
+  # * +chord+ - Associated chord.
+  # * +mode+ - Associated scale mode.
+  # * +scale+ - Associated scale through mode. 
+  # 
+  # == Key Context
+  #
+  # Delegates +key+ to the associated chord to access key context through this relationship.
+  # 
+  class ChordScale < JazzModel::Base
+    belongs_to :chord
+    belongs_to :mode
+  
+    delegate :scale, :to => :mode
+    delegate :key, :to => :chord
+  
+    def self.specify(mode, strength = 1)
+      chord_scale = self.new
+      chord_scale.mode = mode
+      chord_scale.strength = strength
+      chord_scale
+    end
+  end
+end

data/lib/jazz_model/chord_symbol.rb

@@ -0,0 +1,27 @@
+module JazzModel
+  # A standard chord symbol (if there is such a thing...).
+  # Several chord symbols can be associated with a given chord,
+  # and each chord can be designated +case_sensitive+ or not, to handle 
+  # cases such as M representing Major and m representing minor. 
+  # Act as a list to facilitate preference ordering.  May abandong this 
+  # in the future to prefer a simple +primary+ designation.
+  # 
+  # == Associations
+  # 
+  # * +chord+ - Chord associated with the chord symbol.
+  # 
+  class ChordSymbol < JazzModel::Base
+    belongs_to :chord
+  
+    class << self
+      # Finds a chord symbol
+      def resolve(symbol)
+        self.all.detect do |cs|
+          cs.case_sensitive? ? (cs.name == symbol) : (cs.name.downcase == symbol.downcase)
+        end
+      end
+      alias_method :[], :resolve
+    end
+  
+  end
+end

data/lib/jazz_model/chord_symbol_collection.rb

@@ -0,0 +1,17 @@
+module JazzModel
+  # Module mixin for Chord symbols
+  module ChordSymbolCollection
+  
+    # WARNING: This is basically duplicated from ChordSymbol
+    # Find way to make this DRY!
+    # 
+    # Finds a chord symbol
+    def resolve(symbol)
+      self.detect do |cs|
+        cs.case_sensitive? ? (cs.name == symbol) : (cs.name.downcase == symbol.downcase)
+      end
+    end
+    alias_method :[], :resolve
+  
+  end
+end

data/lib/jazz_model/chord_tone.rb

@@ -0,0 +1,32 @@
+module JazzModel
+  # Represents one non-octval tone in a chord.  Chord tones are not ordered 
+  # and arrays of chord tones should be compared using +to_set+. 
+  # 
+  # == Attributes
+  # 
+  # * +tone+ - A tone index from 0-11 representing the relative position of the 
+  #   tone within the chromatic scale.
+  # 
+  # * +letter_index+ - A 0-6 value representing the relative letter position, which 
+  #   helps to disambiguate theoretic values such as Eb and D#.  See +Key+.
+  # 
+  # * +strength+ - A strength metric representing the tonal strength of the tone 
+  #   within the context of the chord.  Lower numbers are stronger.  Zero always 
+  #   represents the root of the chord and any guide tones should be defined as one.
+  # 
+  # * +omitable+ - Specifies whether the tone can commonly be ommitted in jazz voicings 
+  #   for this chord.  For example, the root and the fifth are often not necessary.
+  # 
+  # == Key Context
+  # 
+  #  +key+ is delgated to chord to access the chord's key context.
+  # 
+  class ChordTone < Tone
+    belongs_to :chord
+  
+    acts_as_list :scope => :chord
+  
+    delegate :key, :to => :chord
+  
+  end
+end

data/lib/jazz_model/definition.rb

@@ -0,0 +1,66 @@
+module JazzModel
+  class Definition
+    cattr_accessor :definitions
+    @@definitions = []
+    
+    attr_reader :name
+    attr_reader :definition
+    attr_reader :included_definitions
+    
+    def initialize(name = nil, &block)
+      if name.is_a?(Hash)
+        raise ArgumentError, "Only one hash key expected" if name.keys.size > 1
+        @name = name.keys[0]
+        @included_definitions = name.values[0].is_a?(Array) ? name.values[0].map(&:to_sym) : [name.values[0].to_sym]
+      else
+        @name = name
+        @included_definitions = []
+      end
+      
+      @definition = block
+      @loaded = false
+      
+      @@definitions << self
+    end
+    
+    def loaded?
+      !!@loaded
+    end
+    
+    def self.[](name)
+      definitions.find {|d| d.name.to_s == name.to_s }
+    end
+    
+    def self.define(name, &block)
+      definition = self.new(name, &block)
+    end
+    
+    def self.load(name)
+      if definition = self[name]
+        definition.load
+      else
+        raise ArgumentError, "No definition known '#{name}'."
+      end
+    end
+    
+    def ensure_loaded
+      load unless loaded?
+    end
+    
+    def load
+      (all_included_definitions.uniq - [self]).each do |d|
+        self.class[d].ensure_loaded
+      end
+      
+      instance_eval(&@definition)
+      
+      @loaded = true
+    end
+    
+    def all_included_definitions
+      (@included_definitions.map {|d| self.class[d].try(:all_included_definitions) } + @included_definitions).flatten.compact.uniq
+    end
+  end
+end
+
+Dir[File.join(File.dirname(__FILE__), "definitions", "*.rb")].each {|f| require f}

data/lib/jazz_model/definitions/default.rb

@@ -0,0 +1,502 @@
+JazzModel::Definition.define :default => [:keys] do
+  JazzModel::Scale.create!(:name => 'Major').tap do |s|
+    s.tones.create([
+      {:tone => 0, :letter_index => JazzModel::Tone::LetterInterval::FIRST},
+      {:tone => 2, :letter_index => JazzModel::Tone::LetterInterval::SECOND},
+      {:tone => 4, :letter_index => JazzModel::Tone::LetterInterval::THIRD},
+      {:tone => 5, :letter_index => JazzModel::Tone::LetterInterval::FOURTH},
+      {:tone => 7, :letter_index => JazzModel::Tone::LetterInterval::FIFTH},
+      {:tone => 9, :letter_index => JazzModel::Tone::LetterInterval::SIXTH},
+      {:tone => 11, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH}
+    ])
+    
+    s.modes.create!(:mode => 1, :name => 'Ionian')
+    s.modes.create!(:mode => 2, :name => 'Dorian')
+    s.modes.create!(:mode => 3, :name => 'Phrygian')
+    s.modes.create!(:mode => 4, :name => 'Lydian')
+    s.modes.create!(:mode => 5, :name => 'Mixolydian')
+    s.modes.create!(:name => 6, :name => 'Aeolian')
+    s.modes.create!(:name => 7, :name => 'Locrian')
+  end
+
+  JazzModel::Scale.create!(:name => 'Melodic Minor').tap do |s|
+    s.tones.create([
+      {:tone => 0, :letter_index => JazzModel::Tone::LetterInterval::FIRST},
+      {:tone => 2, :letter_index => JazzModel::Tone::LetterInterval::SECOND},
+      {:tone => 3, :letter_index => JazzModel::Tone::LetterInterval::THIRD},
+      {:tone => 5, :letter_index => JazzModel::Tone::LetterInterval::FOURTH},
+      {:tone => 7, :letter_index => JazzModel::Tone::LetterInterval::FIFTH},
+      {:tone => 9, :letter_index => JazzModel::Tone::LetterInterval::SIXTH},
+      {:tone => 11, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH}
+    ])
+
+    s.modes.create!(:mode => 1, :name => 'Melodic Minor')
+    s.modes.create!(:mode => 2, :name => 'Phrygian #6', :synonyms => 'Dorian b2')
+    s.modes.create!(:mode => 3, :name => 'Lydian Augmented')
+    s.modes.create!(:mode => 4, :name => 'Lydian Dominant', :synonyms => 'Mixolydian #4')
+    s.modes.create!(:mode => 5, :name => 'Mixolydian b6')
+    s.modes.create!(:name => 6, :name => 'Locrian #2', :synonyms => 'Aeolian b5')
+    s.modes.create!(:name => 7, :name => 'Super Locrian', :synonyms => 'Diminished Whole Tone')
+  end
+
+  JazzModel::Scale.create!(:name => 'Whole Tone', :symmetry_index => 2).tap do |s|
+    s.tones.create([
+      {:tone => 0, :letter_index => JazzModel::Tone::LetterInterval::FIRST},
+      {:tone => 2, :letter_index => JazzModel::Tone::LetterInterval::SECOND},
+      {:tone => 4, :letter_index => JazzModel::Tone::LetterInterval::THIRD},
+      {:tone => 6, :letter_index => JazzModel::Tone::LetterInterval::FOURTH},
+      {:tone => 8, :letter_index => JazzModel::Tone::LetterInterval::FIFTH},
+      {:tone => 10, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH}
+    ])
+
+    s.modes.create!(:mode => 1, :name => 'Whole Tone')
+  end
+
+  JazzModel::Scale.create!(:name => 'Pentatonic').tap do |s|
+    s.tones.create([
+      {:tone => 0, :letter_index => JazzModel::Tone::LetterInterval::FIRST},
+      {:tone => 2, :letter_index => JazzModel::Tone::LetterInterval::SECOND},
+      {:tone => 4, :letter_index => JazzModel::Tone::LetterInterval::THIRD},
+      {:tone => 7, :letter_index => JazzModel::Tone::LetterInterval::FIFTH},
+      {:tone => 9, :letter_index => JazzModel::Tone::LetterInterval::SIXTH}
+    ])
+
+    s.modes.create!(:mode => 1, :name => 'Pentatonic')
+  end
+
+  JazzModel::Scale.create!(:name => 'Blues').tap do |s|
+    s.tones.create([
+      {:tone => 0, :letter_index => JazzModel::Tone::LetterInterval::FIRST},
+      {:tone => 2, :letter_index => JazzModel::Tone::LetterInterval::SECOND},
+      {:tone => 3, :letter_index => JazzModel::Tone::LetterInterval::THIRD},
+      {:tone => 4, :letter_index => JazzModel::Tone::LetterInterval::THIRD},
+      {:tone => 7, :letter_index => JazzModel::Tone::LetterInterval::FIFTH}, 
+      {:tone => 9, :letter_index => JazzModel::Tone::LetterInterval::SIXTH}
+    ])
+
+    s.modes.create!(:mode => 1, :name => 'Major Blues')
+    s.modes.create!(:mode => 5, :name => 'Minor Blues')
+  end
+
+  JazzModel::Scale.create!(:name => 'Diminished', :symmetry_index => 3).tap do |s|
+    s.tones.create([
+      {:tone => 0, :letter_index => JazzModel::Tone::LetterInterval::FIRST},
+      {:tone => 1, :letter_index => JazzModel::Tone::LetterInterval::SECOND},
+      {:tone => 3, :letter_index => JazzModel::Tone::LetterInterval::THIRD},
+      {:tone => 4, :letter_index => JazzModel::Tone::LetterInterval::THIRD},
+      {:tone => 6, :letter_index => JazzModel::Tone::LetterInterval::FOURTH},
+      {:tone => 7, :letter_index => JazzModel::Tone::LetterInterval::FIFTH},
+      {:tone => 9, :letter_index => JazzModel::Tone::LetterInterval::SIXTH},
+      {:tone => 10, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH}
+    ])
+
+    s.modes.create!(:mode => 1, :name => 'Half-Whole')
+    s.modes.create!(:mode => 2, :name => 'Whole-Half')
+  end
+
+  JazzModel::Scale.create!(:name => 'Harmonic Minor').tap do |s|
+    s.tones.create([
+      {:tone => 0, :letter_index => JazzModel::Tone::LetterInterval::FIRST},
+      {:tone => 2, :letter_index => JazzModel::Tone::LetterInterval::SECOND},
+      {:tone => 3, :letter_index => JazzModel::Tone::LetterInterval::THIRD},
+      {:tone => 5, :letter_index => JazzModel::Tone::LetterInterval::FOURTH},
+      {:tone => 7, :letter_index => JazzModel::Tone::LetterInterval::FIFTH},
+      {:tone => 8, :letter_index => JazzModel::Tone::LetterInterval::SIXTH},
+      {:tone => 11, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH}
+    ])
+  end
+
+  JazzModel::Scale.create!(:name => 'Bebop').tap do |s|
+    s.tones.create([
+      {:tone => 0, :letter_index => JazzModel::Tone::LetterInterval::FIRST},
+      {:tone => 2, :letter_index => JazzModel::Tone::LetterInterval::SECOND},
+      {:tone => 4, :letter_index => JazzModel::Tone::LetterInterval::THIRD},
+      {:tone => 5, :letter_index => JazzModel::Tone::LetterInterval::FOURTH},
+      {:tone => 7, :letter_index => JazzModel::Tone::LetterInterval::FIFTH},
+      {:tone => 9, :letter_index => JazzModel::Tone::LetterInterval::SIXTH},
+      {:tone => 10, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH},
+      {:tone => 11, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH}
+    ])
+
+    s.modes.create!(:mode => 1, :name => 'Dominant Bebop')
+    s.modes.create!(:mode => 2, :name => 'Major Bebop')
+  end
+
+
+  ##### Initialize Chords #####
+
+  JazzModel::ChordQuality.create!(:name => 'Major', :code => 'MAJ').tap do |q|
+    q.chords.create!(:name => 'Major Triad').tap do |c|
+      c.symbols.create!(:name => 'maj', :primary => true)
+      c.symbols.create!(:name => 'M', :case_sensitive => true)
+      c.symbols.create!(:name => 'major')
+
+      c.tones.create([
+        {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0},
+        {:tone => JazzModel::Tone::Interval::MAJOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 2},
+        {:tone => JazzModel::Tone::Interval::PERFECT_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 1}
+      ])
+
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Major'][1])
+    end
+
+    q.chords.create!(:name => 'Major 7').tap do |c|
+      c.symbols.create!(:name => 'maj7', :primary => true)
+      c.symbols.create!(:name => 'M7', :case_sensitive => true)
+      c.symbols.create!(:name => 'major7')
+
+      c.tones.create([
+        {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0, :omitable => true},
+        {:tone => JazzModel::Tone::Interval::MAJOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+        {:tone => JazzModel::Tone::Interval::PERFECT_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 2, :omitable => true},
+        {:tone => JazzModel::Tone::Interval::MAJOR_7TH, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH, :strength => 2}
+      ])
+
+      c.children.create!(:name => 'Major 7 #11').tap do |cc|
+        cc.symbols.create!(:name => 'maj7#11', :primary => true)
+        cc.symbols.create!(:name => 'M7#11')
+        cc.symbols.create!(:name => 'major7#11')
+        cc.symbols.create!(:name => 'lyd')
+        cc.symbols.create!(:name => 'lydian')
+
+        cc.tones.create([
+          {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0, :omitable => true},
+          {:tone => JazzModel::Tone::Interval::MAJOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+          {:tone => JazzModel::Tone::Interval::PERFECT_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 2, :omitable => true},
+          {:tone => JazzModel::Tone::Interval::MAJOR_7TH, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH, :strength => 2},
+          {:tone => JazzModel::Tone::Interval::AUGMENTED_4TH, :letter_index => JazzModel::Tone::LetterInterval::FOURTH, :strength => 3}
+        ])
+
+        cc.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Major'][4])
+      end
+
+      c.children.create!(:name => 'Lydian Augmented').tap do |cc|
+        cc.symbols.create!(:name => 'maj7#4#5', :primary => true)
+        cc.symbols.create!(:name => 'lydaug')
+        cc.symbols.create!(:name => 'maj7#11#5')
+
+        cc.tones.create([
+          {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0, :omitable => true},
+          {:tone => JazzModel::Tone::Interval::MAJOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+          {:tone => JazzModel::Tone::Interval::AUGMENTED_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 2, :omitable => true},
+          {:tone => JazzModel::Tone::Interval::MAJOR_7TH, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH, :strength => 2},
+          {:tone => JazzModel::Tone::Interval::AUGMENTED_4TH, :letter_index => JazzModel::Tone::LetterInterval::FOURTH, :strength => 3}
+        ])
+
+        cc.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Melodic Minor'][3])
+      end
+
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Major'][1])
+    end
+
+    q.chords.create!(:name => 'Major 6').tap do |c|
+      c.symbols.create!(:name => '6', :primary => true)
+      c.symbols.create!(:name => 'maj6')
+      c.symbols.create!(:name => 'M6', :case_sensitive => true)
+      c.symbols.create!(:name => 'major6')
+
+      c.tones.create([
+        {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0},
+        {:tone => JazzModel::Tone::Interval::MAJOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+        {:tone => JazzModel::Tone::Interval::PERFECT_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 2},
+        {:tone => JazzModel::Tone::Interval::MAJOR_6TH, :letter_index => JazzModel::Tone::LetterInterval::SIXTH, :strength => 3}
+      ])
+
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Pentatonic'][1])
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Major'][1], 2)
+    end
+  end
+
+
+  JazzModel::ChordQuality.create!(:name => 'Minor', :code => 'MIN').tap do |q|
+    q.chords.create!(:name => 'Minor Triad').tap do |c|
+      c.symbols.create!(:name => 'min', :primary => true)
+      c.symbols.create!(:name => 'm', :case_sensitive => true)
+      c.symbols.create!(:name => 'minor')
+
+      c.tones.create([
+        {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0},
+        {:tone => JazzModel::Tone::Interval::MINOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+        {:tone => JazzModel::Tone::Interval::PERFECT_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 2}
+      ])
+
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Major'][2])
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Major'][6], 2)
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Major'][3], 3)
+    end
+
+    q.chords.create!(:name => 'Minor 7').tap do |c|
+      c.symbols.create!(:name => 'min7', :primary => true)
+      c.symbols.create!(:name => 'm7', :case_sensitive => true)
+      c.symbols.create!(:name => 'minor7')
+
+      c.tones.create([
+        {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0, :omitable => true},
+        {:tone => JazzModel::Tone::Interval::MINOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+        {:tone => JazzModel::Tone::Interval::PERFECT_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 2, :omitable => true},
+        {:tone => JazzModel::Tone::Interval::MINOR_7TH, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH, :strength => 1}
+      ])
+
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Major'][2])
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Major'][6], 2)
+    end
+
+    q.chords.create!(:name => 'Minor 6').tap do |c|
+      c.symbols.create!(:name => 'min6', :primary => true)
+      c.symbols.create!(:name => 'm6', :case_sensitive => true)
+      c.symbols.create!(:name => 'minor6')
+
+      c.tones.create([
+        {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0, :omitable => true},
+        {:tone => JazzModel::Tone::Interval::MINOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+        {:tone => JazzModel::Tone::Interval::PERFECT_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 2},
+        {:tone => JazzModel::Tone::Interval::MAJOR_6TH, :letter_index => JazzModel::Tone::LetterInterval::SIXTH, :strength => 1}
+      ])
+
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Major'][1])
+    end
+
+    q.chords.create!(:name => 'Phrygian').tap do |c|
+      c.symbols.create!(:name => 'phryg', :primary => true)
+      c.symbols.create!(:name => 'minb2')
+      c.symbols.create!(:name => 'mb2')
+      c.symbols.create!(:name => 'minorb2')
+      c.symbols.create!(:name => 'phrygian')
+      c.symbols.create!(:name => 'susb9')
+
+      c.tones.create([
+        {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0, :omitable => true},
+        {:tone => JazzModel::Tone::Interval::MINOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+        {:tone => JazzModel::Tone::Interval::PERFECT_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 2},
+        {:tone => JazzModel::Tone::Interval::MINOR_2ND, :letter_index => JazzModel::Tone::LetterInterval::SECOND, :strength => 1},
+        {:tone => JazzModel::Tone::Interval::MINOR_6TH, :letter_index => JazzModel::Tone::LetterInterval::SIXTH, :strength => 3}
+      ])
+
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Major'][3])
+    end
+
+    q.chords.create!(:name => 'Minor b6').tap do |c|
+      c.symbols.create!(:name => 'minb6', :primary => true)
+      c.symbols.create!(:name => 'mb6')
+      c.symbols.create!(:name => 'minorb6')
+      c.symbols.create!(:name => 'aeolian')
+
+      c.tones.create([
+        {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0, :omitable => true},
+        {:tone => JazzModel::Tone::Interval::MINOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+        {:tone => JazzModel::Tone::Interval::PERFECT_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 2},
+        {:tone => JazzModel::Tone::Interval::MINOR_6TH, :letter_index => JazzModel::Tone::LetterInterval::SIXTH, :strength => 3}
+      ])
+
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Major'][6])
+    end
+
+    q.chords.create!(:name => 'Major-Minor').tap do |c|
+      c.symbols.create!(:name => 'min#7', :primary => true)
+      c.symbols.create!(:name => 'majmin')
+      c.symbols.create!(:name => 'm#7', :case_sensitive => true)
+      c.symbols.create!(:name => 'minor#7')
+      c.symbols.create!(:name => 'major-minor')
+
+      c.tones.create([
+        {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0, :omitable => true},
+        {:tone => JazzModel::Tone::Interval::MINOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+        {:tone => JazzModel::Tone::Interval::PERFECT_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 2},
+        {:tone => JazzModel::Tone::Interval::MAJOR_7TH, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH, :strength => 1}
+      ])
+
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Melodic Minor'][1])
+    end
+  end
+
+
+  JazzModel::ChordQuality.create!(:name => 'Dominant', :code => 'DOM').tap do |q|
+    q.chords.create!(:name => 'Dominant 7').tap do |c|
+      c.symbols.create!(:name => '7', :primary => true)
+      c.symbols.create!(:name => 'dom')
+
+      c.tones.create([
+        {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0, :omitable => true},
+        {:tone => JazzModel::Tone::Interval::MAJOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+        {:tone => JazzModel::Tone::Interval::PERFECT_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 3, :omitable => true},
+        {:tone => JazzModel::Tone::Interval::DOMINANT_7TH, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH, :strength => 2}
+      ])
+
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Major']['Mixolydian'])
+
+      c.children.create!(:name => 'Dominant 9').tap do |cc|
+        cc.symbols.create!(:name => '9', :primary => true)
+        cc.symbols.create!(:name => 'dom9')
+
+        cc.tones.create([
+          {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0, :omitable => true},
+          {:tone => JazzModel::Tone::Interval::MAJOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+          {:tone => JazzModel::Tone::Interval::PERFECT_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 3, :omitable => true},
+          {:tone => JazzModel::Tone::Interval::DOMINANT_7TH, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH, :strength => 2},
+          {:tone => JazzModel::Tone::Interval::MAJOR_2ND, :letter_index => JazzModel::Tone::LetterInterval::SECOND, :strength => 4}
+        ])
+
+        cc.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Major']['Mixolydian'])
+      end
+
+      c.children.create!(:name => 'Dominant 6/9').tap do |cc|
+        cc.symbols.create!(:name => '6/9', :primary => true)
+        cc.symbols.create!(:name => '69')
+
+        cc.tones.create([
+          {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0, :omitable => true},
+          {:tone => JazzModel::Tone::Interval::MAJOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+          {:tone => JazzModel::Tone::Interval::PERFECT_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 3, :omitable => true},
+          {:tone => JazzModel::Tone::Interval::DOMINANT_7TH, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH, :strength => 2},
+          {:tone => JazzModel::Tone::Interval::MAJOR_2ND, :letter_index => JazzModel::Tone::LetterInterval::SECOND, :strength => 4},
+          {:tone => JazzModel::Tone::Interval::MAJOR_6TH, :letter_index => JazzModel::Tone::LetterInterval::SIXTH, :strength => 4}
+        ])
+
+        cc.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Major']['Mixolydian'])
+        cc.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Major']['Ionian'])
+      end
+
+      c.children.create!(:name => 'Dominant b9').tap do |cc|
+        cc.symbols.create!(:name => '7b9', :primary => true)
+
+        cc.tones.create([
+          {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0, :omitable => true},
+          {:tone => JazzModel::Tone::Interval::MAJOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+          {:tone => JazzModel::Tone::Interval::PERFECT_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 3, :omitable => true},
+          {:tone => JazzModel::Tone::Interval::DOMINANT_7TH, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH, :strength => 2},
+          {:tone => JazzModel::Tone::Interval::MINOR_2ND, :letter_index => JazzModel::Tone::LetterInterval::SECOND, :strength => 4}
+        ])
+
+        cc.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Diminished'][1])
+        cc.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Major']['Mixolydian'], 2)
+      end
+
+      c.children.create!(:name => 'Dominant #9').tap do |cc|
+        cc.symbols.create!(:name => '7#9', :primary => true)
+
+        cc.tones.create([
+          {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0, :omitable => true},
+          {:tone => JazzModel::Tone::Interval::MAJOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+          {:tone => JazzModel::Tone::Interval::PERFECT_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 3, :omitable => true},
+          {:tone => JazzModel::Tone::Interval::DOMINANT_7TH, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH, :strength => 2},
+          {:tone => JazzModel::Tone::Interval::AUGMENTED_2ND, :letter_index => JazzModel::Tone::LetterInterval::SECOND, :strength => 4}
+        ])
+
+        cc.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Melodic Minor'][7])
+        cc.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Diminished'][1], 2)
+      end
+
+      c.children.create!(:name => 'Dominant #11').tap do |cc|
+        cc.symbols.create!(:name => '7#11', :primary => true)
+        cc.symbols.create!(:name => 'lyd7')
+        cc.symbols.create!(:name => 'lydiandom')
+
+        cc.tones.create([
+          {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0, :omitable => true},
+          {:tone => JazzModel::Tone::Interval::MAJOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+          {:tone => JazzModel::Tone::Interval::PERFECT_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 3, :omitable => true},
+          {:tone => JazzModel::Tone::Interval::DOMINANT_7TH, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH, :strength => 2},
+          {:tone => JazzModel::Tone::Interval::AUGMENTED_4TH, :letter_index => JazzModel::Tone::LetterInterval::FOURTH, :strength => 4}
+        ])
+
+        cc.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Melodic Minor'][4])
+      end
+
+      c.children.create!(:name => 'Mixoylidian b6').tap do |cc|
+        cc.symbols.create!(:name => '7b6', :primary => true)
+
+        cc.tones.create([
+          {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0, :omitable => true},
+          {:tone => JazzModel::Tone::Interval::MAJOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+          {:tone => JazzModel::Tone::Interval::PERFECT_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 3},
+          {:tone => JazzModel::Tone::Interval::DOMINANT_7TH, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH, :strength => 2},
+          {:tone => JazzModel::Tone::Interval::MINOR_6TH, :letter_index => JazzModel::Tone::LetterInterval::SIXTH, :strength => 4}
+        ])
+
+        cc.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Melodic Minor'][5])
+      end
+
+      c.children.create!(:name => 'Altered').tap do |cc|
+        cc.symbols.create!(:name => 'alt', :primary => true)
+        cc.symbols.create!(:name => 'altered')
+        cc.symbols.create!(:name => '7#9#5')
+        cc.symbols.create!(:name => '7#5#9')
+        cc.symbols.create!(:name => '7b9#9')
+        cc.symbols.create!(:name => '7#9b9')
+        cc.symbols.create!(:name => '7#5')
+
+        cc.tones.create([
+          {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0, :omitable => true},
+          {:tone => JazzModel::Tone::Interval::MAJOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+          {:tone => JazzModel::Tone::Interval::DOMINANT_7TH, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH, :strength => 2},
+          {:tone => JazzModel::Tone::Interval::MINOR_2ND, :letter_index => JazzModel::Tone::LetterInterval::SECOND, :strength => 4},
+          {:tone => JazzModel::Tone::Interval::AUGMENTED_2ND, :letter_index => JazzModel::Tone::LetterInterval::SECOND, :strength => 4},
+          {:tone => JazzModel::Tone::Interval::AUGMENTED_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 4}
+        ])
+
+        cc.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Melodic Minor'][7])
+      end
+
+      c.children.create!(:name => 'Dominant b5').tap do |cc|
+        cc.symbols.create!(:name => '7b5', :primary => true)
+
+        cc.tones.create([
+          {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0, :omitable => true},
+          {:tone => JazzModel::Tone::Interval::MAJOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+          {:tone => JazzModel::Tone::Interval::DIMINISHED_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 3},
+          {:tone => JazzModel::Tone::Interval::DOMINANT_7TH, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH, :strength => 2}
+        ])
+
+        cc.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Melodic Minor'][4])
+      end
+
+    end
+  end
+
+
+  JazzModel::ChordQuality.create!(:name => 'Diminished', :code => 'DIM').tap do |q|
+    q.chords.create!(:name => 'Diminished Triad').tap do |c|
+      c.symbols.create!(:name => 'dim', :primary => true)
+      c.symbols.create!(:name => 'b5')
+
+      c.tones.create([
+        {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0},
+        {:tone => JazzModel::Tone::Interval::MINOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 1},
+        {:tone => JazzModel::Tone::Interval::DIMINISHED_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 1}
+      ])
+
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Diminished'][1])
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Diminished'][2])
+    end
+
+    q.chords.create!(:name => 'Half Diminished').tap do |c|
+      c.symbols.create!(:name => 'dim7', :primary => true)
+      c.symbols.create!(:name => '7b5')
+
+      c.tones.create([
+        {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0},
+        {:tone => JazzModel::Tone::Interval::MINOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 2},
+        {:tone => JazzModel::Tone::Interval::DIMINISHED_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 1},
+        {:tone => JazzModel::Tone::Interval::MINOR_7TH, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH, :strength => 1}
+      ])
+
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Major'][7])
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Melodic Minor'][6])
+    end
+
+    q.chords.create!(:name => 'Full Diminished').tap do |c|
+      c.symbols.create!(:name => 'fulldim', :primary => true)
+      c.symbols.create!(:name => 'b5bb7')
+
+      c.tones.create([
+        {:tone => JazzModel::Tone::Interval::ROOT, :letter_index => JazzModel::Tone::LetterInterval::FIRST, :strength => 0},
+        {:tone => JazzModel::Tone::Interval::MINOR_3RD, :letter_index => JazzModel::Tone::LetterInterval::THIRD, :strength => 2},
+        {:tone => JazzModel::Tone::Interval::DIMINISHED_5TH, :letter_index => JazzModel::Tone::LetterInterval::FIFTH, :strength => 1},
+        {:tone => JazzModel::Tone::Interval::DIMINISHED_7TH, :letter_index => JazzModel::Tone::LetterInterval::SEVENTH, :strength => 1}
+      ])
+
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Diminished'][1])
+      c.chord_scales << JazzModel::ChordScale.specify(JazzModel::Scale['Diminished'][2])
+    end
+  end
+end