function the_period = periodPulseIni100ms(t)

% periodPulseIni100ms - Returns the first 100ms of the CIP period of 
%			cip_trace, t. 
%
% Usage:
% the_period = periodPulseIni100ms(t)
%
% Description:
%
%   Parameters:
%	t: A trace object.
%
%   Returns:
%	the_period: A period object.
%
% See also: period, cip_trace, trace
%
% $Id$
%
% Author: Cengiz Gunay <cgunay@emory.edu>, 2004/08/25

% Copyright (c) 2007 Cengiz Gunay <cengique@users.sf.net>.
% This work is licensed under the Academic Free License ("AFL")
% v. 3.0. To view a copy of this license, please look at the COPYING
% file distributed with this software or visit
% http://opensource.org/licenses/afl-3.0.php.

the_period = period(t.pulse_time_start, t.pulse_time_start + ...
		    floor(100e-3 / t.trace.dt));