function Y=wienerfilt(T,S,X,varargin)
	opts=prefs(varargin{:});
	Y=zipwith(@worker,T,S,X);

	function Y=worker(T,S,X)
		Y=unbuffer(wiener(X,T,S),opts);
	end
end
