function y=harmminor(i)
% major - Return degrees of major scale in semitones relative to tonic
%
% major :: unit -> [[7]->natural].
% major :: [[N]->natural] -> [[N]->natural].

y=[0,2,3,5,7,8,11];
if nargin>0, y=y(i); end
