[issm-svn] r12643 - issm/trunk/src/c/objects/Elements

lemorzad at issm.ess.uci.edu lemorzad at issm.ess.uci.edu
Tue Jul 17 12:10:09 PDT 2012


Author: lemorzad
Date: 2012-07-17 12:10:09 -0700 (Tue, 17 Jul 2012)
New Revision: 12643

Modified:
   issm/trunk/src/c/objects/Elements/Penta.cpp
   issm/trunk/src/c/objects/Elements/Tria.cpp
Log:
minor modification of  PddSurfaceMassBalance

Modified: issm/trunk/src/c/objects/Elements/Penta.cpp
===================================================================
--- issm/trunk/src/c/objects/Elements/Penta.cpp	2012-07-17 18:38:12 UTC (rev 12642)
+++ issm/trunk/src/c/objects/Elements/Penta.cpp	2012-07-17 19:10:09 UTC (rev 12643)
@@ -2261,7 +2261,6 @@
    double monthlytemperatures[NUMVERTICES][12],monthlyprec[NUMVERTICES][12];
    double h[NUMVERTICES],s[NUMVERTICES]; // ,b
    double rho_water,rho_ice;
-   int    i;
 
    /*Recover monthly temperatures and precipitation*/
    Input*     input=inputs->GetInput(SurfaceforcingsMonthlytemperaturesEnum); _assert_(input);
@@ -2289,8 +2288,8 @@
   rho_water=matpar->GetRhoFreshwater();
 
    /*measure the surface mass balance*/
-   for (i = 0; i < NUMVERTICES; i++){
-     agd[i]=PddSurfaceMassBlance(&monthlytemperatures[i][0], &monthlyprec[i][0], pdds, pds, signorm, yts, h[i], s[i], rho_ice, rho_water);
+   for (int iv = 0; iv < NUMVERTICES; iv++){
+     agd[iv]=PddSurfaceMassBlance(&monthlytemperatures[iv][0], &monthlyprec[iv][0], pdds, pds, signorm, yts, h[iv], s[iv], rho_ice, rho_water);
    }
 
    /*Update inputs*/    

Modified: issm/trunk/src/c/objects/Elements/Tria.cpp
===================================================================
--- issm/trunk/src/c/objects/Elements/Tria.cpp	2012-07-17 18:38:12 UTC (rev 12642)
+++ issm/trunk/src/c/objects/Elements/Tria.cpp	2012-07-17 19:10:09 UTC (rev 12643)
@@ -2092,7 +2092,6 @@
    double monthlytemperatures[NUMVERTICES][12],monthlyprec[NUMVERTICES][12];
    double h[NUMVERTICES],s[NUMVERTICES]; // ,b
    double rho_water,rho_ice;
-   int    i;
 
    /*Recover monthly temperatures and precipitation*/
    Input*     input=inputs->GetInput(SurfaceforcingsMonthlytemperaturesEnum); _assert_(input);
@@ -2120,8 +2119,8 @@
   rho_water=matpar->GetRhoFreshwater();
 
    /*measure the surface mass balance*/
-   for (i = 0; i < NUMVERTICES; i++){
-     agd[i]=PddSurfaceMassBlance(&monthlytemperatures[i][0], &monthlyprec[i][0], pdds, pds, signorm, yts, h[i], s[i], rho_ice, rho_water);
+   for (int iv = 0; iv<NUMVERTICES; iv++){
+     agd[iv]=PddSurfaceMassBlance(&monthlytemperatures[iv][0], &monthlyprec[iv][0], pdds, pds, signorm, yts, h[iv], s[iv], rho_ice, rho_water);
    }
 
    /*Update inputs*/    



More information about the issm-svn mailing list