% Example: Node-Center

clear all
tfinal=100;
[t x]=ode45(@center,[0 tfinal],[0.5 0]);
[t xb]=ode45(@center,[0 tfinal],[1 0]);
[t xc]=ode45(@center,[0 tfinal],[1.5 0]);
[t xd]=ode45(@center,[0 tfinal],[2 0]);
[t xe]=ode45(@center,[0 tfinal],[2.5 0]);
plot(x(:,1),x(:,2),'b');
hold on
plot(xb(:,1),xb(:,2),'b');
hold on
plot(xc(:,1),xc(:,2),'b');
hold on
plot(xd(:,1),xd(:,2),'b');
hold on
plot(xe(:,1),xe(:,2),'b');
xlabel('X1');
ylabel('X2');
title('Center')
grid


% "Complex and Chaotic Nonlinear Dynamics. 
% Advances in Economics and Finance, 
% Mathematics and Statistics" 
% T.Vialar, Springer 2009
% Copyright(c).