- modified the comment blocks so the copyright message no longer appears in

[ginac.git] / ginac / lst.cpp

diff --git a/ginac/lst.cpp b/ginac/lst.cpp
index 550d886318821a2e973e512be008c495e9c41b70..b05c48aa068abc57d8dcd8e1d42b0a77c4ec322d 100644 (file)
--- a/ginac/lst.cpp
+++ b/ginac/lst.cpp
@@ -11,10 +11,29 @@
  *                        $open_bracket=[
  *                        $close_bracket=] */
 
+/*
+ *  GiNaC Copyright (C) 1999 Johannes Gutenberg University Mainz, Germany
+ *
+ *  This program is free software; you can redistribute it and/or modify
+ *  it under the terms of the GNU General Public License as published by
+ *  the Free Software Foundation; either version 2 of the License, or
+ *  (at your option) any later version.
+ *
+ *  This program is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ *  GNU General Public License for more details.
+ *
+ *  You should have received a copy of the GNU General Public License
+ *  along with this program; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+ */
+
 #include <iostream>
 #include <stdexcept>
 
-#include "ginac.h"
+#include "lst.h"
+#include "ex.h"
 
 #define RESERVE(s,size) // no reserve needed for list
 
@@ -24,7 +43,7 @@
 
 // public
 
-lst::lst() : basic(TINFO_LST)
+lst::lst() : basic(TINFO_lst)
 {
     debugmsg("lst default constructor",LOGLEVEL_CONSTRUCT);
 }
@@ -71,7 +90,7 @@ void lst::destroy(bool call_parent)
 
 // public
 
-lst::lst(exlist const & s, bool discardable) :  basic(TINFO_LST)
+lst::lst(exlist const & s, bool discardable) :  basic(TINFO_lst)
 {
     debugmsg("lst constructor from exlist",
              LOGLEVEL_CONSTRUCT);
@@ -82,7 +101,7 @@ lst::lst(exlist const & s, bool discardable) :  basic(TINFO_LST)
     }
 }
 
-lst::lst(exlist * vp) : basic(TINFO_LST)
+lst::lst(exlist * vp) : basic(TINFO_lst)
 {
     debugmsg("lst constructor from exlist *",LOGLEVEL_CONSTRUCT);
     ASSERT(vp!=0);
@@ -90,7 +109,7 @@ lst::lst(exlist * vp) : basic(TINFO_LST)
     delete vp;
 }
 
-lst::lst(ex const & e1) :  basic(TINFO_LST)
+lst::lst(ex const & e1) :  basic(TINFO_lst)
 {
     debugmsg("lst constructor from 1 ex",
              LOGLEVEL_CONSTRUCT);
@@ -98,7 +117,7 @@ lst::lst(ex const & e1) :  basic(TINFO_LST)
     seq.push_back(e1);
 }
 
-lst::lst(ex const & e1, ex const & e2) : basic(TINFO_LST)
+lst::lst(ex const & e1, ex const & e2) : basic(TINFO_lst)
 {
     debugmsg("lst constructor from 2 ex",
              LOGLEVEL_CONSTRUCT);
@@ -108,7 +127,7 @@ lst::lst(ex const & e1, ex const & e2) : basic(TINFO_LST)
 }
 
 lst::lst(ex const & e1, ex const & e2, ex const & e3)
-    : basic(TINFO_LST)
+    : basic(TINFO_lst)
 {
     debugmsg("lst constructor from 3 ex",
              LOGLEVEL_CONSTRUCT);
@@ -119,7 +138,7 @@ lst::lst(ex const & e1, ex const & e2, ex const & e3)
 }
 
 lst::lst(ex const & e1, ex const & e2, ex const & e3,
-                     ex const & e4) : basic(TINFO_LST)
+                     ex const & e4) : basic(TINFO_lst)
 {
     debugmsg("lst constructor from 4 ex",
              LOGLEVEL_CONSTRUCT);
@@ -131,7 +150,7 @@ lst::lst(ex const & e1, ex const & e2, ex const & e3,
 }
 
 lst::lst(ex const & e1, ex const & e2, ex const & e3,
-                     ex const & e4, ex const & e5) : basic(TINFO_LST)
+                     ex const & e4, ex const & e5) : basic(TINFO_lst)
 {
     debugmsg("lst constructor from 5 ex",
              LOGLEVEL_CONSTRUCT);
@@ -145,7 +164,7 @@ lst::lst(ex const & e1, ex const & e2, ex const & e3,
 
 lst::lst(ex const & e1, ex const & e2, ex const & e3,
                      ex const & e4, ex const & e5, ex const & e6)
-    : basic(TINFO_LST)
+    : basic(TINFO_lst)
 {
     debugmsg("lst constructor from 6 ex",
              LOGLEVEL_CONSTRUCT);
@@ -160,7 +179,7 @@ lst::lst(ex const & e1, ex const & e2, ex const & e3,
 
 lst::lst(ex const & e1, ex const & e2, ex const & e3,
                      ex const & e4, ex const & e5, ex const & e6,
-                     ex const & e7) : basic(TINFO_LST)
+                     ex const & e7) : basic(TINFO_lst)
 {
     debugmsg("lst constructor from 7 ex",
              LOGLEVEL_CONSTRUCT);
@@ -176,7 +195,7 @@ lst::lst(ex const & e1, ex const & e2, ex const & e3,
 
 lst::lst(ex const & e1, ex const & e2, ex const & e3,
                      ex const & e4, ex const & e5, ex const & e6,
-                     ex const & e7, ex const & e8) : basic(TINFO_LST)
+                     ex const & e7, ex const & e8) : basic(TINFO_lst)
 {
     debugmsg("lst constructor from 8 ex",
              LOGLEVEL_CONSTRUCT);
@@ -194,7 +213,7 @@ lst::lst(ex const & e1, ex const & e2, ex const & e3,
 lst::lst(ex const & e1, ex const & e2, ex const & e3,
                      ex const & e4, ex const & e5, ex const & e6,
                      ex const & e7, ex const & e8, ex const & e9)
-    : basic(TINFO_LST)
+    : basic(TINFO_lst)
 {
     debugmsg("lst constructor from 9 ex",
              LOGLEVEL_CONSTRUCT);
@@ -214,7 +233,7 @@ lst::lst(ex const & e1, ex const & e2, ex const & e3,
                      ex const & e4, ex const & e5, ex const & e6,
                      ex const & e7, ex const & e8, ex const & e9,
                      ex const &e10)
-    : basic(TINFO_LST)
+    : basic(TINFO_lst)
 {
     debugmsg("lst constructor from 10 ex",
              LOGLEVEL_CONSTRUCT);