function step1(song)

x = wavread(song);
y = extractMelody(x,hamming(2025),4096,'baby.txt');
wavwrite(y,44100,'melody.wav');



