[GRASS-SVN] r70770 - grass/trunk/raster/r.topmodel

[svn_grass at osgeo.org]

Author: hcho
Date: 2017-03-18 23:16:24 -0700 (Sat, 18 Mar 2017)
New Revision: 70770

Modified:
   grass/trunk/raster/r.topmodel/infiltration.c
Log:
r.topmodel: fix comments

Modified: grass/trunk/raster/r.topmodel/infiltration.c
===================================================================
--- grass/trunk/raster/r.topmodel/infiltration.c	2017-03-19 05:20:03 UTC (rev 70769)
+++ grass/trunk/raster/r.topmodel/infiltration.c	2017-03-19 06:16:24 UTC (rev 70770)
@@ -101,7 +101,7 @@
 	    goto cont2;
 
 	/* infiltration rate is less than rainfall intensity */
-	/* Newton-Raphson iteration to solve Eq. (6) for f */
+	/* Newton-Raphson iteration to solve Eq. (6) for I */
 	/* guess new cumulative infiltration */
 	I = cumI + r * input.dt;
 	for (i = 0; i < MAXITER; i++) {
@@ -160,7 +160,7 @@
 	ponding = 1;
     }
 
-    /* Newton-Raphson iteration to solve Eq. (8) for f */
+    /* Newton-Raphson iteration to solve Eq. (8) for I */
     for (i = 0; i < MAXITER; i++) {
 	IC = I + C;
 	sum = 0.0;