source:
issm/oecreview/Archive/24684-25833/ISSM-24982-24983.diff@
25834
Last change on this file since 25834 was 25834, checked in by , 4 years ago | |
---|---|
File size: 1.2 KB |
-
../trunk-jpl/src/c/cores/sealevelrise_core.cpp
437 437 /*convergence criterion:*/ 438 438 slrconvergence(&converged,RSLg,RSLg_old,eps_rel,eps_abs); 439 439 440 /*if we had bottom pressure loading, add dynamic sea level 441 * to RSL:*/ 442 femmodel->parameters->FindParam(&bp_compute_fingerprints,DslComputeFingerprintsEnum); 443 if(bp_compute_fingerprints){ 444 GetVectorFromInputsx(&BPg,femmodel,DslSeaWaterPressureChangeAtSeaFloor,VertexSIdEnum); 445 RSLg->AXPY(BPg,1); 446 } 447 440 448 441 /*free ressources: */ 449 442 delete RSLgo; 450 443 delete RSLgo_rot; … … 465 458 466 459 } 467 460 if(VerboseConvergence()) _printf0_("\n total number of iterations: " << count-1 << "\n"); 461 462 463 /*if we had bottom pressure loading, add dynamic sea level 464 * to RSL:*/ 465 femmodel->parameters->FindParam(&bp_compute_fingerprints,DslComputeFingerprintsEnum); 466 if(bp_compute_fingerprints){ 467 GetVectorFromInputsx(&BPg,femmodel,DslSeaWaterPressureChangeAtSeaFloor,VertexSIdEnum); 468 RSLg->AXPY(BPg,1); 469 } 468 470 469 471 delete RSLg_old; 470 472 delete BPg;
Note:
See TracBrowser
for help on using the repository browser.