sinus=sinfrac(phi)

function sinus=sinfrac(phi)

% function sinus=sinfrac(phi)
%
% compute sin(phi); phi in units of 1r = 360 degrees
% subroutine of function moon
%
% 05.05.04 M.Penzkofer

sinus = sin(2*pi*frac(phi));