[GRASS-SVN] r66202 - grass-addons/grass7/raster/r.mcda.promethee

[svn_grass at osgeo.org]

Author: gianluca
Date: 2015-09-13 14:12:18 -0700 (Sun, 13 Sep 2015)
New Revision: 66202

Modified:
   grass-addons/grass7/raster/r.mcda.promethee/promethee.c
Log:
-

Modified: grass-addons/grass7/raster/r.mcda.promethee/promethee.c
===================================================================
--- grass-addons/grass7/raster/r.mcda.promethee/promethee.c	2015-09-13 21:11:44 UTC (rev 66201)
+++ grass-addons/grass7/raster/r.mcda.promethee/promethee.c	2015-09-13 21:12:18 UTC (rev 66202)
@@ -9,7 +9,8 @@
 
 void build_flow_matrix(int nrows, int ncols, int ncriteria,
                             double *weight_vect, double ***decision_vol,
-                            double **positive_flow_vol, double **negative_flow_vol);
+                            double **positive_flow_vol, double **negative_flow_vol,
+                            double **net_flow_vol);
 
 
 /*
@@ -50,7 +51,8 @@
 
 void build_flow_matrix(int nrows, int ncols, int ncriteria,
                             double *weight_vect, double ***decision_vol,
-                            double **positive_flow_vol, double **negative_flow_vol)
+                            double **positive_flow_vol, double **negative_flow_vol,
+                            double **net_flow_vol)
 {
     int row1, col1, row2, col2;
     int i;
@@ -93,8 +95,11 @@
 			G_message("--");
 			for (col1 = 0; col1 < ncols; col1++)
 				{
+					//G_percent(col1, (ncols), 2);
 					positive_flow_vol[row1][col1]=positive_flow_vol[row1][col1]/ncriteria;
 					negative_flow_vol[row1][col1]=negative_flow_vol[row1][col1]/ncriteria;
+					net_flow_vol[row1][col1]=0; //positive_flow_vol[row1][col1]-negative_flow_vol[row1][col1];
+					//G_message("%f-%f=%f",positive_flow_vol[row1][col1],negative_flow_vol[row1][col1],net_flow_vol[row1][col1]);
 				}
 		}
 }