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

[svn_grass at osgeo.org]

Author: ychemin
Date: 2015-01-19 09:30:40 -0800 (Mon, 19 Jan 2015)
New Revision: 64244

Modified:
   grass-addons/grass7/imagery/i.spec.sam/main.c
   grass-addons/grass7/imagery/i.spec.sam/open.c
Log:
update i.spec.sam

Modified: grass-addons/grass7/imagery/i.spec.sam/main.c
===================================================================
--- grass-addons/grass7/imagery/i.spec.sam/main.c	2015-01-19 17:22:35 UTC (rev 64243)
+++ grass-addons/grass7/imagery/i.spec.sam/main.c	2015-01-19 17:30:40 UTC (rev 64244)
@@ -23,6 +23,31 @@
 #include "matrix2.h"
 #include "local_proto.h"
 
+MAT *A;
+VEC *b, *Avector;
+int matrixsize;
+float curr_angle;
+
+char *group;
+struct Ref Ref;
+
+CELL **cell;
+int *cellfd;
+
+CELL **result_cell;
+int *resultfd;
+
+CELL **error_cell;
+int  error_fd;
+
+char result_name[80];
+char *result_prefix, *matrixfile;
+
+struct
+    {
+     struct Flag *quiet;
+    } flag;
+
 int open_files();
 void spectral_angle();
 CELL myround (x);

Modified: grass-addons/grass7/imagery/i.spec.sam/open.c
===================================================================
--- grass-addons/grass7/imagery/i.spec.sam/open.c	2015-01-19 17:22:35 UTC (rev 64243)
+++ grass-addons/grass7/imagery/i.spec.sam/open.c	2015-01-19 17:30:40 UTC (rev 64244)
@@ -88,7 +88,7 @@
 	 if (!flag.quiet->answer)
 		G_message("Opening output file [%s]\n", result_name);	 
 	 result_cell[i] = Rast_allocate_c_buf();
-	 resultfd[i] = Rast_open_c_new (result_name)
+	 resultfd[i] = Rast_open_c_new (result_name);
     }