function save_results(x,s_name,names)

% function save_results(x,s_name,names)
% save results in appropriate structure
%
% INPUT
%   x: matrix to be saved column by column
%   s_name: name of the structure where to save the results
%   names: names of the individual series
%
% OUTPUT
%   none
%
% SPECIAL REQUIREMENT
%   none
%    
% part of DYNARE, copyright Dynare Team (2006-2008)
% Gnu Public License.

  global oo_
  
  for i=1:size(x,2)
    eval([s_name deblank(names(i,:)) '= x(:,i);']);
  end