clf
clc

% echo on

global ALPHA
ALPHA=3;

x0=[0.65 0.65 0.65 0.65 0.65 0.65 0.65 0.65 0.65 0.65]';
tfinal=150;

[t,x]=ode23(@medioeq,[0 tfinal],x0);

plot(x(:,5),x(:,8),'b');
title('\alpha = 3');
xlabel('X5');
ylabel('X8');
grid;

% echo off


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