function [midi]=freqmid(freq)
%dada la frecuencia fundamental en Hertzios
%devuelve la nota midi corriespondiente

midi=round(17.31258*log(freq)-36.37802);
if midi>128
   midi=128;
end
if midi<0
   midi=0;
end