Changeset 18028


Ignore:
Timestamp:
05/20/14 10:05:52 (11 years ago)
Author:
Mathieu Morlighem
Message:

CHG: fixed AD compile

File:
1 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk-jpl/src/c/cores/controlvalidation_core.cpp

    r18027 r18028  
    8181                Ialpha = fabs((j - j0)/Den - 1.);
    8282
    83 
    8483                _printf0_(" " << setw(11) << setprecision (5)<<alpha<<" " << setw(11) << setprecision (5)<<Ialpha<<"\n");
    8584                output[m*2+0] = alpha;
     
    8887
    8988        /*output*/
     89        #ifdef _HAVE_ADOLC_
     90        IssmPDouble* J_passive=xNew<IssmPDouble>(2*num);
     91        for(int i=0;i<2*num;i++) J_passive[i]=reCast<IssmPDouble>(J[i]);
     92        femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,JEnum,J_passive,num,2,1,0));
     93        xDelete<IssmPDouble>(J_passive);
     94        #else
    9095        femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,JEnum,output,num,2,1,0));
     96        #endif
    9197
    9298        /*Clean up and return*/
Note: See TracChangeset for help on using the changeset viewer.