function trout=tr(trin,flag)
% TR Reverses the a time series
% trout=tr(trin,flag)
%
% TR returns the time reverse of trin.
% This is accomplished such that the sample at length(trin)/2
% remain
function trout=tr(trin,flag)
% trout=tr(trin,flag)
%
% TR returns the time reverse of trin.
% This is accomplished such that the sample at length(trin)/2
% remains fixed. For length(trin) even, the l