Changeset 26503 for issm/trunk-jpl/src/c/classes/Elements/Penta.cpp
- Timestamp:
- 10/26/21 05:34:36 (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/classes/Elements/Penta.cpp
r26501 r26503 193 193 if(targetVel_enum==VxEnum || targetVel_enum==VyEnum){ 194 194 IssmDouble vel[NUMVERTICES]; 195 IssmDouble* xyz_list ;195 IssmDouble* xyz_list = NULL; 196 196 Penta* penta = this; 197 197 _assert_(NUMVERTICES-2*numnodes==0); … … 203 203 vel[i+NUMVERTICES2D] = vb[i] + vsh[i]*(1-pow((s[i]-xyz_list[(i+NUMVERTICES2D)*3+2])/H[i], (n[i]+1))); 204 204 } 205 xDelete<IssmDouble>(xyz_list); 205 206 206 207 /*Add to the bottom side of the element*/ … … 209 210 penta=penta->GetUpperPenta(); _assert_(penta->Id()!=this->id); 210 211 } 211 212 xDelete<IssmDouble>(xyz_list);213 212 } 214 213 else _error_("not implemented yet");
Note:
See TracChangeset
for help on using the changeset viewer.