samer@47: function y=harmminor(i)
samer@47: % major - Return degrees of major scale in semitones relative to tonic
samer@47: %
samer@47: % major :: unit -> [[7]->natural].
samer@47: % major :: [[N]->natural] -> [[N]->natural].
samer@47: 
samer@47: y=[0,2,3,5,7,8,11];
samer@47: if nargin>0, y=y(i); end