[GRASS-SVN] r66740 - grass-addons/grass7/imagery/i.spec.sam

[svn_grass at osgeo.org]

Author: ychemin
Date: 2015-11-04 04:47:04 -0800 (Wed, 04 Nov 2015)
New Revision: 66740

Modified:
   grass-addons/grass7/imagery/i.spec.sam/i.spec.sam.html
   grass-addons/grass7/imagery/i.spec.sam/main.c
Log:
config.h and Lapack/Blas test

Modified: grass-addons/grass7/imagery/i.spec.sam/i.spec.sam.html
===================================================================
--- grass-addons/grass7/imagery/i.spec.sam/i.spec.sam.html	2015-11-04 11:09:30 UTC (rev 66739)
+++ grass-addons/grass7/imagery/i.spec.sam/i.spec.sam.html	2015-11-04 12:47:04 UTC (rev 66740)
@@ -35,3 +35,4 @@
 Updated to GRASS GIS 7: Yann Chemin, 2015
 <p>
 <i>Last changed: $Date$</i>
+

Modified: grass-addons/grass7/imagery/i.spec.sam/main.c
===================================================================
--- grass-addons/grass7/imagery/i.spec.sam/main.c	2015-11-04 11:09:30 UTC (rev 66739)
+++ grass-addons/grass7/imagery/i.spec.sam/main.c	2015-11-04 12:47:04 UTC (rev 66740)
@@ -21,6 +21,15 @@
 #include <stdlib.h>
 #include <strings.h>
 #include <math.h>
+
+#include <grass/config.h>
+#ifndef HAVE_LIBBLAS
+#error GRASS is not configured with BLAS
+#endif
+#ifndef HAVE_LIBLAPACK
+#error GRASS is not configured with LAPACK
+#endif
+
 #include <grass/gis.h>
 #include <grass/raster.h>
 #include <grass/imagery.h>
@@ -171,7 +180,7 @@
 	for (col = 0; col < ncols; col++)             /* cols loop, work pixelwise for all bands */
 	{
 	    /* get pixel values of each band and store in b vector: */
-	     /*b = v_get(A->m);                   /* dimension of vector = matrix size = Ref.nfiles*/
+	     /*b = v_get(A->m);*/                   /* dimension of vector = matrix size = Ref.nfiles*/
 	     G_matvect_extract_vector(A, CVEC, Ref.nfiles); /* Yann: Doubt on "cols/CVEC", TODO CHECK: dimension of vector = matrix size = Ref.nfiles*/
              b = G_vector_copy(A, NO_COMPACT);
              G_matvect_retrieve_matrix(A);