===================================================================
RCS file: /home/cvs/OpenXM_contrib/gnuplot/Attic/matrix.c,v
retrieving revision 1.1.1.2
retrieving revision 1.1.1.3
diff -u -p -r1.1.1.2 -r1.1.1.3
--- OpenXM_contrib/gnuplot/Attic/matrix.c	2000/01/22 14:15:59	1.1.1.2
+++ OpenXM_contrib/gnuplot/Attic/matrix.c	2003/09/15 07:09:25	1.1.1.3
@@ -1,7 +1,17 @@
 #ifndef lint
-static char *RCSid = "$Id: matrix.c,v 1.1.1.2 2000/01/22 14:15:59 maekawa Exp $";
+static char *RCSid = "$Id: matrix.c,v 1.1.1.3 2003/09/15 07:09:25 ohara Exp $";
 #endif
 
+/*  NOTICE: Change of Copyright Status
+ *
+ *  The author of this module, Carsten Grammes, has expressed in
+ *  personal email that he has no more interest in this code, and
+ *  doesn't claim any copyright. He has agreed to put this module
+ *  into the public domain.
+ *
+ *  Lars Hecking  15-02-1999
+ */
+
 /*
  *	Matrix algebra, part of
  *
@@ -53,7 +63,7 @@ int n;
     double *dp;
     if( n < 1 )
 	return (double *) NULL;
-    dp = (double *) gp_alloc ( n * sizeof(double), "vec");
+    dp = (double *) gp_alloc (n * sizeof(double), "vec");
     return dp;
 }
 
@@ -69,8 +79,8 @@ int cols;
 
     if ( rows < 1  ||  cols < 1 )
         return NULL;
-    m = (double **) gp_alloc ( rows * sizeof(double *) , "matrix row pointers");
-    m[0] = (double *) gp_alloc ( rows * cols * sizeof(double), "matrix elements");
+    m = (double **) gp_alloc (rows * sizeof(double *) , "matrix row pointers");
+    m[0] = (double *) gp_alloc (rows * cols * sizeof(double), "matrix elements");
     for ( i = 1; i<rows ; i++ )
     	m[i] = m[i-1] + cols;
     return m;