Changeset 27102
- Timestamp:
- 06/24/22 06:08:08 (3 years ago)
- Location:
- issm/trunk-jpl/src/c
- Files:
-
- 85 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/analyses/AdjointHorizAnalysis.cpp
r27031 r27102 3362 3362 element->AddInput(AdjointpEnum,lambdap,element->PressureInterpolation()); 3363 3363 3364 /*Free res sources:*/3364 /*Free resources:*/ 3365 3365 xDelete<int>(vdoflist); 3366 3366 xDelete<int>(pdoflist); … … 3414 3414 element->AddInput(AdjointyEnum,lambday,element->GetElementType()); 3415 3415 3416 /*Free res sources:*/3416 /*Free resources:*/ 3417 3417 xDelete<IssmDouble>(values); 3418 3418 xDelete<IssmDouble>(lambdax); … … 3483 3483 element->AddInput(AdjointyEnum,lambday,element->GetElementType()); 3484 3484 3485 /*Free res sources:*/3485 /*Free resources:*/ 3486 3486 xDelete<IssmDouble>(values); 3487 3487 xDelete<IssmDouble>(lambdax); -
issm/trunk-jpl/src/c/analyses/DamageEvolutionAnalysis.cpp
r26468 r27102 714 714 } 715 715 716 /*Free res sources:*/716 /*Free resources:*/ 717 717 xDelete<IssmDouble>(newdamage); 718 718 xDelete<int>(doflist); -
issm/trunk-jpl/src/c/analyses/EnthalpyAnalysis.cpp
r26463 r27102 76 76 } 77 77 78 /*Free res sources:*/78 /*Free resources:*/ 79 79 iomodel->DeleteData(spcvector,"md.thermal.spctemperature"); 80 80 iomodel->DeleteData(spcvectorstatic,"md.thermal.spctemperature"); … … 348 348 } 349 349 350 /*Free res sources:*/350 /*Free resources:*/ 351 351 xDelete<int>(indices); 352 352 delete gauss; … … 1358 1358 } 1359 1359 1360 /*Free res sources:*/1360 /*Free resources:*/ 1361 1361 xDelete<int>(indices); 1362 1362 xDelete<int>(indicesup); … … 1432 1432 } 1433 1433 1434 /*Free res sources:*/1434 /*Free resources:*/ 1435 1435 xDelete<int>(indices); 1436 1436 xDelete<int>(indicesup); … … 1614 1614 } 1615 1615 1616 /*Free res sources:*/1616 /*Free resources:*/ 1617 1617 xDelete<IssmDouble>(values); 1618 1618 xDelete<IssmDouble>(pressure); -
issm/trunk-jpl/src/c/analyses/EsaAnalysis.cpp
r26296 r27102 144 144 ISSM_MPI_Allgatherv(U_elastic_local, m, ISSM_MPI_DOUBLE, U_elastic, recvcounts, displs, ISSM_MPI_DOUBLE,IssmComm::GetComm()); 145 145 ISSM_MPI_Allgatherv(H_elastic_local, m, ISSM_MPI_DOUBLE, H_elastic, recvcounts, displs, ISSM_MPI_DOUBLE,IssmComm::GetComm()); 146 /* free ressources: */146 /*Free resources: */ 147 147 xDelete<int>(recvcounts); 148 148 xDelete<int>(displs); … … 156 156 parameters->AddObject(new DoubleVecParam(EsaHElasticEnum,H_elastic,M)); 157 157 158 /* free ressources: */158 /*Free resources: */ 159 159 xDelete<IssmDouble>(love_h); 160 160 xDelete<IssmDouble>(love_l); -
issm/trunk-jpl/src/c/analyses/FreeSurfaceBaseAnalysis.cpp
r26986 r27102 42 42 } 43 43 44 /* free ressources: */44 /*Free resources: */ 45 45 iomodel->DeleteData(vertex_pairing,"md.masstransport.vertex_pairing"); 46 46 iomodel->DeleteData(nodeonbase,"md.mesh.vertexonbase"); -
issm/trunk-jpl/src/c/analyses/FreeSurfaceTopAnalysis.cpp
r26896 r27102 42 42 } 43 43 44 /* free ressources: */44 /*Free resources: */ 45 45 iomodel->DeleteData(vertex_pairing,"md.masstransport.vertex_pairing"); 46 46 iomodel->DeleteData(nodeonsurface,"md.mesh.vertexonsurface"); -
issm/trunk-jpl/src/c/analyses/HydrologyDCEfficientAnalysis.cpp
r26468 r27102 419 419 element->AddBasalInput(EplHeadSubstepEnum,eplHeads,P1Enum); 420 420 421 /*Free res sources:*/421 /*Free resources:*/ 422 422 xDelete<IssmDouble>(eplHeads); 423 423 xDelete<int>(doflist); -
issm/trunk-jpl/src/c/analyses/HydrologyDCInefficientAnalysis.cpp
r26090 r27102 518 518 element->AddBasalInput(SedimentHeadResidualEnum,residual,P1Enum); 519 519 520 /*Free res sources:*/520 /*Free resources:*/ 521 521 xDelete<IssmDouble>(values); 522 522 xDelete<IssmDouble>(residual); -
issm/trunk-jpl/src/c/analyses/HydrologyShreveAnalysis.cpp
r26468 r27102 320 320 element->AddInput(AccumulatedDeltaTwsEnum,deltawatercolumn,P1Enum); 321 321 322 /*Free res sources:*/322 /*Free resources:*/ 323 323 xDelete<IssmDouble>(oldwatercolumn); 324 324 xDelete<IssmDouble>(deltawatercolumn); -
issm/trunk-jpl/src/c/analyses/LevelsetAnalysis.cpp
r27026 r27102 891 891 } 892 892 893 /*Free res sources:*/893 /*Free resources:*/ 894 894 delete vec_constraint_nodes; 895 895 -
issm/trunk-jpl/src/c/analyses/MasstransportAnalysis.cpp
r26837 r27102 86 86 } 87 87 88 /* free ressources: */88 /*Free resources: */ 89 89 iomodel->DeleteData(vertex_pairing,"md.masstransport.vertex_pairing"); 90 90 iomodel->DeleteData(nodeonbase,"md.mesh.vertexonbase"); … … 928 928 element->AddBasalInput(BaseEnum,newbase,P1Enum); 929 929 930 /*Free res sources:*/930 /*Free resources:*/ 931 931 xDelete<IssmDouble>(newthickness); 932 932 xDelete<IssmDouble>(newbase); -
issm/trunk-jpl/src/c/analyses/OceantransportAnalysis.cpp
r26468 r27102 147 147 solution->SetValues(numdof,doflist,values,INS_VAL); 148 148 149 /*Free res sources:*/149 /*Free resources:*/ 150 150 delete gauss; 151 151 xDelete<int>(doflist); … … 197 197 element->AddInput(StrEnum,&strmean,P0Enum); 198 198 199 /*Free res sources:*/199 /*Free resources:*/ 200 200 xDelete<IssmDouble>(bp); 201 201 xDelete<IssmDouble>(str); -
issm/trunk-jpl/src/c/analyses/SamplingAnalysis.cpp
r26747 r27102 289 289 element->AddInput(SampleEnum,newsample,element->GetElementType()); 290 290 291 /*Free res sources:*/291 /*Free resources:*/ 292 292 xDelete<IssmDouble>(newsample); 293 293 xDelete<IssmDouble>(tau); -
issm/trunk-jpl/src/c/analyses/StressbalanceAnalysis.cpp
r27031 r27102 502 502 } 503 503 504 /* free ressources: */504 /*Free resources: */ 505 505 iomodel->DeleteData(penalties,"md.stressbalance.vertex_pairing"); 506 506 … … 1308 1308 solution->SetValues(numdof,doflist,values,INS_VAL); 1309 1309 1310 /*Free res sources:*/1310 /*Free resources:*/ 1311 1311 delete gauss; 1312 1312 xDelete<IssmDouble>(values); … … 2143 2143 element->AddBasalInput(VelEnum,vel,element->GetElementType()); 2144 2144 2145 /*Free res sources:*/2145 /*Free resources:*/ 2146 2146 xDelete<IssmDouble>(vel); 2147 2147 xDelete<IssmDouble>(vz); … … 2749 2749 element->AddBasalInput(VyBaseEnum,vy,element->GetElementType()); 2750 2750 2751 /*Free res sources:*/2751 /*Free resources:*/ 2752 2752 xDelete<IssmDouble>(vel); 2753 2753 xDelete<IssmDouble>(vz); … … 3275 3275 } 3276 3276 3277 /*Free res sources:*/3277 /*Free resources:*/ 3278 3278 xDelete<IssmDouble>(vel); 3279 3279 xDelete<IssmDouble>(vx); … … 3343 3343 solution->SetValues(numdof,doflist,values,INS_VAL); 3344 3344 3345 /*Free res sources:*/3345 /*Free resources:*/ 3346 3346 delete gauss; 3347 3347 xDelete<IssmDouble>(values); … … 3992 3992 element->AddInput(VelEnum,vel,element->GetElementType()); 3993 3993 3994 /*Free res sources:*/3994 /*Free resources:*/ 3995 3995 xDelete<IssmDouble>(vel); 3996 3996 xDelete<IssmDouble>(vz); … … 6505 6505 if(pnumdof>0) solution->SetValues(pnumdof,pdoflist,pvalues,INS_VAL); 6506 6506 6507 /*Free res sources:*/6507 /*Free resources:*/ 6508 6508 delete gauss; 6509 6509 xDelete<int>(pdoflist); … … 6668 6668 if(dim==3) element->AddInput(VzEnum,vz,v_interp); 6669 6669 6670 /*Free res sources:*/6670 /*Free resources:*/ 6671 6671 xDelete<IssmDouble>(pressure); 6672 6672 xDelete<IssmDouble>(vel); … … 8566 8566 element->AddInput(PressureEnum,pressure,P1Enum); 8567 8567 8568 /*Free res sources:*/8568 /*Free resources:*/ 8569 8569 xDelete<IssmDouble>(pressure); 8570 8570 xDelete<IssmDouble>(vel); … … 8669 8669 element->AddInput(PressureEnum,pressure,P1Enum); 8670 8670 8671 /*Free res sources:*/8671 /*Free resources:*/ 8672 8672 xDelete<IssmDouble>(pressure); 8673 8673 xDelete<IssmDouble>(vel); … … 8760 8760 element->AddInput(PressureEnum,pressure,P1Enum); 8761 8761 8762 /*Free res sources:*/8762 /*Free resources:*/ 8763 8763 xDelete<IssmDouble>(surface); 8764 8764 xDelete<IssmDouble>(pressure); -
issm/trunk-jpl/src/c/analyses/StressbalanceSIAAnalysis.cpp
r27031 r27102 554 554 solution->SetValues(numdof,doflist,values,INS_VAL); 555 555 556 /*Free res sources:*/556 /*Free resources:*/ 557 557 delete gauss; 558 558 xDelete<int>(doflist); … … 630 630 element->AddInput(PressureEnum,pressure,P1Enum); 631 631 632 /*Free res sources:*/632 /*Free resources:*/ 633 633 xDelete<IssmDouble>(thickness); 634 634 xDelete<IssmDouble>(surface); -
issm/trunk-jpl/src/c/analyses/StressbalanceVerticalAnalysis.cpp
r27031 r27102 657 657 element->AddInput(VelEnum,vel,P1Enum); 658 658 659 /*Free res sources:*/659 /*Free resources:*/ 660 660 xDelete<IssmDouble>(surface); 661 661 xDelete<IssmDouble>(pressure); -
issm/trunk-jpl/src/c/analyses/ThermalAnalysis.cpp
r26329 r27102 65 65 } 66 66 67 /*Free res sources:*/67 /*Free resources:*/ 68 68 iomodel->DeleteData(spcvector,"md.thermal.spctemperature"); 69 69 iomodel->DeleteData(spcvectorstatic,"md.thermal.spctemperature"); … … 839 839 } 840 840 841 /*Free res sources:*/841 /*Free resources:*/ 842 842 xDelete<IssmDouble>(values); 843 843 xDelete<IssmDouble>(surface); -
issm/trunk-jpl/src/c/analyses/UzawaPressureAnalysis.cpp
r26047 r27102 287 287 } 288 288 289 /*Free res sources:*/289 /*Free resources:*/ 290 290 xDelete<IssmDouble>(values); 291 291 xDelete<IssmDouble>(valueslambda); -
issm/trunk-jpl/src/c/classes/Dakota/IssmDirectApplicInterface.h
r19634 r27102 118 118 } 119 119 120 /*Free res sources:*/120 /*Free resources:*/ 121 121 xDelete<IssmDouble>(variables); 122 122 for(i=0;i<numACV;i++){ -
issm/trunk-jpl/src/c/classes/Dakota/IssmParallelDirectApplicInterface.cpp
r26468 r27102 134 134 } 135 135 136 /*Free res sources:*/136 /*Free resources:*/ 137 137 xDelete<IssmDouble>(variables); 138 138 for(i=0;i<numACV;i++){ -
issm/trunk-jpl/src/c/classes/Elements/Element.cpp
r27031 r27102 1533 1533 solution->SetValues(numnodes,doflist,values,INS_VAL); 1534 1534 1535 /*Free res sources:*/1535 /*Free resources:*/ 1536 1536 xDelete<int>(doflist); 1537 1537 xDelete<IssmDouble>(values); -
issm/trunk-jpl/src/c/classes/Elements/ElementHook.cpp
r25523 r27102 120 120 if(this->hneighbors)this->hneighbors->Marshall(marshallhandle); 121 121 122 /*Free res sources: */122 /*Free resources: */ 123 123 if(hnodesi_null) xDelete<bool>(hnodesi_null); 124 124 -
issm/trunk-jpl/src/c/classes/Elements/Penta.cpp
r27031 r27102 2604 2604 this->AddInput(enum_type,values,this->element_type); 2605 2605 2606 /*Free res sources:*/2606 /*Free resources:*/ 2607 2607 xDelete<IssmDouble>(values); 2608 2608 xDelete<int>(doflist); … … 2645 2645 } 2646 2646 2647 /*Free res sources:*/2647 /*Free resources:*/ 2648 2648 xDelete<int>(doflist); 2649 2649 } … … 2699 2699 inputs->SetPentaInput(name,P1Enum,NUMVERTICES,lidlist,values); 2700 2700 2701 /*Free res sources:*/2701 /*Free resources:*/ 2702 2702 xDelete<int>(doflist); 2703 2703 return; … … 2712 2712 inputs->SetPentaInput(name,P1Enum,NUMVERTICES,lidlist,values); 2713 2713 2714 /*Free res sources:*/2714 /*Free resources:*/ 2715 2715 xDelete<int>(doflist); 2716 2716 return; -
issm/trunk-jpl/src/c/classes/Elements/Tetra.cpp
r26998 r27102 446 446 this->AddInput(enum_type,values,this->element_type); 447 447 448 /*Free res sources:*/448 /*Free resources:*/ 449 449 xDelete<IssmDouble>(values); 450 450 xDelete<int>(doflist); -
issm/trunk-jpl/src/c/classes/Elements/Tria.cpp
r27097 r27102 2018 2018 else for(int i=0;i<NUMVERTICES;i++)weights[i]=0; 2019 2019 2020 /* free ressources:*/2020 /*Free resources:*/ 2021 2021 delete gauss; 2022 2022 … … 3905 3905 this->AddInput(enum_type,values,this->element_type); 3906 3906 3907 /*Free res sources:*/3907 /*Free resources:*/ 3908 3908 xDelete<IssmDouble>(values); 3909 3909 xDelete<int>(doflist); … … 6044 6044 pY->SetValues(gsize,indices,Y_values,ADD_VAL); 6045 6045 6046 /* free ressources:*/6046 /*Free resources:*/ 6047 6047 xDelete<int>(indices); 6048 6048 xDelete<IssmDouble>(U_values); xDelete<IssmDouble>(N_values); xDelete<IssmDouble>(E_values); … … 6206 6206 pEast->SetValues(gsize,indices,E_values,ADD_VAL); 6207 6207 6208 /* free ressources:*/6208 /*Free resources:*/ 6209 6209 xDelete<int>(indices); 6210 6210 xDelete<IssmDouble>(U_values); xDelete<IssmDouble>(N_values); xDelete<IssmDouble>(E_values); … … 6313 6313 } 6314 6314 6315 /*Free res sources: */6315 /*Free resources: */ 6316 6316 xDelete<IssmDouble>(hes); 6317 6317 xDelete<IssmDouble>(times); … … 6669 6669 } 6670 6670 } 6671 /*Free res sources:*/6671 /*Free resources:*/ 6672 6672 xDelete<IssmDouble>(LoveRotRSL); 6673 6673 xDelete<IssmDouble>(LoveRotU); … … 7397 7397 barycontrib->Set(this->Sid(),bslcice,bslchydro,bslcbp); 7398 7398 7399 /*Free res sources:*/7399 /*Free resources:*/ 7400 7400 xDelete<IssmDouble>(areae); 7401 7401 … … 7716 7716 this->inputs->SetArrayInput(viscousenum,this->lid,viscousfield,3*viscousnumsteps); 7717 7717 7718 /*Free res sources:*/7718 /*Free resources:*/ 7719 7719 xDelete<IssmDouble>(grdfieldinterp); 7720 7720 } … … 7736 7736 for(i=0;i<NUMVERTICES;i++) grdfieldout[i]=grdfield[i*nt+0]; 7737 7737 } 7738 /*Free res sources:*/7738 /*Free resources:*/ 7739 7739 xDelete<IssmDouble>(grdfield); 7740 7740 -
issm/trunk-jpl/src/c/classes/FemModel.cpp
r27031 r27102 283 283 pfclose(restartfid,restartfilename); 284 284 285 /*Free res sources: */285 /*Free resources: */ 286 286 xDelete<char>(femmodel_buffer); 287 287 xDelete<char>(restartfilename); … … 634 634 pfclose(restartfid,restartfilename); 635 635 636 /*Free res sources: */636 /*Free resources: */ 637 637 xDelete<char>(restartfilename); 638 638 xDelete<char>(femmodel_buffer); … … 1803 1803 mass_flux=all_mass_flux; 1804 1804 1805 /*Free res sources:*/1805 /*Free resources:*/ 1806 1806 for(i=0;i<M;i++){ 1807 1807 IssmDouble* matrix=array[i]; … … 3165 3165 InputUpdateFromVectorx(this,vz,VzMeshEnum,VertexPIdEnum); 3166 3166 3167 /*Free res sources:*/3167 /*Free resources:*/ 3168 3168 delete vx; 3169 3169 delete vy; … … 4617 4617 } 4618 4618 4619 /*Free res sources:*/4619 /*Free resources:*/ 4620 4620 xDelete<double>(vertex_response); 4621 4621 xDelete<double>(qmu_response); … … 4668 4668 /*}}}*/ 4669 4669 4670 /*Free res sources:*/4670 /*Free resources:*/ 4671 4671 for(i=0;i<response_partitions_num;i++){ 4672 4672 IssmDouble* matrix=response_partitions[i]; … … 4712 4712 pY->Assemble(); 4713 4713 4714 /*Free res sources:*/4714 /*Free resources:*/ 4715 4715 xDelete<IssmDouble>(xx); 4716 4716 xDelete<IssmDouble>(yy); … … 4746 4746 pEast->Assemble(); 4747 4747 4748 /*Free res sources:*/4748 /*Free resources:*/ 4749 4749 xDelete<IssmDouble>(latitude); 4750 4750 xDelete<IssmDouble>(longitude); -
issm/trunk-jpl/src/c/classes/IoModel.cpp
r26556 r27102 1180 1180 integer_matrix=NULL; 1181 1181 } 1182 /*Free res sources:*/1182 /*Free resources:*/ 1183 1183 xDelete<IssmPDouble>(matrix); 1184 1184 … … 1747 1747 } 1748 1748 1749 /*Free res sources*/1749 /*Free resources:*/ 1750 1750 xDelete<IssmDouble>(doublearray); 1751 1751 } … … 1947 1947 break; 1948 1948 } 1949 /*Free res sources*/1949 /*Free resources:*/ 1950 1950 xDelete<IssmDouble>(doublearray); 1951 1951 } … … 2026 2026 break; 2027 2027 } 2028 /*Free res sources*/2028 /*Free resources:*/ 2029 2029 xDelete<IssmDouble>(doublearray); 2030 2030 } … … 2260 2260 } 2261 2261 } 2262 /*Free res sources:*/2262 /*Free resources:*/ 2263 2263 xDelete<int>(codes); 2264 2264 xDelete<fpos_t>(file_positions); … … 2313 2313 } 2314 2314 2315 /*Free res sources:*/2315 /*Free resources:*/ 2316 2316 xDelete<fpos_t>(file_positions); 2317 2317 xDelete<int>(codes); … … 2366 2366 } 2367 2367 2368 /*Free res sources:*/2368 /*Free resources:*/ 2369 2369 xDelete<fpos_t>(file_positions); 2370 2370 xDelete<int>(codes); … … 2455 2455 } 2456 2456 2457 /*Free res sources:*/2457 /*Free resources:*/ 2458 2458 xDelete<fpos_t>(file_positions); 2459 2459 xDelete<int>(codes); … … 2558 2558 } 2559 2559 2560 /*Free res sources:*/2560 /*Free resources:*/ 2561 2561 xDelete<fpos_t>(file_positions); 2562 2562 xDelete<int>(codes); -
issm/trunk-jpl/src/c/classes/Materials/Matlitho.cpp
r26234 r27102 88 88 for (int i=0;i<this->numlayers;i++)this->issolid[i]=reCast<bool,IssmDouble>(issolidd[i]);*/ 89 89 90 /* free ressources: */90 /*Free resources: */ 91 91 xDelete<IssmDouble>(rheologymodeld); 92 92 xDelete<IssmDouble>(issolidd); -
issm/trunk-jpl/src/c/classes/Misfit.cpp
r25539 r27102 178 178 misfit=sqrt(misfit_t/count); 179 179 180 /*Free res sources:*/180 /*Free resources:*/ 181 181 xDelete<IssmDouble>(model); 182 182 xDelete<IssmDouble>(observation); … … 213 213 if(time==finaltime)this->lock=1; 214 214 215 /*Free res sources:*/215 /*Free resources:*/ 216 216 xDelete<IssmDouble>(model); 217 217 xDelete<IssmDouble>(observation); -
issm/trunk-jpl/src/c/classes/Node.cpp
r27031 r27102 838 838 else doflist=NULL; 839 839 840 /*Free res sources:*/840 /*Free resources:*/ 841 841 xDelete<int>(ndof_list); 842 842 } -
issm/trunk-jpl/src/c/classes/Params/Parameters.cpp
r25652 r27102 656 656 strcpy(outstring,strings[found]); 657 657 658 /*Free res sources*/658 /*Free resources:*/ 659 659 for(i=0;i<numanalyses;i++){ 660 660 xDelete<char>(toolkits[i]); -
issm/trunk-jpl/src/c/classes/Vertices.cpp
r25554 r27102 168 168 IssmDouble* lon_serial=lon->ToMPISerial(); 169 169 170 /* free ressources: */170 /*Free resources: */ 171 171 *plat = lat_serial; 172 172 *plon = lon_serial; -
issm/trunk-jpl/src/c/classes/gauss/GaussSeg.cpp
r25446 r27102 43 43 } 44 44 45 /*Free res sources: */45 /*Free resources: */ 46 46 xDelete<IssmPDouble>(pcoords1); 47 47 xDelete<IssmPDouble>(pweights); -
issm/trunk-jpl/src/c/classes/matrix/ElementMatrix.cpp
r26917 r27102 162 162 pf->SetValues(fsize,this->fglobaldoflist,localvalues,ADD_VAL); 163 163 164 /*Free res sources:*/164 /*Free resources:*/ 165 165 xDelete<IssmDouble>(localvalues); 166 166 } -
issm/trunk-jpl/src/c/cores/ResetBoundaryConditions.cpp
r23481 r27102 25 25 UpdateDynamicConstraintsx(femmodel->constraints,femmodel->nodes,femmodel->parameters,yg); 26 26 27 /*Free res sources:*/27 /*Free resources:*/ 28 28 delete yg; 29 29 } -
issm/trunk-jpl/src/c/cores/adgradient_core.cpp
r23250 r27102 168 168 if(VerboseAutodiff())_printf0_(" end ad core\n"); 169 169 170 /* delete the allocated space for the parameters and free ressources:{{{*/170 /* delete the allocated space for the parameters and Free resources:{{{*/ 171 171 xDelete(anEDF_for_solverx_p->dp_x); 172 172 xDelete(anEDF_for_solverx_p->dp_X); -
issm/trunk-jpl/src/c/cores/control_core.cpp
r26468 r27102 107 107 } 108 108 109 /*Free res sources: */109 /*Free resources: */ 110 110 xDelete<int>(control_type); 111 111 xDelete<int>(maxiter); … … 189 189 _printf0_("\n"); 190 190 191 /*Free res sources:*/191 /*Free resources:*/ 192 192 xDelete<IssmDouble>(XU); 193 193 xDelete<IssmDouble>(XL); -
issm/trunk-jpl/src/c/cores/dakota_core.cpp
r26468 r27102 228 228 OutputResultsx(femmodel); 229 229 230 /*Free res sources:*/230 /*Free resources:*/ 231 231 DakotaFree(&d_variables,&d_variables_descriptors,&responses_descriptors, d_numvariables, numresponsedescriptors); 232 232 -
issm/trunk-jpl/src/c/cores/esa_core.cpp
r26468 r27102 106 106 if(solution_type==EsaSolutionEnum)femmodel->RequestedDependentsx(); 107 107 108 /*Free res sources:*/108 /*Free resources:*/ 109 109 delete U_radial; 110 110 delete U_north; -
issm/trunk-jpl/src/c/cores/groundingline_core.cpp
r26826 r27102 40 40 if(save_results) femmodel->RequestedOutputsx(&femmodel->results,requested_outputs,numoutputs); 41 41 42 /*Free res sources:*/42 /*Free resources:*/ 43 43 if(numoutputs){for(int i=0;i<numoutputs;i++){xDelete<char>(requested_outputs[i]);} xDelete<char*>(requested_outputs);} 44 44 -
issm/trunk-jpl/src/c/cores/hydrology_core.cpp
r26651 r27102 236 236 } 237 237 } 238 /*Free res sources:*/238 /*Free resources:*/ 239 239 if(numoutputs){ 240 240 for(int i=0;i<numoutputs;i++){ -
issm/trunk-jpl/src/c/cores/masstransport_core.cpp
r26894 r27102 97 97 if(solution_type==MasstransportSolutionEnum)femmodel->RequestedDependentsx(); 98 98 99 /*Free res sources:*/99 /*Free resources:*/ 100 100 if(numoutputs){for(int i=0;i<numoutputs;i++){xDelete<char>(requested_outputs[i]);} xDelete<char*>(requested_outputs);} 101 101 -
issm/trunk-jpl/src/c/cores/oceantransport_core.cpp
r26468 r27102 52 52 femmodel->profiler->Stop(OCEANTRANSPORTCORE); 53 53 54 /* free ressources:*/54 /*Free resources:*/ 55 55 delete ug; 56 56 -
issm/trunk-jpl/src/c/cores/sampling_core.cpp
r26747 r27102 69 69 if(solution_type==SamplingSolutionEnum)femmodel->RequestedDependentsx(); 70 70 71 /*Free res sources:*/71 /*Free resources:*/ 72 72 if(numoutputs){for(int i=0;i<numoutputs;i++){xDelete<char>(requested_outputs[i]);} xDelete<char*>(requested_outputs);} 73 73 -
issm/trunk-jpl/src/c/cores/smb_core.cpp
r25680 r27102 108 108 if(solution_type==SmbSolutionEnum)femmodel->RequestedDependentsx(); 109 109 110 /*Free res sources:*/110 /*Free resources:*/ 111 111 if(numoutputs){for(int i=0;i<numoutputs;i++){xDelete<char>(requested_outputs[i]);} xDelete<char*>(requested_outputs);} 112 112 -
issm/trunk-jpl/src/c/cores/steadystate_core.cpp
r25680 r27102 81 81 } 82 82 83 /*Free res sources:*/83 /*Free resources:*/ 84 84 delete tg_old; 85 85 delete ug_old; -
issm/trunk-jpl/src/c/cores/stressbalance_core.cpp
r27031 r27102 98 98 if(solution_type==StressbalanceSolutionEnum && !control_analysis)femmodel->RequestedDependentsx(); 99 99 100 /*Free res sources:*/100 /*Free resources:*/ 101 101 if(numoutputs){for(int i=0;i<numoutputs;i++){xDelete<char>(requested_outputs[i]);} xDelete<char*>(requested_outputs);} 102 102 -
issm/trunk-jpl/src/c/cores/thermal_core.cpp
r25680 r27102 53 53 } 54 54 55 /*Free res sources:*/55 /*Free resources:*/ 56 56 if(numoutputs){for(int i=0;i<numoutputs;i++){xDelete<char>(requested_outputs[i]);} xDelete<char*>(requested_outputs);} 57 57 -
issm/trunk-jpl/src/c/cores/transient_core.cpp
r26938 r27102 249 249 femmodel->RequestedOutputsx(&femmodel->results,requested_outputs,numoutputs,save_results); 250 250 251 /*Free res sources:*/251 /*Free resources:*/ 252 252 for(int i=0;i<numoutputs;i++){xDelete<char>(requested_outputs[i]);} xDelete<char*>(requested_outputs); 253 253 } -
issm/trunk-jpl/src/c/main/issm_ocean.cpp
r23066 r27102 62 62 ExceptionTrapEnd(); 63 63 64 /*Free res sources:*/64 /*Free resources:*/ 65 65 66 66 /*Return unix success: */ -
issm/trunk-jpl/src/c/main/issm_slc.cpp
r26047 r27102 122 122 ExceptionTrapEnd(); 123 123 124 /*Free res sources:*/124 /*Free resources:*/ 125 125 xDelete<int>(commsizes); 126 126 for(int i=0;i<nummodels;i++){ -
issm/trunk-jpl/src/c/main/kriging.cpp
r25554 r27102 68 68 WriteLockFile(lockfilename); 69 69 70 /*Free res sources*/70 /*Free resources: */ 71 71 xDelete<char>(lockfilename); 72 72 xDelete<char>(binfilename); -
issm/trunk-jpl/src/c/modules/AllocateSystemMatricesx/AllocateSystemMatricesx.cpp
r26144 r27102 77 77 } 78 78 79 /*Free res sources: */79 /*Free resources: */ 80 80 xDelete<char>(toolkittype); 81 81 -
issm/trunk-jpl/src/c/modules/AverageOntoPartitionx/AverageOntoPartitionx.cpp
r25539 r27102 45 45 average=vec_average->ToMPISerial(); 46 46 47 /*Free res sources:*/47 /*Free resources:*/ 48 48 delete partition_contributions; 49 49 delete partition_areas; -
issm/trunk-jpl/src/c/modules/ElementCoordinatesx/ElementCoordinatesx.cpp
r26222 r27102 37 37 IssmDouble* areae=vareae->ToMPISerial(); 38 38 39 /*Free res sources: */39 /*Free resources: */ 40 40 delete vxe; 41 41 delete vye; … … 79 79 IssmDouble* areae=vareae->ToMPISerial(); 80 80 81 /*Free res sources: */81 /*Free resources: */ 82 82 delete vlonge; 83 83 delete vlate; -
issm/trunk-jpl/src/c/modules/GetVectorFromInputsx/GetVectorFromInputsx.cpp
r25539 r27102 109 109 vector=vec_vector->ToMPISerial(); 110 110 111 /*Free res sources:*/111 /*Free resources:*/ 112 112 delete vec_vector; 113 113 … … 126 126 vector=vec_vector->ToMPISerial(); 127 127 128 /*Free res sources:*/128 /*Free resources:*/ 129 129 delete vec_vector; 130 130 -
issm/trunk-jpl/src/c/modules/GiaDeflectionCorex/GiaDeflectionCorex.cpp
r26101 r27102 106 106 *pdwidt=reCast<IssmDouble>(blocks_.aswokm_dwdt); 107 107 108 /*Free res sources: */108 /*Free resources: */ 109 109 xDelete<IssmPDouble>(blockt_time); 110 110 xDelete<IssmPDouble>(blockt_bi); -
issm/trunk-jpl/src/c/modules/Gradjx/Gradjx.cpp
r25539 r27102 89 89 IssmDouble* gradient=vec_gradient->ToMPISerial(); 90 90 91 /*Free res sourcesand assign output pointer*/91 /*Free resources: and assign output pointer*/ 92 92 delete vec_gradient; 93 93 *pgradient=gradient; -
issm/trunk-jpl/src/c/modules/GroundinglineMigrationx/GroundinglineMigrationx.cpp
r25539 r27102 177 177 } 178 178 179 /*Free res sources:*/179 /*Free resources:*/ 180 180 delete vec_phi; 181 181 xDelete<IssmDouble>(elements_neighboring_floatingce); -
issm/trunk-jpl/src/c/modules/InputUpdateFromDakotax/InputUpdateFromDakotax.cpp
r26468 r27102 145 145 femmodel->results->AddResult(new GenericExternalResult<IssmPDouble*>(femmodel->results->Size()+1,"uq_variables",variables,numdakotavariables,1,1,0)); 146 146 147 /*Free res sources:*/147 /*Free resources:*/ 148 148 for(i=0;i<variable_partitions_num;i++){ 149 149 IssmDouble* matrix=variable_partitions[i]; -
issm/trunk-jpl/src/c/modules/InputUpdateFromVectorDakotax/InputUpdateFromVectorDakotax.cpp
r25539 r27102 12 12 InputUpdateFromVectorDakotax(femmodel,serial_vector,name, type); 13 13 14 /*Free res sources:*/14 /*Free resources:*/ 15 15 xDelete<double>(serial_vector); 16 16 } -
issm/trunk-jpl/src/c/modules/IoModelToConstraintsx/IoModelToConstraintsx.cpp
r26370 r27102 589 589 } 590 590 591 /*Free res sources:*/591 /*Free resources:*/ 592 592 xDelete<IssmDouble>(times); 593 593 xDelete<IssmDouble>(values); … … 723 723 } 724 724 725 /*Free res sources:*/725 /*Free resources:*/ 726 726 xDelete<IssmDouble>(times); 727 727 xDelete<IssmDouble>(values); -
issm/trunk-jpl/src/c/modules/MeshPartitionx/MeshPartitionx.h
r26469 r27102 112 112 *pnpart=npart; 113 113 114 /*Free res sources: */114 /*Free resources: */ 115 115 xDelete<int>(index); 116 116 xDelete<int>(epart2d); -
issm/trunk-jpl/src/c/modules/MeshProfileIntersectionx/MeshProfileIntersectionx.cpp
r23066 r27102 109 109 } 110 110 111 /*Free res sources:*/111 /*Free resources:*/ 112 112 delete segments_dataset; 113 113 -
issm/trunk-jpl/src/c/modules/ModelProcessorx/Autodiff/CreateParametersAutodiff.cpp
r25580 r27102 69 69 parameters->AddObject(theAdolcEDF_p); 70 70 71 /*Free res sources: */71 /*Free resources: */ 72 72 xDelete<char>(options); 73 73 /*}}}*/ … … 96 96 _error_("solver type not supported yet!"); 97 97 } 98 /*Free res sources: */98 /*Free resources: */ 99 99 xDelete<char>(options); 100 100 #endif … … 159 159 } 160 160 161 /*Free res sources:*/161 /*Free resources:*/ 162 162 for(i=0;i<num_dependent_objects;i++){ 163 163 char* string=names[i]; xDelete<char>(string); -
issm/trunk-jpl/src/c/modules/ModelProcessorx/CreateElementsVerticesAndMaterials.cpp
r27097 r27102 291 291 } 292 292 } 293 //Free res sources:293 //Free resources: 294 294 xDelete<int>(nature); 295 295 break; -
issm/trunk-jpl/src/c/modules/ModelProcessorx/CreateOutputDefinitions.cpp
r26889 r27102 50 50 output_definitions->AddObject(new Massfluxatgate<IssmDouble>(gatenames[j],StringToEnumx(gatedefinitionstrings[j]),gatesegments_M[j],gatesegments[j])); 51 51 } 52 /*Free res sources:*/52 /*Free resources:*/ 53 53 for(j=0;j<numgates;j++){ 54 54 char* string = gatenames[j]; xDelete<char>(string); … … 126 126 } 127 127 128 /*Free res sources:*/128 /*Free resources:*/ 129 129 for(j=0;j<nummisfits;j++){ 130 130 char* string=NULL; … … 217 217 } 218 218 219 /*Free res sources:*/219 /*Free resources:*/ 220 220 for(j=0;j<num_cfsurfacesquares;j++){ 221 221 char* string=NULL; … … 288 288 } 289 289 290 /*Free res sources:*/290 /*Free resources:*/ 291 291 for(j=0;j<num_cfdragcoeffabsgrads;j++){ 292 292 char* string=NULL; … … 374 374 } 375 375 376 /*Free res sources:*/376 /*Free resources:*/ 377 377 for(j=0;j<num_cfsurfacelogvels;j++){ 378 378 char* string=NULL; … … 463 463 } 464 464 465 /*Free res sources:*/465 /*Free resources:*/ 466 466 for(j=0;j<num_cflevelsetmisfits;j++){ 467 467 char* string=NULL; … … 512 512 } 513 513 514 /*Free res sources:*/514 /*Free resources:*/ 515 515 for(j=0;j<numnodalvalues;j++){ 516 516 char* string=NULL; … … 546 546 } 547 547 548 /*Free res sources:*/548 /*Free resources:*/ 549 549 for(j=0;j<nummasscons;j++){ 550 550 char* string=NULL; … … 589 589 } 590 590 591 /*Free res sources:*/591 /*Free resources:*/ 592 592 for(j=0;j<num;j++){ 593 593 char* string=NULL; … … 629 629 } 630 630 631 /*Free res sources:*/631 /*Free resources:*/ 632 632 for(j=0;j<numout;j++){ 633 633 char* string=NULL; … … 707 707 xDelete<char*>(cost_functions); 708 708 709 /*Free res sources:*/709 /*Free resources:*/ 710 710 for(j=0;j<numout;j++){ 711 711 xDelete<char>(ncf_name_s[j]); … … 744 744 parameters->AddObject(new DataSetParam(OutputdefinitionEnum,output_definitions)); 745 745 746 /*Free res sources:*/746 /*Free resources:*/ 747 747 delete output_definitions; 748 748 xDelete<int>(output_definition_enums); -
issm/trunk-jpl/src/c/modules/PointCloudFindNeighborsx/PointCloudFindNeighborsxt.cpp
r15557 r27102 72 72 _printf_("\r loop progress: "<<fixed<<setw(6)<<setprecision(2)<<100.<<"% \n"); 73 73 74 /*Free res sources:*/74 /*Free resources:*/ 75 75 xDelete<bool>(already); 76 76 -
issm/trunk-jpl/src/c/modules/Reduceloadx/Reduceloadx.cpp
r15104 r27102 53 53 } 54 54 55 /*Free res sourcesand return*/55 /*Free resources: and return*/ 56 56 delete y_s0; 57 57 delete Kfsy_s; -
issm/trunk-jpl/src/c/modules/UpdateDynamicConstraintsx/UpdateDynamicConstraintsx.cpp
r25554 r27102 27 27 } 28 28 29 /*Free res sources:*/29 /*Free resources:*/ 30 30 xDelete<IssmDouble>(yg_serial); 31 31 } -
issm/trunk-jpl/src/c/modules/VertexCoordinatesx/VertexCoordinatesx.cpp
r25827 r27102 34 34 IssmDouble* z=vz->ToMPISerial(); 35 35 36 /*Free res sources: */36 /*Free resources: */ 37 37 delete vx; 38 38 delete vy; -
issm/trunk-jpl/src/c/shared/Threads/LaunchThread.cpp
r14917 r27102 56 56 } 57 57 58 /*Free res sources:*/58 /*Free resources:*/ 59 59 xDelete<pthread_t>(threads); 60 60 xDelete<pthread_handle>(handles); -
issm/trunk-jpl/src/c/shared/Triangle/TriangleUtils.cpp
r22498 r27102 232 232 }// for (;;) 233 233 234 /*Free res sources: */234 /*Free resources: */ 235 235 xDelete<int>(GridElements); 236 236 /*Assign output pointers: */ … … 422 422 } 423 423 424 /*Free res sources: */424 /*Free resources: */ 425 425 xDelete<int>(segments); 426 426 -
issm/trunk-jpl/src/c/solutionsequences/solutionsequence_hydro_nonlinear.cpp
r25539 r27102 287 287 femmodel->SetCurrentConfiguration(HydrologyDCInefficientAnalysisEnum); 288 288 InputUpdateFromSolutionx(femmodel,ug_sed); 289 /*Free res sources: */289 /*Free resources: */ 290 290 delete ug_epl; 291 291 delete ug_sed; -
issm/trunk-jpl/src/c/solutionsequences/solutionsequence_thermal_nonlinear.cpp
r23587 r27102 131 131 } 132 132 133 /*Free res sources: */133 /*Free resources: */ 134 134 delete tg; 135 135 delete tf; -
issm/trunk-jpl/src/c/toolkits/issm/IssmMpiDenseMat.h
r26552 r27102 266 266 /*}}}*/ 267 267 268 /*Free res sources:{{{*/268 /*Free resources:{{{*/ 269 269 xDelete<int>(RowRank); 270 270 xDelete<int>(row_indices_forcpu); … … 376 376 } 377 377 378 /*Free res sources: */378 /*Free resources: */ 379 379 xDelete<doubletype>(X_serial); 380 380 } -
issm/trunk-jpl/src/c/toolkits/issm/IssmMpiSparseMat.h
r26552 r27102 292 292 for(int i=0;i<this->m;i++) this->matrix[i]->SetValues(numvalues_perrow[i],cols_perrow[i],values_perrow[i],mods_perrow[i]); 293 293 294 /*Free res sources*/294 /*Free resources:*/ 295 295 xDelete<int>(numvalues_perrow); 296 296 xDelete<int>(RowRank); … … 394 394 } 395 395 396 /*Free res sources: */396 /*Free resources: */ 397 397 xDelete<doubletype>(X_serial); 398 398 } -
issm/trunk-jpl/src/c/toolkits/issm/IssmMpiVec.h
r26552 r27102 279 279 this->isassembled=true; 280 280 281 /*Free res sources:{{{*/281 /*Free resources:{{{*/ 282 282 xDelete<int>(RowRank); 283 283 xDelete<int>(row_indices_forcpu); … … 468 468 /*All gather:*/ 469 469 ISSM_MPI_Allgatherv(this->vector, this->m, TypeToMPIType<doubletype>(), buffer, recvcounts, displs, TypeToMPIType<doubletype>(),comm); 470 /* free ressources: */470 /*Free resources: */ 471 471 xDelete<int>(recvcounts); 472 472 xDelete<int>(displs); -
issm/trunk-jpl/src/c/toolkits/issm/IssmToolkitUtils.cpp
r23237 r27102 48 48 else _error_("matrix type not supported yet!"); 49 49 50 /* free ressources: */50 /*Free resources: */ 51 51 xDelete<char>(mat_type); 52 52 … … 78 78 else _error_("vector type not supported yet!"); 79 79 80 /* free ressources: */80 /*Free resources: */ 81 81 xDelete<char>(vec_type); 82 82 … … 107 107 else _error_("solver type not supported yet!"); 108 108 109 /* free ressources: */109 /*Free resources: */ 110 110 xDelete<char>(solver_type); 111 111 -
issm/trunk-jpl/src/c/toolkits/mpi/commops/DetermineLocalSize.cpp
r15839 r27102 50 50 local_size=num_local_rows[my_rank]; 51 51 52 /* free ressources: */52 /*Free resources: */ 53 53 xDelete<int>(num_local_rows); 54 54 -
issm/trunk-jpl/src/c/toolkits/objects/Matrix.h
r26117 r27102 151 151 } 152 152 153 /*Free res sources: */153 /*Free resources: */ 154 154 xDelete<char>(toolkittype); 155 155 } -
issm/trunk-jpl/src/c/toolkits/objects/Vector.h
r26110 r27102 123 123 } 124 124 125 /*Free res sources: */125 /*Free resources: */ 126 126 xDelete<char>(toolkittype); 127 127 } -
issm/trunk-jpl/src/c/toolkits/petsc/objects/PetscSolver.cpp
r25710 r27102 228 228 } 229 229 230 /*Free res sources:*/230 /*Free resources:*/ 231 231 xDelete<int>(pressure_indices); 232 232 xDelete<int>(velocity_indices); -
issm/trunk-jpl/src/c/toolkits/petsc/patches/MatMultPatch.cpp
r25710 r27102 107 107 VecAssemblyEnd(outvector);; 108 108 109 /*Free res sources:*/109 /*Free resources:*/ 110 110 xDelete<int>(index); 111 111 xDelete<double>(values); -
issm/trunk-jpl/src/c/toolkits/petsc/patches/VecToMPISerial.cpp
r26117 r27102 93 93 *pgathered_vector=gathered_vector; 94 94 95 /* free ressources: */95 /*Free resources: */ 96 96 xDelete<int>(idxn); 97 97 xDelete<double>(local_vector);
Note:
See TracChangeset
for help on using the changeset viewer.