clc;
clear all;
close all;
%tiempo de simulación
    ti=0; %tiempo inicial
    tf = 10; % tiempo de simulación (segundos)
    h=0.001; % incremento de un milisegundo
    ts=ti:h:tf; % vector de tiempo
    cond_iniciales=0;
%opciones del proceso de  integración numérica
  opciones=odeset('RelTol',h, 'AbsTol',1e-06,'InitialStep',h,'MaxStep',h);

% función ode45 para integración numérica
% solución del sistema x(t)  por integración numérica Runge-Kutta de cuarto y quinto orden:
disp('Simulación de un sistema lineal escalar')
[t,x]=ode45('cap2_ejemplo26',ts,cond_iniciales,opciones);

% ganancia del amplificador que acopla impedancia de la variable de estados x(t) con la salida.
c=1;
%salida del sistema
y=c*x;
% gráfica del sistema lineal escalar 
plot(t,y)