% inharmonicite variable d'une corde
%-----------------------------------

clear all; close all;

Fe = 22050; h = 1/Fe;
f = 220; T =  3;
th = 0:h:T;

x = clavecin(f,T,Fe,.0);
sound(x,Fe);
%wavwrite(x,Fe,'../SONS/215clav1.wav');
pause(T+2);

x = clavecin(f,T,Fe,.25);
sound(x,Fe);
%wavwrite(x,Fe,'../SONS/216clav2.wav');
pause(T+2);

x = clavecin(f,T,Fe,.8);
sound(x,Fe);
%wavwrite(x,Fe,'../SONS/217clav3.wav');


