% downr.m
% usage: Y = downr(X) 
% Performs downsampling on the rows of X
% even numbered columns are discarded 

function Y = downr(X)
     n = size(X,2);
     n = (n-mod(n,2))/2;
     Y = X(:,2*(1:n)-ones(1,n));