nndshunt.m

Martin T.Hagan等著,戴葵等译,神经网络设计,机械工业出版社,一书的所有例程

function yprime = nndshunt(t,y)
%NNDSHUNT Calculates the derivative for a shunting network
%
%	NNDSHUNT(T,Y)
%	  T - Time
%	  Y - State
%	Returns dY.

% First Version, 8-31-95.

%==================================================================

global pp;
global pn;
global bp;
global bn;
global e;

yprime = (-y + (bp - y)*pp - (y + bn)*pn)/e;