Skip to content

Commit

Permalink
[Janitor mode] Fix tabs
Browse files Browse the repository at this point in the history
git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@19399 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
  • Loading branch information
OpenModelica-Hudson committed Mar 3, 2014
1 parent a3e30c7 commit b7f69cd
Show file tree
Hide file tree
Showing 2 changed files with 9 additions and 9 deletions.
8 changes: 4 additions & 4 deletions Compiler/BackEnd/SimCodeUtil.mo
Expand Up @@ -4010,10 +4010,10 @@ algorithm

case(_, _, _, _, _, _,BackendDAE.EQSYSTEM(orderedVars=vars, orderedEqs=eqns), BackendDAE.SHARED(knownVars=kv, functionTree=functree), _, _)
equation
// get tearing vars
tvars = List.map1r(tearingVars, BackendVariable.getVarAt, vars);
tvars = List.map(tvars, BackendVariable.transformXToXd);
// get tearing vars
tvars = List.map1r(tearingVars, BackendVariable.getVarAt, vars);
tvars = List.map(tvars, BackendVariable.transformXToXd);
// get residual eqns
reqns = BackendEquation.getEqns(residualEqns, eqns);
reqns = BackendEquation.replaceDerOpInEquationList(reqns);
Expand Down
10 changes: 5 additions & 5 deletions SimulationRuntime/c/simulation/solver/nonlinearSolverNewton.c
Expand Up @@ -430,15 +430,15 @@ static int _omc_newton(integer* n, double *x, double *fvec, double* eps, double*

while(*info >= 0)
{
infoStreamPrint(LOG_NLS_V, 0, "**** start Iteration: %d *****", (int) *maxfev-l);
infoStreamPrint(LOG_NLS_V, 0, "**** start Iteration: %d *****", (int) *maxfev-l);
/* calculate the function values */
(*f)(n, x, fvec, &iflag, userdata,currentSys);
(*nfev)++;

/* Debug output */
if(ACTIVE_STREAM(LOG_NLS_V))
for(i=0; i<*n; i++)
infoStreamPrint(LOG_NLS_V, 0, "fvec[%d]: %e: ", i, fvec[i]);
infoStreamPrint(LOG_NLS_V, 0, "fvec[%d]: %e: ", i, fvec[i]);

/* calculate jacobian */
if(systemData->jacobianIndex != -1){
Expand Down Expand Up @@ -493,9 +493,9 @@ static int _omc_newton(integer* n, double *x, double *fvec, double* eps, double*

if(ACTIVE_STREAM(LOG_NLS_V))
{
infoStreamPrint(LOG_NLS_V, 0, "Solved J*x=b");
infoStreamPrint(LOG_NLS_V, 0, "Solved J*x=b");
for(i=0; i<*n; i++)
infoStreamPrint(LOG_NLS_V, 0, "b[%d] = %e ", i, fvec[i]);
infoStreamPrint(LOG_NLS_V, 0, "b[%d] = %e ", i, fvec[i]);
}

if(lapackinfo > 0)
Expand All @@ -522,7 +522,7 @@ static int _omc_newton(integer* n, double *x, double *fvec, double* eps, double*

if(ACTIVE_STREAM(LOG_NLS_V))
for(i=0; i<*n; i++)
infoStreamPrint(LOG_NLS_V, 0, "x[%d] = %e ", i, x[i]);
infoStreamPrint(LOG_NLS_V, 0, "x[%d] = %e ", i, x[i]);

/* check if maximum iteration is reached */
l--;
Expand Down

0 comments on commit b7f69cd

Please sign in to comment.