Changeset 3811 for issm/trunk/src/c/ModelProcessorx/Balancedvelocities/CreateElementsNodesAndMaterialsBalancedvelocities.cpp

Timestamp:

05/18/10 12:19:45 (15 years ago)

Author:

Eric.Larour

Message:

Added upper and lower elements neighboors in Penta element

File:

• issm/trunk/src/c/ModelProcessorx/Balancedvelocities/CreateElementsNodesAndMaterialsBalancedvelocities.cpp (modified) (2 diffs)

issm/trunk/src/c/ModelProcessorx/Balancedvelocities/CreateElementsNodesAndMaterialsBalancedvelocities.cpp

@@ -90 +90 @@
                 IoModelFetchData(&iomodel->melting_rate,NULL,NULL,iomodel_handle,"melting_rate");
                 IoModelFetchData(&iomodel->accumulation_rate,NULL,NULL,iomodel_handle,"accumulation_rate");
+                IoModelFetchData(&iomodel->upperelements,NULL,NULL,iomodel_handle,"upperelements");
+                IoModelFetchData(&iomodel->lowerelements,NULL,NULL,iomodel_handle,"lowerelements");
 
                 for (i=0;i<iomodel->numberofelements;i++){
@@ -116 +118 @@
                 xfree((void**)&iomodel->melting_rate);
                 xfree((void**)&iomodel->accumulation_rate);
+                xfree((void**)&iomodel->upperelements);
+                xfree((void**)&iomodel->lowerelements);
+
 
         } //if (strcmp(meshtype,"2d")==0)