Changeset 24509
- Timestamp:
- 01/10/20 17:47:47 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/modules/SurfaceMassBalancex/Gembx.cpp
r24508 r24509 107 107 } 108 108 109 /*Free res souces:*/109 /*Free resouces:*/ 110 110 xDelete(dzT); 111 111 xDelete(dzB); … … 339 339 } 340 340 341 /*Free res sources:*/341 /*Free resources:*/ 342 342 xDelete<IssmDouble>(gsz); 343 343 xDelete<IssmDouble>(dT); … … 505 505 // a_surf = a_wet - (a_wet - a_surf) * exp(-W_surf/W0); 506 506 507 /*Free res sources:*/507 /*Free resources:*/ 508 508 xDelete<IssmDouble>(t0); 509 509 xDelete<IssmDouble>(T); … … 872 872 } 873 873 874 /*Free res sources:*/874 /*Free resources:*/ 875 875 xDelete<IssmDouble>(K); 876 876 xDelete<IssmDouble>(KU); … … 1019 1019 swf[0] = swf[0]+ swfS[2]; 1020 1020 1021 /*Free res sources: */1021 /*Free resources: */ 1022 1022 xDelete<IssmDouble>(gsz); 1023 1023 xDelete<IssmDouble>(B1_cum); … … 1085 1085 swf[0] += swf_s; 1086 1086 1087 /*Free res sources:*/1087 /*Free resources:*/ 1088 1088 xDelete<IssmDouble>(B_cum); 1089 1089 xDelete<IssmDouble>(exp_B); … … 1266 1266 1267 1267 } 1268 /*Free res sources:*/1268 /*Free resources:*/ 1269 1269 if(mInit)xDelete<IssmDouble>(mInit); 1270 1270 … … 1602 1602 for(int i=0;i<n;i++)dz[i] = m[i] / d[i]; 1603 1603 1604 /*Free res sources:*/1604 /*Free resources:*/ 1605 1605 xDelete<IssmDouble>(F); 1606 1606 xDelete<IssmDouble>(R); … … 1834 1834 #endif 1835 1835 1836 /*Free res sources:*/1836 /*Free resources:*/ 1837 1837 if(m)xDelete<IssmDouble>(m); 1838 1838 if(EI)xDelete<IssmDouble>(EI); … … 2037 2037 } 2038 2038 2039 /*Free res sources:*/2039 /*Free resources:*/ 2040 2040 xDelete<IssmDouble>(mass_init); 2041 2041 xDelete<IssmDouble>(cumdz);
Note:
See TracChangeset
for help on using the changeset viewer.