Mercurial > hg > c4dm-chord-transcriptions
diff evaluationtools/stripinversion.m @ 1:8973548174c1 tip
adding tools to repo
author | christopherh |
---|---|
date | Mon, 06 May 2013 14:43:47 +0100 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/evaluationtools/stripinversion.m Mon May 06 14:43:47 2013 +0100 @@ -0,0 +1,17 @@ + +function chord = stripinversion(chordinput) + +chord = ''; + +ilength = length(chordinput); + +for i = 1:ilength + + if chordinput(i)~='/' + chord = [chord chordinput(i)]; + else + break; + end +end + + \ No newline at end of file