Changeset 07a4d15 in OpenModelica

Timestamp:

2014-02-06T17:24:12+01:00 (10 years ago)

Author:

Martin Sjölund <martin.sjolund@…>

Branches:

Added-citation-metadata, maintenance/v1.14, maintenance/v1.15, maintenance/v1.16, maintenance/v1.17, maintenance/v1.18, maintenance/v1.19, maintenance/v1.20, maintenance/v1.21, maintenance/v1.22, maintenance/v1.23, master, omlib-staging

Children:

8c34e0e

Parents:

1ce72d5

Message:

lis only create x-vector once

git-svn-id: ​https://openmodelica.org/svn/OpenModelica/trunk@19006 f25d12d1-65f4-0310-ae8a-bbce733d8d8e

File:

• SimulationRuntime/c/simulation/solver/linearSolverLis.c (modified) (2 diffs)

SimulationRuntime/c/simulation/solver/linearSolverLis.c

@@ -61 +61 @@
   lis_vector_set_size(data->b, data->n_row, 0);
 
+  lis_vector_create(0, &(data->x));
+  lis_vector_set_size(data->b, data->n_row, 0);
+
   lis_solver_create(&(data->solver));
   lis_solver_set_option("-i fgmres ",data->solver);
@@ -112 +115 @@
   }
 
-  /* Create a new Vector for the solution */
-  lis_vector_destroy(sData->x);
-  lis_vector_duplicate(sData->A,&(sData->x));
-  
   /* solve */
   ret = lis_solve(sData->A,sData->b,sData->x,sData->solver);