function z=cnorm(x,y)

% CNORM       Canonical Uni- or Bi-variate Normal Density Function.

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