samer@32: % expwin - Exponential window
samer@32: %
samer@32: % expwin :: nonneg, N:natural -> [[N]].
samer@32: function h=expwin(tau,n), h=exp(-(0:n-1)'/(n*tau));