close all;
clear;
clc
dynare model1.mod noclearall;

% Plots
T_simul = 1:1:50;
plot(T_simul,Y(1:length(T_simul)),'k');
hold on
plot(T_simul,H(1:length(T_simul)),'k:');
hold on
plot(T_simul,i(1:length(T_simul)),'k--');
xlabel('Time');
legend('Y','H','i');
