function z=cepan(x)

% CEPAN       Canonical Epanechikov Kernel Function.

if nargin==1,
  z=kepan(x/1.7188)/1.7188;
  elseif nargin==2,
    z=kepan(x/1.7188).*kepan(y/1.7188)/1.7188^2;
end;