Changeset 3456 for issm/trunk/src/c/ModelProcessorx/DiagnosticStokes/CreateConstraintsDiagnosticStokes.cpp

Timestamp:

04/08/10 08:32:04 (15 years ago)

Author:

seroussi

Message:

more cleaning on ModelProcessor

File:

• issm/trunk/src/c/ModelProcessorx/DiagnosticStokes/CreateConstraintsDiagnosticStokes.cpp (modified) (4 diffs)

issm/trunk/src/c/ModelProcessorx/DiagnosticStokes/CreateConstraintsDiagnosticStokes.cpp

@@ -15 +15 @@
         DataSet* constraints = NULL;
         Spc*    spc  = NULL;
-        int count;
-
-        /*spc intermediary data: */
-        double* gridonstokes=NULL;
+        int count=0;
 
         /*Create constraints: */
@@ -27 +24 @@
 
         /*Fetch data: */
-        IoModelFetchData(&gridonstokes,NULL,NULL,iomodel_handle,"gridonstokes");
+        IoModelFetchData(&iomodel->gridonstokes,NULL,NULL,iomodel_handle,"gridonstokes");
 
         count=1; //matlab indexing
@@ -35 +32 @@
                 if((iomodel->my_vertices[i]==1)){
 
-                        if ((int)!gridonstokes[i]){
+                        if ((int)!iomodel->gridonstokes[i]){
 
                                 /*This grid will see its vx,vy and vz dofs spc'd to pattyn velocities: */
@@ -50 +47 @@
         }
 
+        /*Free data: */
+        xfree((void**)&iomodel->gridonstokes);
+
         /*All our datasets are already order by ids. Set presort flag so that later on, when sorting is requested on these 
          * datasets, it will not be redone: */
         constraints->Presort();
-
-        /*Free data: */
-        xfree((void**)&gridonstokes);
 
         cleanup_and_return: