Changeset 13326
- Timestamp:
- 09/11/12 14:07:52 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/modules/AutodiffDriversx/AutodiffDriversx.cpp
r13325 r13326 72 72 double **J=xNew<double>(num_dependents,num_independents); 73 73 jacobian(1,num_dependents,num_independents,xp,J); 74 IssmPDouble *matJ=xNew<IssmPDouble>(num_dependents*num_independents); 75 for (int i=0;i<num_dependents*num_independents;++i) 76 matJ[i]=J[i]; 77 results->AddObject(new GenericExternalResult<IssmPDouble*>(results->Size()+1,AutodiffJacobianEnum,matJ,num_independents,num_dependents,1,1,0.0)); 78 xDelete<IssmPDouble>(matJ); 74 results->AddObject(new GenericExternalResult<IssmPDouble*>(results->Size()+1,AutodiffJacobianEnum,*J,num_independents,num_dependents,1,1,0.0)); 79 75 xDelete(J); 80 76 #endif
Note:
See TracChangeset
for help on using the changeset viewer.