function g = netderiv(w, net, x)
%NETDERIV Evaluate derivatives of network outputs by weights generically.
%
%	Description
%
%	G = NETDERIV(W, NET, X) takes a weight vector W and a network data
%	structure NET, together with the matrix X of input vectors, and
%	returns the gradient of the outputs with respect to the weights
%	evaluated at W.
%
%	See also
%	NETEVFWD, NETOPT
%

%	Copyright (c) Ian T Nabney (1996-2001)

fstr = [net.type, 'deriv'];
net = netunpak(net, w);
g = feval(fstr, net, x);