Changeset 9031

Timestamp:

07/18/11 08:10:00 (14 years ago)

Author:

seroussi

Message:

fixed GetVz

File:

• issm/trunk/src/c/objects/Elements/Penta.cpp (modified) (2 diffs)

issm/trunk/src/c/objects/Elements/Penta.cpp

@@ -5685 +5685 @@
         double xyz_list[NUMVERTICES][3];
         int*   doflist = NULL;
-        double *vz_ptr = NULL;
 
         /*Get dof list: */
@@ -5709 +5708 @@
         Input* vz_input=inputs->GetInput(VzEnum);
         if (vz_input){
-                if (vz_input->Enum()!=PentaVertexInputEnum){
-                        _error_("Cannot compute Vel as Vz is of type %s",EnumToStringx(vz_input->Enum()));
-                }
-                vz_input->GetValuesPtr(&vz_ptr,&dummy);
-                for(i=0;i<NUMVERTICES;i++) vz[i]=vz_ptr[i];
+                GetParameterListOnVertices(&vz[0],VzEnum);
         }
         else{