Skip to content

Commit

Permalink
- some fixes for tds
Browse files Browse the repository at this point in the history
git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@21687 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
  • Loading branch information
Volker Waurich committed Jul 31, 2014
1 parent a1a4b77 commit 285282d
Showing 1 changed file with 9 additions and 3 deletions.
12 changes: 9 additions & 3 deletions Compiler/BackEnd/HpcOmScheduler.mo
Expand Up @@ -2433,13 +2433,19 @@ algorithm
numInitialEquations=numInitialEquations, numInitialAlgorithms=numInitialAlgorithms, numInitialResiduals=numInitialResiduals, numExternalObjects=numExternalObjects,
numStringAlgVars=numStringAlgVars, numStringParamVars=numStringParamVars, numStringAliasVars=numStringAliasVars, numEquations=numEquations, numLinearSystems=numLinearSystems,
numNonLinearSystems=numNonLinearSystems, numMixedSystems=numMixedSystems, numStateSets=numStateSets, numJacobians=numJacobians, numOptimizeConstraints=numOptimizeConstraints) := varInfo;


//reassign new indexes
(initialEquations,(idx,ass)) := List.mapFold(initialEquations,TDS_replaceSimEqSysIndexWithUpdate,(1,idxAssIn));
(residualEquations,(idx,ass)) := List.mapFold(residualEquations,TDS_replaceSimEqSysIndexWithUpdate,(idx,ass));
(allEquations,(idx,ass)) := List.mapFold(allEquations,TDS_replaceSimEqSysIndexWithUpdate,(idx,ass));
(startValueEquations,(idx,ass)) := List.mapFold(startValueEquations,TDS_replaceSimEqSysIndexWithUpdate,(idx,ass));
(nominalValueEquations,(idx,ass)) := List.mapFold(nominalValueEquations,TDS_replaceSimEqSysIndexWithUpdate,(idx,ass));
(minValueEquations,(idx,ass)) := List.mapFold(minValueEquations,TDS_replaceSimEqSysIndexWithUpdate,(idx,ass));
(maxValueEquations,(idx,ass)) := List.mapFold(maxValueEquations,TDS_replaceSimEqSysIndexWithUpdate,(idx,ass));
(parameterEquations,(idx,ass)) := List.mapFold(parameterEquations,TDS_replaceSimEqSysIndexWithUpdate,(idx,ass));


(algorithmAndEquationAsserts,(idx,ass)) := List.mapFold(algorithmAndEquationAsserts,TDS_replaceSimEqSysIndexWithUpdate,(idx,ass));

//for collected groups
odeEquations := List.mapList1_1(odeEquations,TDS_replaceSimEqSysIndex,ass);
algebraicEquations := List.mapList1_1(algebraicEquations,TDS_replaceSimEqSysIndex,ass);
equationsForZeroCrossings := List.map1(equationsForZeroCrossings,TDS_replaceSimEqSysIndex,ass);
Expand Down

0 comments on commit 285282d

Please sign in to comment.