view aim-mat/tools/Read32Bits.m @ 0:74dedb26614d

Initial checkin of AIM-MAT version 1.5 (6.4.2011).

% support file for 'aim-mat'
%
% This external file is included as part of the 'aim-mat' distribution package
% http://www.pdn.cam.ac.uk/cnbh/aim2006
% $Date: 2008-06-10 18:00:16 +0100 (Tue, 10 Jun 2008) $
% $Revision: 585 $

%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% File:			Read32Bits.m
% Purpose:		Read four 8 bit bytes and combine according to the machine's
%				endian architecture.
% Comments:	
% Author:		L. P. O'Mard
% Revised by:
% Created:
% Updated:
% Copyright:	(c) 2000, University of Essex
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%

function data=Read32Bits(fid, littleEndian)

first = Read16Bits(fid, littleEndian);
second = Read16Bits(fid, littleEndian);
if (littleEndian == 0)
	data = bitshift(first, 16) + second;
else
	data = bitshift(second, 16) + first;
end;