Code covered by the BSD License

Calculate Time Interval/ Difference

Michael Chan (view profile)

01 Nov 2010 (Updated )

To compute time interval, taking into account leap days that are subsumed within that interval.

isleapyear(year)
```function t = isleapyear(year)
%ISLEAPYEAR True for leap years.
%
%   ISLEAPYEAR(YEAR) returns 1's for the elements of YEAR that are leap
%   years and 0's for those that are not.  If YEAR is omitted, the current
%   year is used.  Gregorian calendar is assumed.
%
%   A year is a leap year if the following returns true
%
%       ( ~rem(year, 4) & rem(year, 100) ) | ~rem(year, 400)
%
%   A year is not a leap year if the following returns true
%
%      rem(year, 4) | ( ~rem(year, 100) & rem(year, 400) )

error(nargchk(0, 1, nargin));

if nargin == 0               % If no input argument...
clk = clock;              % ...get current date and time...
year = clk(1);            % ...and extract year.
end

t = ( ~rem(year, 4) & rem(year, 100) ) | ~rem(year, 400);
```