Remove various compiler warnings
parent
1fc2d78ddf
commit
c079ace8c3
|
@ -21,7 +21,7 @@ double GoldenSectionSearch::search(OneDFunction& f, double x1, double x2)
|
|||
if (init_bracket(f, x1, x2, b)) {
|
||||
double fb = f.eval(b);
|
||||
double f1 = f.eval(x1);
|
||||
double f2 = f.eval(x2);
|
||||
f.eval(x2);
|
||||
double dx;
|
||||
do {
|
||||
double w = (b-x1)/(x2-x1);
|
||||
|
@ -38,7 +38,6 @@ double GoldenSectionSearch::search(OneDFunction& f, double x1, double x2)
|
|||
// x is on the left from b
|
||||
if (f1 > fx && fx < fb) {
|
||||
// pickup bracket [f1,fx,fb]
|
||||
f2 = fb;
|
||||
x2 = b;
|
||||
fb = fx;
|
||||
b = x;
|
||||
|
@ -51,7 +50,6 @@ double GoldenSectionSearch::search(OneDFunction& f, double x1, double x2)
|
|||
// x is on the right from b
|
||||
if (f1 > fb && fb < fx) {
|
||||
// pickup bracket [f1,fb,fx]
|
||||
f2 = fx;
|
||||
x2 = x;
|
||||
} else {
|
||||
// pickup bracket [fb,fx,f2]
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
/*
|
||||
* Copyright (C) 2007-2011 Dynare Team
|
||||
* Copyright (C) 2007-2012 Dynare Team
|
||||
*
|
||||
* This file is part of Dynare.
|
||||
*
|
||||
|
@ -247,7 +247,6 @@ mexFunction(int nlhs, mxArray *plhs[], int nrhs, const mxArray *prhs[])
|
|||
for (int i = 0; i < n; i++)
|
||||
i_nz_state_var[i] = nz_state_var[i];
|
||||
|
||||
int n_diag = mxGetScalar(prhs[11]);
|
||||
#else
|
||||
mxArray *M_;
|
||||
M_ = mexGetVariable("global", "M_");
|
||||
|
@ -342,7 +341,7 @@ mexFunction(int nlhs, mxArray *plhs[], int nrhs, const mxArray *prhs[])
|
|||
lapack_int* iw = (lapack_int*)mxMalloc(pp * sizeof(lapack_int));
|
||||
lapack_int* ipiv = (lapack_int*)mxMalloc(pp * sizeof(lapack_int));
|
||||
lapack_int info = 0;
|
||||
double anorm, rcond;
|
||||
double rcond;
|
||||
#ifdef BLAS
|
||||
mxArray* p_P_t_t1 = mxCreateDoubleMatrix(n, n, mxREAL);
|
||||
#else
|
||||
|
|
|
@ -3001,11 +3001,15 @@ SparseMatrix::Simulate_Newton_One_Boundary(int blck, int y_size, int it_, int y_
|
|||
{
|
||||
for (j = 0; j < y_size; j++)
|
||||
{
|
||||
#ifdef DEBUG
|
||||
bool select = false;
|
||||
#endif
|
||||
for (int i = 0; i < Size; i++)
|
||||
if (j == index_vara[i])
|
||||
{
|
||||
#ifdef DEBUG
|
||||
select = true;
|
||||
#endif
|
||||
break;
|
||||
}
|
||||
#ifdef DEBUG
|
||||
|
|
|
@ -310,7 +310,7 @@ void mexFunction(int nlhs, mxArray *plhs[], int nrhs, const mxArray *prhs[])
|
|||
double *ghxx = mxGetPr(prhs[5]);
|
||||
double *ghuu = mxGetPr(prhs[6]);
|
||||
double *ghxu = mxGetPr(prhs[7]);
|
||||
double *yhat_, *ss;
|
||||
double *yhat_ = NULL, *ss = NULL;
|
||||
if (nrhs>9)
|
||||
{
|
||||
yhat_ = mxGetPr(prhs[8]);
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
/*
|
||||
* Copyright (C) 2006-2011 Dynare Team
|
||||
* Copyright (C) 2006-2012 Dynare Team
|
||||
*
|
||||
* This file is part of Dynare.
|
||||
*
|
||||
|
@ -34,12 +34,11 @@ my_criteria(const double *alphar, const double *alphai, const double *beta)
|
|||
void
|
||||
mjdgges(double *a, double *b, double *z, double *n, double *sdim, double *eval_r, double *eval_i, double *info)
|
||||
{
|
||||
lapack_int i_n, i_info, i_sdim, one, lwork;
|
||||
lapack_int i_n, i_info, i_sdim, lwork;
|
||||
double *alphar, *alphai, *beta, *work, *par, *pai, *pb, *per, *pei;
|
||||
double *junk;
|
||||
lapack_int *bwork;
|
||||
|
||||
one = 1;
|
||||
i_n = (lapack_int)*n;
|
||||
alphar = mxCalloc(i_n, sizeof(double));
|
||||
alphai = mxCalloc(i_n, sizeof(double));
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
/*
|
||||
** Computes Quasi Monte-Carlo sequence.
|
||||
**
|
||||
** Copyright (C) 2010-2011 Dynare Team
|
||||
** Copyright (C) 2010-2012 Dynare Team
|
||||
**
|
||||
** This file is part of Dynare (can be used outside Dynare).
|
||||
**
|
||||
|
@ -135,7 +135,7 @@ void mexFunction( int nlhs, mxArray *plhs[], int nrhs, const mxArray *prhs[])
|
|||
{
|
||||
DYN_MEX_FUNC_ERR_MSG_TXT("qmc_sequence:: The fifth input argument must be a positive scalar!");
|
||||
}
|
||||
double *lower_bounds, *upper_bounds;
|
||||
double *lower_bounds = NULL, *upper_bounds = NULL;
|
||||
int unit_hypercube_flag = 1;
|
||||
if ( (type==0) && (nrhs>4) )
|
||||
{
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
/*
|
||||
* Copyright (C) 2009-2011 Dynare Team
|
||||
* Copyright (C) 2009-2012 Dynare Team
|
||||
*
|
||||
* This file is part of Dynare.
|
||||
*
|
||||
|
@ -226,7 +226,6 @@ namespace MFS
|
|||
bool not_a_loop;
|
||||
int i;
|
||||
AdjacencyList_t::vertex_iterator it, it1, ita, it_end;
|
||||
property_map<AdjacencyList_t, vertex_index_t>::type v_index = get(vertex_index, G);
|
||||
for (tie(it, it_end) = vertices(G), i = 0; it != it_end; ++it, i++)
|
||||
{
|
||||
int in_degree_n = in_degree(*it, G);
|
||||
|
|
|
@ -1515,12 +1515,10 @@ StaticModel::writeOutput(ostream &output, bool block) const
|
|||
{
|
||||
BlockSimulationType simulation_type = getBlockSimulationType(b);
|
||||
unsigned int block_size = getBlockSize(b);
|
||||
unsigned int block_mfs = getBlockMfs(b);
|
||||
unsigned int block_recursive = block_size - block_mfs;
|
||||
ostringstream tmp_s, tmp_s_eq;
|
||||
tmp_s.str("");
|
||||
tmp_s_eq.str("");
|
||||
for (int i = 0; i < block_size; i++)
|
||||
for (unsigned int i = 0; i < block_size; i++)
|
||||
{
|
||||
tmp_s << " " << getBlockVariableID(b, i)+1;
|
||||
tmp_s_eq << " " << getBlockEquationID(b, i)+1;
|
||||
|
|
Loading…
Reference in New Issue