Skip to content
Snippets Groups Projects
Select Git revision
  • 42e31ad6e1bed9ee017ead4b7a4bab4fd883b382
  • master default
  • created_preprocessor_repo
3 results

ModFile.hh

Blame
  • Forked from Dynare / preprocessor
    Source project has a limited visibility.
    NumericalInitialization.cc 14.00 KiB
    /*
     * Copyright (C) 2003-2014 Dynare Team
     *
     * This file is part of Dynare.
     *
     * Dynare is free software: you can redistribute it and/or modify
     * it under the terms of the GNU General Public License as published by
     * the Free Software Foundation, either version 3 of the License, or
     * (at your option) any later version.
     *
     * Dynare is distributed in the hope that it will be useful,
     * but WITHOUT ANY WARRANTY; without even the implied warranty of
     * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     * GNU General Public License for more details.
     *
     * You should have received a copy of the GNU General Public License
     * along with Dynare.  If not, see <http://www.gnu.org/licenses/>.
     */
    
    #include <iostream>
    #include <fstream>
    #include <sstream>
    #include <cstdlib>
    
    #include "NumericalInitialization.hh"
    
    InitParamStatement::InitParamStatement(int symb_id_arg,
                                           const expr_t param_value_arg,
                                           const SymbolTable &symbol_table_arg) :
      symb_id(symb_id_arg),
      param_value(param_value_arg),
      symbol_table(symbol_table_arg)
    {
    }
    
    void
    InitParamStatement::checkPass(ModFileStructure &mod_file_struct, WarningConsolidation &warnings)
    {
      if (symbol_table.getName(symb_id) == "dsge_prior_weight")
        mod_file_struct.dsge_prior_weight_initialized = true;
    }
    
    void
    InitParamStatement::writeOutput(ostream &output, const string &basename) const
    {
      int id = symbol_table.getTypeSpecificID(symb_id) + 1;
      output << "M_.params( " << id << " ) = ";
      param_value->writeOutput(output);
      output << ";" << endl;
      output << symbol_table.getName(symb_id) << " = M_.params( " << id << " );\n";
    }
    
    void
    InitParamStatement::writeCOutput(ostream &output, const string &basename)
    {
      int id = symbol_table.getTypeSpecificID(symb_id);
      output << "params[ " << id << " ] = ";
      param_value->writeOutput(output);
      output << ";" << endl;
      output << "double " << symbol_table.getName(symb_id) << " = params[ " << id << " ];" << endl;
    }
    
    void
    InitParamStatement::fillEvalContext(eval_context_t &eval_context) const
    {
      try
        {
          eval_context[symb_id] = param_value->eval(eval_context);
        }
      catch (ExprNode::EvalException &e)