function k = kerunif(xg,h) 
% KERUNIF, evaluates the UNIForm KERnel 
%     at a grid of x's, xg (matrix or vector),
%     for the bandwidth h
%     For use in NonParametric Regression MOVies

%    Copyright (c) J. S. Marron and D. Ruppert, 1997

k = (1 / (2 * h)) .* (abs((xg / h)) < 1) ;




