%-----------------------------------------------------------------
% Copyright 1998, by Bogumila and Zbigniew Mrozek, Krakow. For use
% with the book "MATLAB 5.x, SIMULINK 2.x, poradnik uzytkownika"
% (PLJ Warszawa, 1998, ISBN 83-7101-376-0).
%-----------------------------------------------------------------
% see page 218, chapter 9.1.3 of the book,
% problem: find solution of ordinary differential equation set
% given in file 'ode1000.m'
%
global STEP
STEP=0;
t0=0;t2=3; % zadany przedzial
options=odeset('AbsTol',1e-1,'stat','on');
x0= [1 -1]; % wartosci dla t=0
[t,x] = ode23s('ode1000', [t0, t2], x0, options);
STEP, plot(t,x)
