function R=rotation(theta)
% ROTATION returns Rotation Matrix of angle theta
% Usage: R=rotation(theta)

% Copyright(C) 2002 Tohru Ikeguchi, All Rights Reserved

R = [cos(theta) -sin(theta); sin(theta)  cos(theta)];

