



%dynare paper2 nostrict noclearall;

tauw_vec = [0.16:0.01:0.18];	%tauw =0.17;
tauf_vec= [0.29:0.01:0.31];  %tauf =0.30;

first_time = 1;
for i=1:length(tauw_vec)
    ii=1:length(tauf_vec);
    if first_time
       dynare paper2 nostrict noclearall;
       first_time = 0;
    else
       set_param_value('tauw',tauw_vec(i));
       set_param_value('tauf',tauf_vec(ii));
       
       try
       steady;
       results_cell{i}=oo_.steady_state;
       results_cell{ii}=oo_.steady_state;
       catch
            disp('Failed to compute steady state')        
       end      
    end
end
