Changeset 13326

Timestamp:

09/11/12 14:07:52 (13 years ago)

Author:

Eric.Larour

Message:

CHG: simplified dumping into external results

File:

• issm/trunk-jpl/src/c/modules/AutodiffDriversx/AutodiffDriversx.cpp (modified) (1 diff)

issm/trunk-jpl/src/c/modules/AutodiffDriversx/AutodiffDriversx.cpp

@@ -72 +72 @@
                 double **J=xNew<double>(num_dependents,num_independents);
                 jacobian(1,num_dependents,num_independents,xp,J);
-                IssmPDouble *matJ=xNew<IssmPDouble>(num_dependents*num_independents);
-                for (int i=0;i<num_dependents*num_independents;++i)
-                  matJ[i]=J[i];
-                results->AddObject(new GenericExternalResult<IssmPDouble*>(results->Size()+1,AutodiffJacobianEnum,matJ,num_independents,num_dependents,1,1,0.0));
-                xDelete<IssmPDouble>(matJ);
+                results->AddObject(new GenericExternalResult<IssmPDouble*>(results->Size()+1,AutodiffJacobianEnum,*J,num_independents,num_dependents,1,1,0.0));
                 xDelete(J);
 #endif