[GRASS-SVN] r70869 - in grass-addons/grass7/raster/r.pi: r.pi.energy.pr r.pi.searchtime.pr

[svn_grass at osgeo.org]

Author: mmetz
Date: 2017-04-12 07:21:35 -0700 (Wed, 12 Apr 2017)
New Revision: 70869

Modified:
   grass-addons/grass7/raster/r.pi/r.pi.energy.pr/search.c
   grass-addons/grass7/raster/r.pi/r.pi.searchtime.pr/search.c
Log:
r.pi: fix search.c for r.pi.energy.pr, r.pi.searchtime.pr

Modified: grass-addons/grass7/raster/r.pi/r.pi.energy.pr/search.c
===================================================================
--- grass-addons/grass7/raster/r.pi/r.pi.energy.pr/search.c	2017-04-12 12:26:41 UTC (rev 70868)
+++ grass-addons/grass7/raster/r.pi/r.pi.energy.pr/search.c	2017-04-12 14:21:35 UTC (rev 70869)
@@ -598,7 +598,7 @@
     /* perform a search run for each fragment */
     for (fragment = 0; fragment < fragcount; fragment++) {
 	if (!(remove_indi && deleted_arr[fragment])) {
-	    frag_run(map, costmap, n, fragment, fragcount, sx, sy);
+	    frag_run(map, costmap, fragment, n, fragcount, sx, sy);
 	}
     }
 

Modified: grass-addons/grass7/raster/r.pi/r.pi.searchtime.pr/search.c
===================================================================
--- grass-addons/grass7/raster/r.pi/r.pi.searchtime.pr/search.c	2017-04-12 12:26:41 UTC (rev 70868)
+++ grass-addons/grass7/raster/r.pi/r.pi.searchtime.pr/search.c	2017-04-12 14:21:35 UTC (rev 70869)
@@ -385,7 +385,6 @@
     if (act_cell > -1 && act_cell != frag && !deleted_arr[act_cell]) {
 	/* count patch immigrants for this patch */
 	patch_imi[act_cell]++;
-	immi_matrix[frag * fragcount + act_cell]++;
 	individual->finished = 1;
     }