samer@47: function y=imajor, y=[2,2,1,2,2,2,1]
samer@47: % imajor - Return intervals major scale in semitones 
samer@47: %
samer@47: % imajor :: unit -> [[7]->natural].