From 2eed8a5fb2263048bb86b3a852a71b49b45ac2fc Mon Sep 17 00:00:00 2001
From: michel <michel@ac1d8469-bf42-47a9-8791-bf33cf982152>
Date: Tue, 12 May 2009 20:34:23 +0000
Subject: [PATCH] 4.1: corrected bug in initialization of horizon for case:
 'simul'

git-svn-id: https://www.dynare.org/svn/dynare/trunk@2669 ac1d8469-bf42-47a9-8791-bf33cf982152
---
 matlab/forecast.m | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/matlab/forecast.m b/matlab/forecast.m
index b1156f6ec..334dee0e9 100644
--- a/matlab/forecast.m
+++ b/matlab/forecast.m
@@ -41,7 +41,6 @@ function info = forecast(var_list,task)
     old_options = options_;
 
     maximum_lag = M_.maximum_lag;
-    horizon = options_.forecast;
 
 
     endo_names = M_.endo_names;
@@ -62,13 +61,18 @@ function info = forecast(var_list,task)
     
     trend = 0;
     switch task
-     case 'simul'
+      case 'simul'
+       horizon = options_.periods;
+       if horizon == 0
+           horizon = 5;
+       end
       if size(oo_.endo_simul,2) < maximum_lag
           y0 = repmat(oo_.steady_state,1,maximum_lag);
       else
           y0 = oo_.endo_simul(:,1:maximum_lag);
       end
      case 'smoother'
+       horizon = options_.forecast;
       y_smoothed = oo_.SmoothedVariables;
       y0 = zeros(M_.endo_nbr,maximum_lag);
       for i = 1:M_.endo_nbr