Changeset 15299
- Timestamp:
- 06/21/13 08:50:14 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/classes/Elements/TriaRef.cpp
r15298 r15299 433 433 basis[0]=BasisFunctions[index1]; 434 434 basis[1]=BasisFunctions[index2]; 435 xDelete<IssmDouble>(BasisFunctions); 435 436 return; 436 437 case P2Enum: … … 439 440 basis[1]=BasisFunctions[index2]; 440 441 basis[2]=BasisFunctions[3+index2-1]; 442 xDelete<IssmDouble>(BasisFunctions); 441 443 return; 442 444 default: … … 472 474 dbasis[numnodes*1+i]=Jinv[1][0]*dbasis_ref[0*numnodes+i]+Jinv[1][1]*dbasis_ref[1*numnodes+i]; 473 475 } 476 477 /*Clean up*/ 478 xDelete<IssmDouble>(dbasis_ref); 474 479 475 480 } … … 545 550 546 551 /*Assign values*/ 552 xDelete<IssmDouble>(dbasis); 547 553 *(p+0)=dpx; 548 554 *(p+1)=dpy; … … 567 573 568 574 /*Assign output pointer*/ 575 xDelete<IssmDouble>(basis); 569 576 *p = value; 570 577 }
Note:
See TracChangeset
for help on using the changeset viewer.