function hout = copy(hin)
%COPY Copy constructor for event 
%
%   Author(s): James G. Owen
%   Copyright 1986-2003 The MathWorks, Inc.
%   $Revision: 1.1.6.1 $ $Date: 2004/12/26 21:34:16 $

for k=length(hin):-1:1
    hout(k) = tsdata.event;
    hout(k).EventData = hin(k).EventData;
    hout(k).Name = hin(k).Name;
    hout(k).Time = hin(k).Time;
end