function [y,phi]=block(o,phi,f)
% block_sr - generate block of sine wave samples with signal rate control
%
% sine/block :: 
%    sine      ~'sine generator object',
%    real      ~'phase at start of block',
%    [[1,N]]   ~'frequency at signal rate',
% -> [[1,N]]   ~'block of output samples',
%    real      ~'phase at end of block'.


u=cumsum([phi,f],2);
y=sin(2*pi*u(1:end-1));
phi=mod(u(end),1);
	
