function [dd] = test2( t, y)
% ======================================================================
% Beispiel einer rechten Seite einer Differentialgleichung
% Testbeispiel 2
%
% Erstellt fuer die Veranstaltung
% Weiterbildenes Studium fuer Ingenieure WS 98/99
%
% S.F.
% ----------------------------------------------------------------------

dx= -y(2,:)-y(1,:).*y(3,:)/sqrt(y(1,:).^2+y(2,:).^2);
dy= y(1,:)-y(2,:).*y(3,:)/sqrt(y(1,:).^2+y(2,:).^2);
dz= y(1,:)/sqrt(y(1,:).^2+y(2,:).^2);

dd = [dx' dy' dz']';

return