Changeset 13326


Ignore:
Timestamp:
09/11/12 14:07:52 (13 years ago)
Author:
Eric.Larour
Message:

CHG: simplified dumping into external results

File:
1 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk-jpl/src/c/modules/AutodiffDriversx/AutodiffDriversx.cpp

    r13325 r13326  
    7272                double **J=xNew<double>(num_dependents,num_independents);
    7373                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));
    7975                xDelete(J);
    8076#endif
Note: See TracChangeset for help on using the changeset viewer.