Changeset 19344
- Timestamp:
- 05/07/15 19:37:40 (10 years ago)
- Location:
- issm/trunk-jpl/src/c/cores
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/cores/ad_core.cpp
r18939 r19344 151 151 152 152 /*add to results*/ 153 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,AutodiffJacobianEnum,jacTimesTangentDir,num_dependents,1, 1,0.0));153 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,AutodiffJacobianEnum,jacTimesTangentDir,num_dependents,1,0,0.0)); 154 154 155 155 /*free resources :*/ … … 223 223 224 224 /*add to results: */ 225 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,AutodiffJacobianEnum,*jacTimesSeed,num_dependents*tangentDirNum,1, 1,0.0));225 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,AutodiffJacobianEnum,*jacTimesSeed,num_dependents*tangentDirNum,1,0,0.0)); 226 226 227 227 /*Free resources: */ … … 260 260 261 261 /*add to results*/ 262 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,AutodiffJacobianEnum,weightVectorTimesJac,num_independents,1, 1,0.0));262 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,AutodiffJacobianEnum,weightVectorTimesJac,num_independents,1,0,0.0)); 263 263 264 264 /*free resources :*/ … … 322 322 323 323 /*add to results: */ 324 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,AutodiffJacobianEnum,*weightsTimesJac,weightNum*num_independents,1, 1,0.0));324 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,AutodiffJacobianEnum,*weightsTimesJac,weightNum*num_independents,1,0,0.0)); 325 325 326 326 /*Free resources: */ -
issm/trunk-jpl/src/c/cores/control_core.cpp
r18190 r19344 100 100 IssmPDouble* J_passive=xNew<IssmPDouble>(nsteps); 101 101 for(int i=0;i<nsteps;i++) J_passive[i]=reCast<IssmPDouble>(J[i]); 102 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,JEnum,J_passive,nsteps,1, 1,0));102 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,JEnum,J_passive,nsteps,1,0,0)); 103 103 xDelete<IssmPDouble>(J_passive); 104 104 #else 105 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,JEnum,J,nsteps,1, 1,0));105 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,JEnum,J,nsteps,1,0,0)); 106 106 #endif 107 107 } -
issm/trunk-jpl/src/c/cores/controlad_core.cpp
r19306 r19344 107 107 108 108 /*Save results:*/ 109 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,AutodiffJacobianEnum,G,n,1, 1,0.0));110 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,AutodiffXpEnum,X,intn,1, 1,0.0));109 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,AutodiffJacobianEnum,G,n,1,0,0.0)); 110 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,AutodiffXpEnum,X,intn,1,0,0.0)); 111 111 112 112 /*Clean-up and return*/ -
issm/trunk-jpl/src/c/cores/controlvalidation_core.cpp
r18651 r19344 91 91 IssmPDouble* J_passive=xNew<IssmPDouble>(2*num); 92 92 for(int i=0;i<2*num;i++) J_passive[i]=reCast<IssmPDouble>(output[i]); 93 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,JEnum,J_passive,num,2, 1,0));93 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,JEnum,J_passive,num,2,0,0)); 94 94 xDelete<IssmPDouble>(J_passive); 95 95 #else 96 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,JEnum,output,num,2, 1,0));96 femmodel->results->AddObject(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,JEnum,output,num,2,0,0)); 97 97 #endif 98 98 ControlInputSetGradientx(femmodel->elements,femmodel->nodes,femmodel->vertices,femmodel->loads,femmodel->materials,femmodel->parameters,G);
Note:
See TracChangeset
for help on using the changeset viewer.