function [t,s]=Func_TFI(F,X)
    
// Transformée de Fourier inverse
// Xc : coefficients de Fourier complexes (issus de la fonction Func_TF.sci)

N=length(X);
deltaf=abs(F(2)-F(1));
fmax=N*deltaf;
Te=1/fmax;
t=(0:1:N-1)*Te;

s=N.*real(ifft(X)); // le facteur N : normalisation à l'amplitude

endfunction