function y=invkde1(x,A,k,h)

% INVKDE1     Reciprocal of kdest1d for maximisation routines.
%
%             Example: load kddata;
%                      x=fmin('invkde1',0,500,[],suicide,'knorm',0)
%                      kdplot(suicide,'knorm',100,0,0);
%                      hold on; plot(x,kdest1d(x,suicide,'knorm',0),'cx')
%  
%             Christian C. Beardah 1996

y=1./kdest1d(x,A,k,h);