Prettified source code.
authorJens Vollinga <jensv@balin.nikhef.nl>
Fri, 6 Feb 2009 15:07:10 +0000 (16:07 +0100)
committerJens Vollinga <jensv@balin.nikhef.nl>
Fri, 6 Feb 2009 15:07:10 +0000 (16:07 +0100)
- Added copyright and GPL licencing to new files.
- Increased year to 2009.
- Changed guarding macros in header to uniform pattern without leading or
  trailing __ (double underscores).
- Put includes of system wide header consistently below own includes (help
  a tiny bit to clarify dependencies).

204 files changed:
check/bugme_chinrem_gcd.cpp
check/check_inifcns.cpp
check/check_lsolve.cpp
check/check_matrices.cpp
check/check_numeric.cpp
check/error_report.h
check/exam_archive.cpp
check/exam_clifford.cpp
check/exam_color.cpp
check/exam_cra.cpp
check/exam_differentiation.cpp
check/exam_factor.cpp
check/exam_hashmap.cpp
check/exam_indexed.cpp
check/exam_inifcns.cpp
check/exam_inifcns_nstdsums.cpp
check/exam_inifcns_nstdsums.h
check/exam_lsolve.cpp
check/exam_matrices.cpp
check/exam_misc.cpp
check/exam_mod_gcd.cpp
check/exam_normalization.cpp
check/exam_numeric.cpp
check/exam_paranoia.cpp
check/exam_polygcd.cpp
check/exam_powerlaws.cpp
check/exam_pseries.cpp
check/exam_structure.cpp
check/genex.cpp
check/heur_gcd_bug.cpp
check/match_bug.cpp
check/mul_eval_memleak.cpp
check/numeric_archive.cpp
check/parser_bugs.cpp
check/parser_memleak.cpp
check/randomize_serials.cpp
check/test_runner.h
check/time_antipode.cpp
check/time_dennyfliegner.cpp
check/time_fateman_expand.cpp
check/time_gammaseries.cpp
check/time_hashmap.cpp
check/time_lw_A.cpp
check/time_lw_B.cpp
check/time_lw_C.cpp
check/time_lw_D.cpp
check/time_lw_E.cpp
check/time_lw_F.cpp
check/time_lw_G.cpp
check/time_lw_H.cpp
check/time_lw_IJKL.cpp
check/time_lw_M1.cpp
check/time_lw_M2.cpp
check/time_lw_N.cpp
check/time_lw_O.cpp
check/time_lw_P.cpp
check/time_lw_Pprime.cpp
check/time_lw_Q.cpp
check/time_lw_Qprime.cpp
check/time_parser.cpp
check/time_toeplitz.cpp
check/time_uvar_gcd.cpp
check/time_vandermonde.cpp
check/timer.cpp
check/timer.h
doc/tutorial/ginac.texi
ginac/add.cpp
ginac/add.h
ginac/archive.cpp
ginac/archive.h
ginac/assertion.h
ginac/basic.cpp
ginac/basic.h
ginac/class_info.h
ginac/clifford.cpp
ginac/clifford.h
ginac/color.cpp
ginac/color.h
ginac/compiler.h
ginac/constant.cpp
ginac/constant.h
ginac/container.h
ginac/ex.cpp
ginac/ex.h
ginac/excompiler.cpp
ginac/excompiler.h
ginac/expair.cpp
ginac/expair.h
ginac/expairseq.cpp
ginac/expairseq.h
ginac/exprseq.cpp
ginac/exprseq.h
ginac/factor.cpp
ginac/factor.h
ginac/fail.cpp
ginac/fail.h
ginac/fderivative.cpp
ginac/fderivative.h
ginac/flags.h
ginac/function.pl
ginac/ginac.h
ginac/hash_map.h
ginac/idx.cpp
ginac/idx.h
ginac/indexed.cpp
ginac/indexed.h
ginac/inifcns.cpp
ginac/inifcns.h
ginac/inifcns_gamma.cpp
ginac/inifcns_nstdsums.cpp
ginac/inifcns_trans.cpp
ginac/integral.cpp
ginac/integral.h
ginac/lst.cpp
ginac/lst.h
ginac/matrix.cpp
ginac/matrix.h
ginac/mul.cpp
ginac/mul.h
ginac/ncmul.cpp
ginac/ncmul.h
ginac/normal.cpp
ginac/normal.h
ginac/numeric.cpp
ginac/numeric.h
ginac/operators.cpp
ginac/operators.h
ginac/parser/debug.h
ginac/parser/lexer.cpp
ginac/parser/lexer.h
ginac/parser/parse_binop_rhs.cpp
ginac/parser/parse_context.cpp
ginac/parser/parse_context.h
ginac/parser/parser.cpp
ginac/parser/parser.h
ginac/parser/parser_compat.cpp
ginac/polynomial/chinrem_gcd.cpp
ginac/polynomial/chinrem_gcd.h
ginac/polynomial/collect_vargs.cpp
ginac/polynomial/collect_vargs.h
ginac/polynomial/cra_garner.cpp
ginac/polynomial/cra_garner.h
ginac/polynomial/debug.h
ginac/polynomial/divide_in_z_p.cpp
ginac/polynomial/divide_in_z_p.h
ginac/polynomial/euclid_gcd_wrap.h
ginac/polynomial/eval_point_finder.h
ginac/polynomial/eval_uvar.h
ginac/polynomial/gcd_euclid.h
ginac/polynomial/gcd_uvar.cpp
ginac/polynomial/heur_gcd_uvar.h
ginac/polynomial/interpolate_padic_uvar.h
ginac/polynomial/mgcd.cpp
ginac/polynomial/mod_gcd.cpp
ginac/polynomial/mod_gcd.h
ginac/polynomial/newton_interpolate.h
ginac/polynomial/normalize.h
ginac/polynomial/optimal_vars_finder.cpp
ginac/polynomial/optimal_vars_finder.h
ginac/polynomial/pgcd.cpp
ginac/polynomial/pgcd.h
ginac/polynomial/poly_cra.h
ginac/polynomial/prem_uvar.h
ginac/polynomial/primes_factory.h
ginac/polynomial/primpart_content.cpp
ginac/polynomial/remainder.h
ginac/polynomial/ring_traits.h
ginac/polynomial/smod_helpers.h
ginac/polynomial/sr_gcd_uvar.h
ginac/polynomial/upoly.h
ginac/polynomial/upoly_io.cpp
ginac/polynomial/upoly_io.h
ginac/power.cpp
ginac/power.h
ginac/print.cpp
ginac/print.h
ginac/pseries.cpp
ginac/pseries.h
ginac/ptr.h
ginac/registrar.cpp
ginac/registrar.h
ginac/relational.cpp
ginac/relational.h
ginac/remember.cpp
ginac/remember.h
ginac/structure.h
ginac/symbol.cpp
ginac/symbol.h
ginac/symmetry.cpp
ginac/symmetry.h
ginac/tensor.cpp
ginac/tensor.h
ginac/tostring.h
ginac/utils.cpp
ginac/utils.h
ginac/wildcard.cpp
ginac/wildcard.h
ginsh/ginsh.1.in
ginsh/ginsh.h
ginsh/ginsh_extensions.h
ginsh/ginsh_lexer.ll
ginsh/ginsh_parser.yy
tools/viewgar.1.in
tools/viewgar.cpp

index 0b422c2bec24e0fe1fcb0f8e6813df365ca38c40..aae82213bbfac6d2e5d363afbee94937124018c0 100644 (file)
@@ -1,21 +1,40 @@
-/**
- * @file bugme_chinrem_gcd.cpp
- * A small program exposing historical bug in poly_cra function.
+/** @file bugme_chinrem_gcd.cpp
+ *
+ * A small program exposing historical bug in poly_cra function. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
-#include <string>
-#include <iostream>
+
 #include "ginac.h"
+
+#include <iostream>
+#include <string>
 using namespace std;
-namespace GiNaC
-{
+
+namespace GiNaC {
 extern ex chinrem_gcd(const ex& A, const ex& B);
 }
+
 using namespace GiNaC;
 
 static const std::string p1_srep("\
 -936639990-14679334842*x^9-6214147095*x^35+22219362387*x^69-31276301429*x^25+1199649580*x^98+2134905268*x^56+25591410149*x^72+5507703343*x^11+18467021749*x^43+11196778577*x^85+26050790733*x^29-178435747*x^2+1890708440*x^88-561107347*x^13-31038290506*x^51-1330154020*x^15+23467669465*x^59-3966988360*x^16+26794929142*x^38+11598735101*x^75-8608995580*x^3-30174373832*x^46+3580061526*x^91+7814495607*x^20+6624766926*x^78-11990574398*x^54-6863205889*x^33-319408644*x^65-11580405260*x^41-9654281719*x^81+23532819511*x^24-3890383043*x^94+27682281779*x^62+1363904895*x^68-272899085*x^49-933592128*x^97-2954269379*x^28+8432066353*x^36+14038262112*x^71-5474416933*x^84+741141010*x^100+38375274669*x^57-19509035058*x^44-1029159530*x^87+17276957972*x^8+23471621465*x^19-4745283802*x^74-15331409214*x^23-1261023993*x^90+17469329915*x^52-7544450778*x^64+12293848678*x^10-12162845828*x^39+11912265375*x^77-35110566664*x^27-5872201799*x^60+16636451249*x^80-6663332709*x^12+26248623452*x^47+2292551912*x^93-13410537172*x^14+4255578378*x^55+11614165303*x^31-6270990007*x^34-6744628155*x^67+3692350529*x^96-17204774085*x^63-11157075535*x^18+4275663006*x^70+18517327396*x^42+2030662033*x^83-3435911855*x^50-227816977*x^99+4507833875*x-41046742100*x^37+9385606040*x^73-5892518210*x^22+512268187*x^86+9183261708*x^58-2542140060*x^4-19627087954*x^45+142491112*x^89-4846605217*x^26-4503859503*x^30-38388107386*x^32+2123912816*x^5-2508504600*x^76-15282350857*x^53-12217636980*x^40-4828562936*x^79+1788729074*x^6-967823912*x^92+6436149609*x^7+44704228721*x^61+21474090980*x^17+36034512058*x^66+10918084347*x^21+1913801599*x^82+1530941050*x^48-7104898913*x^95");
 
-
 static const std::string p2_srep("\
 1882371920+29943249139*x^9-21558061051*x^35+24497174109*x^69+3363043648*x^25+5186524611*x^98-17753230977*x^56+16461882236*x^72+11039962159*x^11-85814533599*x^43-12986831645*x^85+4813620791*x^29-2133682609*x^2+9141433582*x^88-14841292646*x^13+19494168654*x^51-426278523*x^15-18246235652*x^59-12424469513*x^16-14414308862*x^38-16262001424*x^75+1584505491*x^3+6616907060*x^46+9411879011*x^91+7056872613*x^20+29675566382*x^78-48441925739*x^54+12038293769*x^33-22463329638*x^65+21957440404*x^41+26252749471*x^81-28689993421*x^24+1190623161*x^94-3323333429*x^62+778770195*x^68-23673866858*x^49+10263027507*x^97+29115114125*x^28-34230002076*x^36-217623403*x^71-6344703601*x^84+2789684836*x^100-44973929094*x^57-6061422988*x^44+18964048763*x^87+3160532878*x^8-8039690791*x^19-5750277357*x^74+5544486596*x^23+1800283356*x^90-8174921854*x^52+2577247520*x^64-1088265300*x^10+18566882873*x^39+12678193001*x^77-7204610489*x^27+9980611956*x^60+12672890141*x^80+4463462090*x^12-30937311949*x^47-3883570155*x^93+7561875663*x^14-3850452489*x^55+20714527103*x^31-9973372012*x^34+440594870*x^67+10385086102*x^96-20693764726*x^63+11049483001*x^18-11578701274*x^70-5548876327*x^42+20393397488*x^83+20531692560*x^50+1309311388*x^99-7521320830*x-2750892631*x^37-6001481047*x^73+7149046134*x^22+10287410396*x^86+7332053562*x^58-1135211878*x^4-7420079075*x^45+9742202475*x^89-214559874*x^26+29530802947*x^30-2280622009*x^32-4237029618*x^5+13760397067*x^76+18073788685*x^53+2485463829*x^40+1889202286*x^79+8841198971*x^6+13562767020*x^92+110919258*x^7+6961020716*x^61+11700952246*x^17-13528331424*x^66-19801882818*x^21+25061328813*x^82+1553111326*x^48+4638169279*x^95");
 
@@ -29,4 +48,3 @@ int main(int argc, char** argv)
        cout << "not found.";
        return 0;
 }
-
index 9d493290b5ee854e254e053398ec28d6fa4fe2cf..0bab8717ca0a932a37b9ea43f4f30c0a2cee3daa 100644 (file)
@@ -4,7 +4,7 @@
  *  functions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <cstdlib> // rand()
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <cstdlib> // for rand()
+#include <iostream>
+using namespace std;
+
 /* Some tests on the sine trigonometric function. */
 static unsigned inifcns_check_sin()
 {
index 226b6c2d3a0d8144d126f0f6f83fb584c43767ec..795f157d90126de925d9624ea922b813294b5405 100644 (file)
@@ -5,7 +5,7 @@
  *  the underlying symbolic manipulations. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
+#include "ginac.h"
+using namespace GiNaC;
+
+#include <cstdlib> // for rand()
 #include <iostream>
 #include <sstream>
-#include <cstdlib> // rand()
-#include "ginac.h"
 using namespace std;
-using namespace GiNaC;
 
 extern const ex 
 dense_univariate_poly(const symbol & x, unsigned degree);
index ecabc6f2c8ee6611258f00fc28dbb04dc49efe10..1df9d01aa5cdce22b4d2f48bd551dfd462bf447f 100644 (file)
@@ -5,7 +5,7 @@
  *  manipulations. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <cstdlib> // rand(), RAND_MAX
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <cstdlib> // for rand(), RAND_MAX
+#include <iostream>
+using namespace std;
+
 extern const ex 
 sparse_tree(const symbol & x, const symbol & y, const symbol & z,
            int level, bool trig = false, bool rational = true,
index ec878be2ec9b2ea9d0792f5e9aa579d2823694f2..9360b9cd7a1a2485c18c2d2782251358aab2da54 100644 (file)
@@ -4,7 +4,7 @@
  *  tests on these numbers like is_integer() etc... */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <cstdlib> // rand()
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <cstdlib> // for rand()
+#include <iostream>
+using namespace std;
+
 /* Simple and maybe somewhat pointless consistency tests of assorted tests and
  * conversions. */
 static unsigned check_numeric1()
index 6b2dfe617352ba1b44fc19f80d1e007c2ffe579f..759d905b583dd2f26fde6fe00b7f1fd69f62b208 100644 (file)
@@ -1,5 +1,29 @@
-#ifndef GINAC_CHECK_ERROR_REPORT_HPP
-#define GINAC_CHECK_ERROR_REPORT_HPP
+/** @file error_report.h
+ *
+ *  Macro for additional debugging output.
+ */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_CHECK_ERROR_REPORT_H
+#define GINAC_CHECK_ERROR_REPORT_H
+
 #include <sstream>
 #include <stdexcept>
 
@@ -13,5 +37,4 @@ if (cond) {                                           \
 }                                                      \
 } while (0)
 
-#endif // GINAC_CHECK_ERROR_REPORT_HPP
-
+#endif // ndef GINAC_CHECK_ERROR_REPORT_H
index bdf6995542427b2cc2f0eed1c779e4bc8d53f073..083f79dd1052fdbe6a69131f07d8bd03c49dfe7e 100644 (file)
@@ -3,7 +3,7 @@
  *  Here we test GiNaC's archiving system. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <fstream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <fstream>
+#include <iostream>
+using namespace std;
+
 unsigned exam_archive()
 {
        unsigned result = 0;
index 68393673f78d4672432ee82d499e5cb6b05204ee..f713e1c58b8035b3a248fec75e7d6bab262072cb 100644 (file)
@@ -3,7 +3,7 @@
  *  Here we test GiNaC's Clifford algebra objects. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+using namespace std;
+
 const numeric half(1, 2);
 
 static unsigned check_equal(const ex &e1, const ex &e2)
index 53c72c010b8a2940b1361efd7c01b941243e32ec..823ee7d8a2d9f700d22b9fdf30143d3078644bd0 100644 (file)
@@ -3,7 +3,7 @@
  *  Here we test GiNaC's color objects (su(3) Lie algebra). */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+using namespace std;
+
 static unsigned check_equal(const ex &e1, const ex &e2)
 {
        ex e = e1 - e2;
index 7ad62c158376703f88b81edbcad9314430fab811..f224926d5c5953630e032bc3fa8b167b1644b9aa 100644 (file)
@@ -1,14 +1,37 @@
-#include <iostream>
+/** @file exam_cra.cpp
+ *
+ *  Test of Chinese remainder algorithm. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#include "polynomial/cra_garner.h"
+
 #include <cln/integer.h>
 #include <cln/integer_io.h>
 #include <cln/random.h>
 #include <cln/numtheory.h>
-#include "polynomial/cra_garner.h"
+using namespace cln;
+#include <iostream>
+#include <limits>
 #include <map>
-#include <vector>
 #include <stdexcept>
-#include <limits>
-using namespace cln;
+#include <vector>
 using namespace std;
 
 /// Generate a sequences of primes p_i such that \prod_i p_i < limit
@@ -120,4 +143,3 @@ static void dump(const std::vector<cln::cl_I>& v)
                std::cerr << v[i] << " ";
        std::cerr << "]";
 }
-
index 2b5a595650388afddcad9f274bd9f1c8a8f07871..caedff2192672127582a57c4dba6e168afa17bd9 100644 (file)
@@ -3,7 +3,7 @@
  *  Tests for symbolic differentiation, including various functions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+using namespace std;
+
 static unsigned check_diff(const ex &e, const symbol &x,
                                                   const ex &d, unsigned nth=1)
 {
index 71a63f24ba68dce756efd210005b93d5b2b6a4c1..9d03ac4f27794e5b3a8e37bc44906c596f3dfa82 100644 (file)
@@ -3,7 +3,7 @@
  *  Factorization test suite. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+using namespace std;
+
 static symbol w("w"), x("x"), y("y"), z("z");
 
 static unsigned check_factor(const ex& e)
index 1aac8c8c2ee045d2b34aaab9a6246a18d0757b38..c8540f3e49be5592d230f28f4585ff93c3d86d5b 100644 (file)
@@ -3,7 +3,7 @@
  *  Regression tests for the exhashmap<> container. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+using namespace std;
+
 unsigned exam_hashmap()
 {
        unsigned result = 0;
index b7c12ba2ad2a52d11ac4d613caf3343f83ff5d91..ad1c252624fe2c54cf846c9cdc6a97e7736d90b5 100644 (file)
@@ -3,7 +3,7 @@
  *  Here we test manipulations on GiNaC's indexed objects. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+using namespace std;
+
 static unsigned check_equal(const ex &e1, const ex &e2)
 {
        ex e = e1 - e2;
index 7d8cb978535aca9ce4cc7946e02077fdefbf37d9..9c014a14b701e79c320afe2626ca91daf6b96151 100644 (file)
@@ -4,7 +4,7 @@
  *  functions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+using namespace std;
+
 /* Assorted tests on other transcendental functions. */
 static unsigned inifcns_consist_trans()
 {
index ec843da3ab5544ea8b9eda8c0f4c3a8a19d0a541..a99ecca82dc8b7b18572e0f7984b276439d5279d 100644 (file)
@@ -4,7 +4,7 @@
  *  functions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <fstream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <fstream>
+using namespace std;
 
 
 ////////////////////////////////////////////////////////////////////////////////
index c2919573adf874f2830591a7938f04bd3f92866b..0c060269ba54449269088a2831d81e5f3cc47fb9 100644 (file)
@@ -1,3 +1,25 @@
+/** @file exam_inifcns_nstdsums.h
+ *
+ *  Comparison data for the test of polylogarithms. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 string data[] = {
 "1",
 "1",
index b7d276962e66763a07429705ef6663035549f5b5..2c1c063e2b9a0f517a93ab56f0a5208f27108291 100644 (file)
@@ -3,7 +3,7 @@
  *  These exams test solving small linear systems of symbolic equations. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+using namespace std;
+
 static unsigned exam_lsolve1()
 {
        // A trivial example.
index 2e14f49482fbbfa836a052f61b038a626ff4e19a..fe927efba8fb1e5f2677d574c1870dedd0b8e3d3 100644 (file)
@@ -3,7 +3,7 @@
  *  Here we examine manipulations on GiNaC's symbolic matrices. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <stdexcept>
-#include <iostream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <stdexcept>
+using namespace std;
+
 static unsigned matrix_determinants()
 {
        unsigned result = 0;
index 2d0f29e152c21f80a6e8a52480dbec6acf61b1ed..10c3dc46fb2ce052d4b5a0c104432941d07b04d5 100644 (file)
@@ -3,7 +3,7 @@
  */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+using namespace std;
+
 #define VECSIZE 30
 static unsigned exam_expand_subs()
 {
index 60c04ac1aa0940a7cfe3b5a8a83f0359020bc5f7..de1faaab6a757559dfe2941ceee1652ba8855464 100644 (file)
@@ -1,11 +1,35 @@
+/** @file exam_misc.cpp
+ *
+ *  Testing modular GCD.
+ */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#include <cln/random.h>
+#include <iostream>
+#include <map>
+#include <string>
+
 #include "polynomial/upoly.h"
 #include "polynomial/upoly_io.h"
 #include "polynomial/mod_gcd.h"
 #include "ginac.h"
-#include <cln/random.h>
-#include <string>
-#include <iostream>
-#include <map>
 using namespace GiNaC;
 
 static upoly ex_to_upoly(const ex& e, const symbol& x);
@@ -82,4 +106,3 @@ static upoly make_random_upoly(const std::size_t deg)
                p[deg] = cln::random_I(biggish);
        return p;
 }
-
index 6a931db5b54e03bea76af89ee5745e450155b7c5..a408a930e91c7f8f033bcc25b39520ffebee8d29 100644 (file)
@@ -3,7 +3,7 @@
  *  Rational function normalization test suite. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+using namespace std;
+
 static symbol w("w"), x("x"), y("y"), z("z");
 
 static unsigned check_normal(const ex &e, const ex &d)
index 250cb5f011cb345a59401e980187100f4195b3a0..9c6d66c64e34f232e1b2a47f3bd2950bdc61aef4 100644 (file)
@@ -4,7 +4,7 @@
  *  tests on these numbers like is_integer() etc... */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <sstream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <sstream>
+using namespace std;
 
 /* Simple and maybe somewhat pointless consistency tests of assorted tests and
  * conversions. */
index f6bed67c929cc360594a84264803a39fd7e93c55..bb68d33ec22d8307fe517bd8743dc1ab0b04b141 100644 (file)
@@ -6,7 +6,7 @@
  *  these oopses for good, so we run those stupid tests... */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+using namespace std;
+
 // The very first pair of historic problems had its roots in power.cpp and was
 // finally resolved on April 27th 1999. (Fixing the first on April 23rd
 // actually introduced the second.)
index 79d4d5ed93adbea3f6c120bf7d719d69b4114f32..bc4dfe09168f0a2cdabef0b498bd72543bd227d5 100644 (file)
@@ -4,7 +4,7 @@
  *  rational function normalization in normalization.cpp. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+using namespace std;
+
 const int MAX_VARIABLES = 3;
 
 static symbol x("x"), z("z");
index 4977d4f0024c226848c2a35fef5b17406042c062..91e32d60a9d8119a5b34f969e308fd6bc952b707 100644 (file)
@@ -4,7 +4,7 @@
  *  this code, it is a sanity check rather deeply rooted in GiNaC's classes. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+using namespace std;
+
 static unsigned exam_powerlaws1()
 {
        // (x^a)^b = x^(a*b)
index a3fe7d87d496be2e0681c3e364f8a1cbe0af9ffe..5d3c8d7d8341240e19ccbf6ad0814f395ce048c8 100644 (file)
@@ -3,7 +3,7 @@
  *  Series expansion test (Laurent and Taylor series). */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+using namespace std;
+
 static symbol x("x");
 
 static unsigned check_series(const ex &e, const ex &point, const ex &d, int order = 8)
index 5d835748282d9d63d84b8f9cd197cb2c37e894b4..84888810d1571d58a81a2e2f43483723e318e46b 100644 (file)
@@ -3,7 +3,7 @@
  *  Small test for the structure<> template. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+using namespace std;
 
 struct sprod_s {
        ex left, right;
index 9d44bfe8a0bc890d6d530143618beccdab8036a5..b79ef7ebb794b2a092945ac462f91c502cf47e75 100644 (file)
@@ -4,7 +4,7 @@
  *  input in the consistency checks. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <cstdlib>
 #include "ginac.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <cstdlib>
+using namespace std;
+
 /* Create a dense univariate random polynomial in x.
  * (of the form 9 - 22*a - 17*a^2 + 14*a^3 + 7*a^4 + 7a^5 if degree==5) */
 const ex
index 6fa80602f5f1f68cf4bc44b8dc70d983d10c339f..b4855beb8bc2daca1c6a23e09990ba1f4244d418 100644 (file)
@@ -1,13 +1,33 @@
-/**
- * @file heur_gcd_oops.cpp Check for a bug in heur_gcd().
+/** @file heur_gcd_bug.cpp
  *
- * heur_gcd() did not check if the arguments are integer polynomials
- * (and did not convert them to integer polynomials), which lead to
- * endless loop or (even worse) wrong result.
+ *  heur_gcd_oops.cpp Check for a bug in heur_gcd().
+ *
+ *  heur_gcd() did not check if the arguments are integer polynomials
+ *  (and did not convert them to integer polynomials), which lead to
+ *  endless loop or (even worse) wrong result. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
-#include <iostream>
+
 #include "ginac.h"
 using namespace GiNaC;
+
+#include <iostream>
 using namespace std;
 
 int main(int argc, char** argv)
@@ -36,4 +56,3 @@ int main(int argc, char** argv)
        }
        return 0;
 }
-
index 70e55420a0e7f3f0c058daddac440533d1f29a00..768e95bb402e959ea97338c07ac2d259dfd0b214 100644 (file)
@@ -1,11 +1,29 @@
-/**
- * @file match_bug.cpp
+/** @file match_bug.cpp
  *
- * Check for bug in GiNaC::ex::match() described here:
- * http://www.ginac.de/pipermail/ginac-devel/2006-April/000942.html
+ *  Check for bug in GiNaC::ex::match() described here:
+ *  http://www.ginac.de/pipermail/ginac-devel/2006-April/000942.html */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
+
 #include "ginac.h"
 #include "error_report.h"
+
 #include <iostream>
 using namespace GiNaC;
 
@@ -63,4 +81,3 @@ int main(int argc, char** argv)
        std::cout << "not found. ";
        return 0;
 }
-
index 8bde60c28afdee7e5170cd6f1da47aa48b655e80..a14dd29500e84b36503638a4c2dcbf543e6a87f9 100644 (file)
@@ -1,19 +1,20 @@
-/**
- * @file mul_eval_memleak.cpp Test for memory leak in {mul,power}::eval
+/** @file mul_eval_memleak.cpp
  *
- * The bug was introduced by
+ *  mul_eval_memleak.cpp Test for memory leak in {mul,power}::eval
  *
- * commit f418c6ee4d558c852e1fb95533af07a3ae43f409
- * Author: Alexei Sheplyakov <varg@theor.jinr.ru>
- * Date:   Wed Jul 11 14:34:42 2007 +0400
- * (it was commited into the official branch as
- * commit a602d34c225dceb3e53742a7b3e19a4b5e280485
- * Author: Jens Vollinga <vollinga@thep.physik.uni-mainz.de>
- * Date:   Wed Jul 11 21:07:40 2007 +0000)
+ *  The bug was introduced by
+ *
+ *  commit f418c6ee4d558c852e1fb95533af07a3ae43f409
+ *  Author: Alexei Sheplyakov <varg@theor.jinr.ru>
+ *  Date:   Wed Jul 11 14:34:42 2007 +0400
+ *  (it was commited into the official branch as
+ *  commit a602d34c225dceb3e53742a7b3e19a4b5e280485
+ *  Author: Jens Vollinga <vollinga@thep.physik.uni-mainz.de>
+ *  Date:   Wed Jul 11 21:07:40 2007 +0000)
  */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include <ginac/ginac.h>
-#include <string>
+using namespace GiNaC;
+
+#include <iostream>
 #include <stdexcept>
+#include <string>
 using namespace std;
-using namespace GiNaC;
 
 const unsigned check_mul_eval_memleak(const unsigned N)
 {
@@ -116,4 +118,3 @@ int main(int argc, char** argv) {
        }
        return 0;
 }
-
index 8f69a7b7567557cec81869e094c02f4f15c58bfa..3c636754a5296c6c423550e39c04c0eb5af11cbe 100644 (file)
@@ -1,19 +1,39 @@
-/**
- * @file numeric_archive.cpp Check for a bug in numeric::archive
+/** @file numeric_archive.cpp
  *
- * numeric::archive used to fail if the real part of a complex number
- * is a rational number and the imaginary part is a floating point one.
+ *  Check for a bug in numeric::archive
+ *
+ *  numeric::archive used to fail if the real part of a complex number
+ *  is a rational number and the imaginary part is a floating point one. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
+
+#include "ginac.h"
+using namespace GiNaC;
+
+#include <algorithm>
 #include <cln/cln.h>
 #include <iostream>
-#include <stdexcept>
-#include <vector>
 #include <iterator>
-#include <algorithm>
 #include <sstream>
-#include "ginac.h"
+#include <stdexcept>
+#include <vector>
 using namespace cln;
-using namespace GiNaC;
 
 struct archive_unarchive_check
 {
index af32c5ef89c81548eea433f16d9bd7ab882ed046..051ddaf7f7f0a619de976f776abbdce13f9598c3 100644 (file)
@@ -1,10 +1,32 @@
-/// @file parser_a_b.cpp Check for some silly bugs in the parser.
+/** @file parser_bugs.cpp
+ *
+ *  Check for some silly bugs in the parser. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #include "ginac.h"
-#include <string>
+using namespace GiNaC;
+
 #include <iostream>
-#include <stdexcept>
 #include <sstream>
-using namespace GiNaC;
+#include <stdexcept>
+#include <string>
 
 // - a - b was misparsed as -a + b due to a bug in parser::parse_unary_expr()
 static int check1(std::ostream& err_str)
@@ -91,4 +113,3 @@ int main(int argc, char** argv)
        }
        return errors;
 }
-
index f347ce9aca10c471502de492e0a5478d1c65cccf..a969e47d36e240ab95f12400fdad158e65e13786 100644 (file)
@@ -1,18 +1,39 @@
-/**
- * This small program exhibits the memory leak in the ginac_yylex().
- * Run it as
+/** @file parser_memleak.cpp
  *
- * valgrind --leak-check=yes  ./parser_memleak
+ *  This small program exhibits the memory leak in the ginac_yylex().
+ *  Run it as
  *
- * or simply
+ *  valgrind --leak-check=yes  ./parser_memleak
  *
- * ulimit -v `expr 64 \* 1024` ./parser_memleak
+ *  or simply
+ *
+ *  ulimit -v `expr 64 \* 1024` ./parser_memleak
+ */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
+
+#include <ginac/ginac.h>
+using namespace GiNaC;
+
 #include <iostream>
 #include <stdexcept>
-#include <ginac/ginac.h>
 using namespace std;
-using namespace GiNaC;
 
 int main(int argc, char** argv) {
        const symbol x("x"), y("y");
index ad29a1bac218f58159357e3d20b58aa6a6f46b0f..3b9e0b6cf05db8c9c0baf26df83e4add34ec3aee 100644 (file)
@@ -1,8 +1,32 @@
+/** @file randomize_serials.cpp
+ *
+ *  Utilitiy function used by the benchmarks.
+ */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#include "ginac.h"
+using namespace GiNaC;
+
 #include <cstdlib>
 #include <ctime>
-#include "ginac.h"
 using namespace std;
-using namespace GiNaC;
 
 /** Generate a random amount of symbols and destroy them again immediatly.
  *  This operation effectively makes the serial numbers of all subsequent
@@ -27,5 +51,3 @@ void randomify_symbol_serials()
                symbol("dummy");
        }
 }
-
-
index 3f668a7d762185451024e9665c8fd1f9b03200ca..3874262f8c5eeab5a6490717fbda7579ee271552 100644 (file)
@@ -1,10 +1,34 @@
+/** @file test_runner.h
+ *
+ *  Utility functions for benchmarking. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #ifndef GINAC_CHECK_TEST_RUNNER_H
 #define GINAC_CHECK_TEST_RUNNER_H
-#include <iostream>
+
+#include "timer.h"
+
 #include <cstdlib>
-#include <string>
 #include <ctime>
-#include "timer.h"
+#include <iostream>
+#include <string>
 
 template<typename T> static void 
 run_benchmark(T& benchmark,
@@ -63,5 +87,4 @@ static int run_expensive_timings_p()
        return value;
 }
 
-#endif // GINAC_CHECK_TEST_RUNNER_H
-
+#endif // ndef GINAC_CHECK_TEST_RUNNER_H
index 171385ea3b4709c4c39dd7f497ca3e1666f34ebf..074ca3722accc61e3623ca40d3a07859adf03975 100644 (file)
@@ -16,7 +16,7 @@
  */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <utility>
-#include <vector>
-#include <set>
+#include "ginac.h"
+#include "timer.h"
+using namespace GiNaC;
+
 #include <map>
-#include <typeinfo>
+#include <set>
 #include <stdexcept>
-#include "timer.h"
-#include "ginac.h"
+#include <typeinfo>
+#include <utility>
+#include <vector>
 using namespace std;
-using namespace GiNaC;
 
 // whether to run this beast or not:
 static const bool do_test = true;
index 07a8938ca2389a54bc3317f59ce58595b5bad9ec..bffbb9b23633d5634b035d6694c393e590144168 100644 (file)
@@ -7,7 +7,7 @@
  *  after which e should be just a1^2. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
+#include "ginac.h"
+#include "timer.h"
+using namespace GiNaC;
+
 #include <iostream>
 #include <sstream>
 #include <vector>
-#include "ginac.h"
-#include "timer.h"
 using namespace std;
-using namespace GiNaC;
 
 static unsigned expand_subs(unsigned size)
 {
index 1a33313d931487ada70c06a0e3450b94e527309d..e689dcdf95cabd5023d9c9fd60dc928c71f3722e 100644 (file)
@@ -6,7 +6,7 @@
  */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+using namespace std;
+
 static unsigned test()
 {
        unsigned result = 0;
index e6ffa8736abe814ab4d963c37893c1326df7576b..14f4c6c29cd7f785df5e346e7d9dfb3129cf0b3d 100644 (file)
@@ -3,7 +3,7 @@
  *  Some timings on series expansion of the Gamma function around a pole. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 unsigned tgammaseries(unsigned order)
 {
        unsigned result = 0;
index 7ff288c96de38404067f4897d0643ca5855f7d59..d93880b5eb0875650c454b3219cd6b46cf8b33e1 100644 (file)
@@ -3,7 +3,7 @@
  *  Timings for exhashmap<> operations. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 template <class T>
 static void run_timing(unsigned size, double &time_insert, double &time_find, double &time_erase)
 {
index 8a68049b3ac60c5ee38eaaa9a40ba1f9b5a65111..a5bad9c7de7dcfc686a9315ab432a8c4c63bf87c 100644 (file)
@@ -4,7 +4,7 @@
  *  Lewis and Michael Wester. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 static unsigned test()
 {
        for (int i=1; i<=99; ++i)
index 2bd497c7e4d9dc110dde799d38aa4e8383033774..35c93d4122862ec2e60c22b076ce6735ecaf14df 100644 (file)
@@ -4,7 +4,7 @@
  *  Lewis and Michael Wester. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 static unsigned test()
 {
        numeric s;
index 8bc77db4b1441946178f32e3ffe800cf8a73fc57..c1302372f4b92b014f0e9dd6e680d65010043bed 100644 (file)
@@ -4,7 +4,7 @@
  *  Lewis and Michael Wester. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 static unsigned test()
 {
        numeric x(13*17*31);
index 5fcc1ae7cfb2c37bd1c48339e918776f7bd6fcf0..797d2cfd51d30e324abf79a43c196fc7637fe0a3 100644 (file)
@@ -4,7 +4,7 @@
  *  Lewis and Michael Wester. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 static unsigned test()
 {
        ex s;
index ca5c6c7bef5ff5a83cd4987993b37df62ae11ccb..4d970b3d6c49a3fd3677d9a057d3bcfcdcffc8bf 100644 (file)
@@ -4,7 +4,7 @@
  *  Lewis and Michael Wester. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 static unsigned test()
 {
        ex s;
index 0240aa305ff71fe13d8ec7fae13a13cafa233da9..444ed4eb3fa46df13e130aa56710b264dc58f5c6 100644 (file)
@@ -4,7 +4,7 @@
  *  Lewis and Michael Wester. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 static unsigned test()
 {
        symbol x("x");
index 5c748ba43c374080d0aa2d0164d18b8fbae76899..839d582fbb0bc744570de5527f661f6a275099fa 100644 (file)
@@ -4,7 +4,7 @@
  *  Lewis and Michael Wester. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 static unsigned test()
 {
        symbol x("x");
index ffe59484dff5b54b6ab902b53b19ee0c08e02be5..7d8044c24da8cb82c7a4998065f9f5bccc84b444 100644 (file)
@@ -4,7 +4,7 @@
  *  Lewis and Michael Wester. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 static unsigned test(unsigned n)
 {
        matrix hilbert(n,n);
index b2d0f2c9693dd92d61b4993e42c34351c75366a2..ae2ef2f220afdaac7280ab658f09a3f0a5109694 100644 (file)
@@ -4,7 +4,7 @@
  *  by Robert H. Lewis and Michael Wester. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 static unsigned test(unsigned n)
 {
        unsigned result = 0;
index 0d9cc59717e084af47963ddcab85da0111b60d19..c1c06d002ff05aceb603e49e1d0ce7ccc66fc359 100644 (file)
@@ -4,7 +4,7 @@
  *  Lewis and Michael Wester. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+using namespace std;
+
 static unsigned test()
 {
        // Determinant of a sparse matrix that comes up in graph theory:
index d6fea9088af3b623a572761e782679744681ee13..2868249bc5d4229d11dd7eaf88908c6eab9ebc1e 100644 (file)
@@ -4,7 +4,7 @@
  *  Lewis and Michael Wester. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+using namespace std;
+
 static const bool do_test = false;  // set to true in order to run this beast
 
 static unsigned test()
index 88453f84e4f50fbd9de9d83fda90afc62eb9413f..37bc786a07481ff740afcbbf336f32f2d41363af 100644 (file)
@@ -5,7 +5,7 @@
  *  Fermat-test). */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 static const bool do_test = false;  // set to true in order to run this beast
 
 static unsigned test()
index 2090e6f1d32268902ff9fa340c927dcca241618d..faf5baabbc8d603874a877971e829695953cf52e 100644 (file)
@@ -4,7 +4,7 @@
  *  Lewis and Michael Wester. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 static const bool do_test2 = false;  // set to true in order to run this beast
 
 static const symbol a1("a1"), a2("a2"), a3("a3"), a4("a4"), a5("a5"), a6("a6");
index 75e5bc5081b39df87c170d059d30fdd9055507df..ea1b917cb09953f456b9bc7581236b3acd61169a 100644 (file)
@@ -4,7 +4,7 @@
  *  Lewis and Michael Wester. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 static unsigned test()
 {
        // This is a pattern that comes up in graph theory:
index 0b5458320a8beab901b65b31ebdd27f9b1b6d0ca..e27f6e24b8e79fd59abf76b8c69d2cfc3f59cb2a 100644 (file)
@@ -4,7 +4,7 @@
  *  Lewis and Michael Wester. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 static unsigned test()
 {
        // create the matrix from test P...
index b42f5a2446883b393449de386aa679fdc1ac38e3..005df9cd2ad2a03abdbfe758877ad08159048641 100644 (file)
@@ -4,7 +4,7 @@
  *  Lewis and Michael Wester. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 static const bool do_test = true;  // set to true in order to run this beast
 
 static unsigned test()
index b20b7b1fbd22498a0ccf642b65a14f9915606d32..abdf33f93b12293f603cbd0cb14886f94ac48227 100644 (file)
@@ -4,7 +4,7 @@
  *  Lewis and Michael Wester. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 static const bool do_test = true;  // set to true in order to run this beast
 
 static unsigned test()
index 4e6081b194f923f2e87c57184e40f158344151dc..82698891aaeac6e8872ba21c72692a6f6f717061 100644 (file)
@@ -1,15 +1,39 @@
-#include <iostream>
-#include <string>
-#include <sstream>
+/** @file time_parser.cpp
+ *
+ *  Time the parser. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#include "ginac.h"
+#include "timer.h"
+using namespace GiNaC;
+
 #include <cstddef>
 #include <cstdlib>
-#include <vector>
+#include <iostream>
+#include <sstream>
 #include <stdexcept>
-#include "ginac.h"
-#include "timer.h"
-extern void randomify_symbol_serials();
+#include <string>
+#include <vector>
 using namespace std;
-using namespace GiNaC;
+
+extern void randomify_symbol_serials();
 
 /// make a string "1+x+2*x^2+...+n*x^n"
 static string prepare_str(const unsigned n, const char x = 'x')
index 813e5214fd741468156a2bfd2ee4da36d897c626..eb623d9c1fe1accef66d8d68ab44ce2e1840023f 100644 (file)
@@ -6,7 +6,7 @@
  */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 static unsigned toeplitz_det(unsigned size)
 {
        unsigned result = 0;
index ca5cc150296dd552b3419ebe524451ec0a8a637f..79acd122c0477ccaf384f1cc14c3582754860c24 100644 (file)
@@ -1,8 +1,27 @@
-#include <string>
-#include <cassert>
-#include <iostream>
-#include "timer.h"
+/** @file time_uvar_gcd.cpp
+ *
+ *  Time the different GCD algorithms. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #include "ginac.h"
+#include "timer.h"
 #include "error_report.h"
 #include "test_runner.h"
 #include "polynomial/remainder.h"
 #include "polynomial/mod_gcd.h"
 using namespace GiNaC;
 
+#include <string>
+#include <cassert>
+#include <iostream>
+
 static const std::string p1_srep("\
 -936639990+26248623452*x^47-30174373832*x^46-19627087954*x^45 \
 +23532819511*x^24-15331409214*x^23-5892518210*x^22-2954269379*x^28 \
@@ -1874,4 +1897,3 @@ static upoly make_random_upoly(const std::size_t deg)
                p[deg] = cln::random_I(biggish);
        return p;
 }
-
index ce0b286d3d5746c2894dd5aa7ecabf57aa6070df..1411a21b78225468a16e3efa6e1b76b1112dac8b 100644 (file)
@@ -7,7 +7,7 @@
  */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
 #include "ginac.h"
 #include "timer.h"
-using namespace std;
 using namespace GiNaC;
 
+#include <iostream>
+#include <vector>
+using namespace std;
+
 static unsigned vandermonde_det(unsigned size)
 {
        unsigned result = 0;
index 140df2fee34d9a73c0488ad369111350da42b88e..cf1975b87cec22dd12dfc79d24f05eb20b3e0759 100644 (file)
@@ -3,7 +3,7 @@
  *  A simple stop watch class. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,9 +20,6 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifdef HAVE_CONFIG_H
-#include "config.h"
-#endif
 #ifdef HAVE_RUSAGE
 #include <sys/resource.h>
 #include <unistd.h>
@@ -31,6 +28,9 @@
 #include <ctime>
 #endif
 
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
 #include "timer.h"
 
 timer::timer() : on(false)
index ba6ff3f671cc18228d78252aeac51d4fb5b473cd..89120368981f5c7593d590836820f8e6b8c9dd68 100644 (file)
@@ -3,7 +3,7 @@
  *  A simple stop watch class. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -26,6 +26,7 @@
 #ifdef HAVE_CONFIG_H
 #include "config.h"
 #endif
+
 #ifdef HAVE_RUSAGE
 #include <sys/resource.h>
 #else
index fe7a2648661966aa7d0ab0768148457039c95609..8decc6b49c85423b200e4effce990e1ef65ebed4 100644 (file)
@@ -24,7 +24,7 @@
 This is a tutorial that documents GiNaC @value{VERSION}, an open
 framework for symbolic computation within the C++ programming language.
 
-Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+Copyright (C) 1999-2009 Johannes Gutenberg University Mainz, Germany
 
 Permission is granted to make and distribute verbatim copies of
 this manual provided the copyright notice and this permission notice
@@ -52,7 +52,7 @@ notice identical to this one.
 
 @page
 @vskip 0pt plus 1filll
-Copyright @copyright{} 1999-2008 Johannes Gutenberg University Mainz, Germany
+Copyright @copyright{} 1999-2009 Johannes Gutenberg University Mainz, Germany
 @sp 2
 Permission is granted to make and distribute verbatim copies of
 this manual provided the copyright notice and this permission notice
@@ -135,7 +135,7 @@ the near future.
 
 @section License
 The GiNaC framework for symbolic computation within the C++ programming
-language is Copyright @copyright{} 1999-2008 Johannes Gutenberg
+language is Copyright @copyright{} 1999-2009 Johannes Gutenberg
 University Mainz, Germany.
 
 This program is free software; you can redistribute it and/or
index 06ada496cfbe3c7ad999081eb6e702089751d69d..4c857044d5df509892cce89bfbafe8bd99b45c79 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of GiNaC's sums of expressions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <stdexcept>
-#include <limits>
-#include <string>
-
 #include "add.h"
 #include "mul.h"
 #include "archive.h"
 #include "clifford.h"
 #include "ncmul.h"
 
+#include <iostream>
+#include <limits>
+#include <stdexcept>
+#include <string>
+
 namespace GiNaC {
 
 GINAC_IMPLEMENT_REGISTERED_CLASS_OPT(add, expairseq,
index 0dfd6034d5c9910386f61dab7b4e234144124398..c29dc262610507ca93cda53d79c3ee1887ccf7fa 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to GiNaC's sums of expressions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,8 +20,8 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_ADD_H__
-#define __GINAC_ADD_H__
+#ifndef GINAC_ADD_H
+#define GINAC_ADD_H
 
 #include "expairseq.h"
 
@@ -88,4 +88,4 @@ GINAC_DECLARE_UNARCHIVER(add);
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_ADD_H__
+#endif // ndef GINAC_ADD_H
index 1d65c7a9ec22f609dfefd62d8a64f919353e0aa5..f4a59f735d9c51e1b5c7b2f8ce550699cfe122eb 100644 (file)
@@ -3,7 +3,7 @@
  *  Archiving of GiNaC expressions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,9 +20,6 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <stdexcept>
-
 #include "archive.h"
 #include "registrar.h"
 #include "ex.h"
@@ -30,6 +27,9 @@
 #include "config.h"
 #include "tostring.h"
 
+#include <iostream>
+#include <stdexcept>
+
 namespace GiNaC {
 
 
index 5969b00c1d4c3c5c57da4d61d8f27b94977ec9e1..152eec4975364f1eb71cbf4141307ee935c5852b 100644 (file)
@@ -3,7 +3,7 @@
  *  Archiving of GiNaC expressions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_ARCHIVE_H__
-#define __GINAC_ARCHIVE_H__
+#ifndef GINAC_ARCHIVE_H
+#define GINAC_ARCHIVE_H
 
 #include "ex.h"
 
 #include <iosfwd>
+#include <map>
 #include <string>
 #include <vector>
-#include <map>
 
 namespace GiNaC {
 
@@ -337,7 +337,6 @@ private:
 std::ostream &operator<<(std::ostream &os, const archive &ar);
 std::istream &operator>>(std::istream &is, archive &ar);
 
-
 } // namespace GiNaC
 
-#endif // ndef __GINAC_ARCHIVE_H__
+#endif // ndef GINAC_ARCHIVE_H
index 070ddea2e8eaa90c33f4ac7d504bf908f3109023..ea7dd037d55c0d8fb1654dbbce04a82d42bc3380 100644 (file)
@@ -3,7 +3,7 @@
  *  Assertion macro definition. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,8 +20,8 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_ASSERTION_H__
-#define __GINAC_ASSERTION_H__
+#ifndef GINAC_ASSERTION_H
+#define GINAC_ASSERTION_H
 
 #if !defined(GINAC_ASSERT)
 #if defined(DO_GINAC_ASSERT)
@@ -34,4 +34,4 @@
 #endif
 #endif
 
-#endif // ndef __GINAC_ASSERTION_H__
+#endif // ndef GINAC_ASSERTION_H
index 04f87df12a94d974f12da2443f4c9e6ef37522b6..ff1f7a04f5f769d2501600ad807031efd2f3cb6a 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of GiNaC's ABC. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <stdexcept>
-#include <typeinfo>
-
 #include "basic.h"
 #include "ex.h"
 #include "numeric.h"
 #include "utils.h"
 #include "inifcns.h"
 
+#include <iostream>
+#include <stdexcept>
+#include <typeinfo>
+
 namespace GiNaC {
 
 GINAC_IMPLEMENT_REGISTERED_CLASS_OPT(basic, void,
index 51e0e909336f5a6d0791e6b6aae595194fcf1eb0..30abbb598016e5b4a55d2dc654188f6eba235e04 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to GiNaC's ABC. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_BASIC_H__
-#define __GINAC_BASIC_H__
-
-#include <cstddef> // for size_t
-#include <vector>
-#include <set>
-#include <map>
-#include <typeinfo> // for typeid
-// CINT needs <algorithm> to work properly with <vector>
-#include <algorithm>
+#ifndef GINAC_BASIC_H
+#define GINAC_BASIC_H
 
 #include "flags.h"
 #include "ptr.h"
 #include "assertion.h"
 #include "registrar.h"
 
+// CINT needs <algorithm> to work properly with <vector>
+#include <algorithm>
+#include <cstddef> // for size_t
+#include <map>
+#include <set>
+#include <typeinfo> // for typeid
+#include <vector>
+
 namespace GiNaC {
 
 class ex;
@@ -322,4 +322,4 @@ inline bool is_exactly_a(const basic & obj)
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_BASIC_H__
+#endif // ndef GINAC_BASIC_H
index c889dfca8e89b848283b46883697794a459a492d..a7aa8130daa08394de5c5d32da6ab073657538d6 100644 (file)
@@ -3,7 +3,7 @@
  *  Helper templates to provide per-class information for class hierarchies. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_CLASS_INFO_H__
-#define __GINAC_CLASS_INFO_H__
+#ifndef GINAC_CLASS_INFO_H
+#define GINAC_CLASS_INFO_H
 
 #include <cstddef> // for size_t
 #include <cstring>
-#include <vector>
-#include <map>
-#include <string>
-#include <iostream>
 #include <iomanip>
+#include <iostream>
+#include <map>
 #include <stdexcept>
+#include <string>
+#include <vector>
 
 namespace GiNaC {
 
@@ -195,4 +195,4 @@ template <class OPT> bool class_info<OPT>::parents_identified = false;
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_CLASS_INFO_H__
+#endif // ndef GINAC_CLASS_INFO_H
index f332c64edd034ce06987e1cffb24373ebd42e160..3b4684c2165f07dda393d241401caeff9ba9db23 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of GiNaC's clifford algebra (Dirac gamma) objects. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,8 +20,6 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <stdexcept>
-
 #include "clifford.h"
 
 #include "ex.h"
@@ -40,6 +38,8 @@
 #include "archive.h"
 #include "utils.h"
 
+#include <stdexcept>
+
 namespace GiNaC {
 
 GINAC_IMPLEMENT_REGISTERED_CLASS_OPT(clifford, indexed,
index efb9dd6652b49d6a24268faaf3e7ce5bdf6b5a5b..8b4a88f4e6f908c95b7398ef39174248eab2b224 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to GiNaC's clifford algebra (Dirac gamma) objects. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,8 +20,8 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_CLIFFORD_H__
-#define __GINAC_CLIFFORD_H__
+#ifndef GINAC_CLIFFORD_H
+#define GINAC_CLIFFORD_H
 
 #include "indexed.h"
 #include "tensor.h"
@@ -32,7 +32,6 @@
 
 namespace GiNaC {
 
-
 /** This class holds an object representing an element of the Clifford
  *  algebra (the Dirac gamma matrices). These objects only carry Lorentz
  *  indices. Spinor indices are hidden. A representation label (an unsigned
@@ -361,4 +360,4 @@ ex clifford_moebius_map(const ex & M, const ex & v, const ex & G, unsigned char
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_CLIFFORD_H__
+#endif // ndef GINAC_CLIFFORD_H
index b1ca9050ce51f19758ab8743a59bbcafa0eca7aa..2a83458b48e4cc45d3d0d1652f3b103bc2981927 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of GiNaC's color (SU(3) Lie algebra) objects. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,9 +20,6 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <stdexcept>
-
 #include "color.h"
 #include "idx.h"
 #include "ncmul.h"
@@ -35,6 +32,9 @@
 #include "archive.h"
 #include "utils.h"
 
+#include <iostream>
+#include <stdexcept>
+
 namespace GiNaC {
 
 GINAC_IMPLEMENT_REGISTERED_CLASS(color, indexed)
index d595cb3e374b285d5b6804b6b4f6100bd21c7308..f253ec51238dd61a759bb0a34d876c4fcfe2bade 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to GiNaC's color (SU(3) Lie algebra) objects. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,8 +20,8 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_COLOR_H__
-#define __GINAC_COLOR_H__
+#ifndef GINAC_COLOR_H
+#define GINAC_COLOR_H
 
 #include "indexed.h"
 #include "tensor.h"
@@ -30,7 +30,6 @@
 
 namespace GiNaC {
 
-
 /** This class holds a generator T_a or the unity element of the Lie algebra
  *  of SU(3), as used for calculations in quantum chromodynamics. A
  *  representation label (an unsigned 8-bit integer) is used to distinguish
@@ -192,7 +191,6 @@ ex color_trace(const ex & e, const lst & rll);
  *  @param rl Representation label */
 ex color_trace(const ex & e, unsigned char rl = 0);
 
-
 } // namespace GiNaC
 
-#endif // ndef __GINAC_COLOR_H__
+#endif // ndef GINAC_COLOR_H
index 66f6e92f984774adc03c2b6ee0dd60b12110de56..0bdcf025f5a82506dbaea14061d91b0467a740bb 100644 (file)
@@ -1,5 +1,27 @@
-#ifndef GINAC_COMPILER_DEP_HH
-#define GINAC_COMPILER_DEP_HH
+/** @file compiler.h
+ *
+ *  Definition of optimizing macros. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_COMPILER_H
+#define GINAC_COMPILER_H
 
 #ifdef __GNUC__
 #define unlikely(cond) __builtin_expect((cond), 0)
@@ -9,4 +31,4 @@
 #define likely(cond) (cond)
 #endif
 
-#endif /* GINAC_COMPILER_DEP_HH */
+#endif // ndef GINAC_COMPILER_DEP_H
index 10972b076a82d69c1b58824b88a681ed24f9f818..c7ef59d58cdacf3a488938951400d8f19b37d60d 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of GiNaC's constant types and some special constants. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <string>
-#include <stdexcept>
-#include <iostream>
-
 #include "constant.h"
 #include "numeric.h"
 #include "ex.h"
 #include "utils.h"
 #include "inifcns.h"
 
+#include <iostream>
+#include <stdexcept>
+#include <string>
+
 namespace GiNaC {
 
 GINAC_IMPLEMENT_REGISTERED_CLASS_OPT(constant, basic,
index efbe39e9d9beef52c4d7814b0f736c48206eb357..2353b32fa2d6aba9c18094d23346aa4c45363d7e 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to GiNaC's constant types and some special constants. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_CONSTANT_H__
-#define __GINAC_CONSTANT_H__
+#ifndef GINAC_CONSTANT_H
+#define GINAC_CONSTANT_H
 
-#include <string>
 #include "basic.h"
 #include "ex.h"
 #include "archive.h"
 
+#include <string>
+
 namespace GiNaC {
 
 typedef ex (*evalffunctype)();
@@ -84,4 +85,4 @@ extern const constant Euler;
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_CONSTANT_H__
+#endif // ndef GINAC_CONSTANT_H
index c13459492a201baa0b45b9817899e5aa1a58496b..cc03d7d852356bc8c95155fe90fc163a2ba16db6 100644 (file)
@@ -3,7 +3,7 @@
  *  Wrapper template for making GiNaC classes out of STL containers. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_CONTAINER_H__
-#define __GINAC_CONTAINER_H__
-
-#include <iterator>
-#include <stdexcept>
-#include <algorithm>
-#include <vector>
-#include <list>
-#include <memory>
+#ifndef GINAC_CONTAINER_H
+#define GINAC_CONTAINER_H
 
 #include "ex.h"
 #include "print.h"
 #include "archive.h"
 #include "assertion.h"
 
-namespace GiNaC {
+#include <algorithm>
+#include <iterator>
+#include <list>
+#include <memory>
+#include <stdexcept>
+#include <vector>
 
+namespace GiNaC {
 
 /** Helper template for encapsulating the reserve() mechanics of STL containers. */
 template <template <class T, class = std::allocator<T> > class C>
@@ -772,4 +771,4 @@ std::auto_ptr<typename container<C>::STLT> container<C>::subschildren(const exma
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_CONTAINER_H__
+#endif // ndef GINAC_CONTAINER_H
index 25d5607fdf2d6ba92ce2ebe1d0ae524c025f2318..9026a13b945db0755ef61454d542e4ecde98807f 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of GiNaC's light-weight expression handles. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,9 +20,6 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <stdexcept>
-
 #include "ex.h"
 #include "add.h"
 #include "mul.h"
@@ -34,6 +31,9 @@
 #include "relational.h"
 #include "utils.h"
 
+#include <iostream>
+#include <stdexcept>
+
 namespace GiNaC {
 
 //////////
index e3766a06bd05cbafff6e473be210066f11385c3e..3ec992238f165f36b52a3c65797c7aa5e629b139 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to GiNaC's light-weight expression handles. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_EX_H__
-#define __GINAC_EX_H__
+#ifndef GINAC_EX_H
+#define GINAC_EX_H
 
+#include "basic.h"
+#include "ptr.h"
+
+#include <functional>
 #include <iosfwd>
 #include <iterator>
-#include <functional>
 #include <stack>
 
-#include "basic.h"
-#include "ptr.h"
-
 namespace GiNaC {
 
-
 /** Helper class to initialize the library.  There must be one static object
  *  of this class in every object file that makes use of our flyweights in
  *  order to guarantee proper initialization.  Hence we put it into this
@@ -976,4 +975,4 @@ inline void iter_swap(list<GiNaC::ex>::iterator i1, list<GiNaC::ex>::iterator i2
 
 } // namespace std
 
-#endif // ndef __GINAC_EX_H__
+#endif // ndef GINAC_EX_H
index bc076945e77122aa499279324f2e2db533d3609e..fc04d5d4414ddcbdcbb3801fc68723665c873af2 100644 (file)
@@ -6,7 +6,7 @@
  */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
 
 #include "excompiler.h"
 
-#include <stdexcept>
-#include <ios>
-#include <fstream>
-#include <sstream>
-#include <string>
-#include <vector>
-
 #ifdef HAVE_CONFIG_H
 #include "config.h"
 #endif
 
-#ifdef HAVE_LIBDL
-#include <dlfcn.h>
-#endif // def HAVE_LIBDL
-
 #include "ex.h"
 #include "lst.h"
 #include "operators.h"
 #include "relational.h"
 #include "symbol.h"
 
+#ifdef HAVE_LIBDL
+#include <dlfcn.h>
+#endif // def HAVE_LIBDL
+#include <fstream>
+#include <ios>
+#include <sstream>
+#include <stdexcept>
+#include <string>
+#include <vector>
+
 namespace GiNaC {
 
 #ifdef HAVE_LIBDL
index 7122fef4da699fdb696092eead997961f6ae0d41..2862c67695392f4ec626493e762087e18631466f 100644 (file)
@@ -1,12 +1,10 @@
 /** @file excompiler.h
  *
  *  Functions to facilitate the conversion of a ex to a function pointer suited for
- *  fast numerical integration.
- *
- */
+ *  fast numerical integration. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_EXCOMPILER_H__
-#define __GINAC_EXCOMPILER_H__
-
-#include <string>
+#ifndef GINAC_EXCOMPILER_H
+#define GINAC_EXCOMPILER_H
 
 #include "lst.h"
 
+#include <string>
+
 namespace GiNaC {
 
 class ex;
@@ -125,4 +123,4 @@ void unlink_ex(const std::string filename);
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_EXCOMPILER_H__
+#endif // ndef GINAC_EXCOMPILER_H
index 09c6f6dd2c6569814ebc2a73f332d99be1fb634b..ade34d85da3b68d22128d047fde8787b6ec1b506 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of expression pairs (building blocks of expairseq). */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-
 #include "expair.h"
 #include "operators.h"
 
+#include <iostream>
+
 namespace GiNaC {
 
 void expair::print(std::ostream & os) const
index 1a335e0087d9b1fa6d84f4a8263c18e9492e027c..aa4a72cdd2f45b6552d5909dda4f32a4ed7ac913 100644 (file)
@@ -3,7 +3,7 @@
  *  Definition of expression pairs (building blocks of expairseq). */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,8 +20,8 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_EXPAIR_H__
-#define __GINAC_EXPAIR_H__
+#ifndef GINAC_EXPAIR_H
+#define GINAC_EXPAIR_H
 
 #include "ex.h"
 #include "numeric.h"
@@ -117,4 +117,4 @@ inline void iter_swap(std::vector<expair>::iterator i1, std::vector<expair>::ite
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_EXPAIR_H__
+#endif // ndef GINAC_EXPAIR_H
index c5911fc7fbf459f1748e18b10401df0d96531d26..72848364ae17de1b69f14393bd3ddd45584b5b63 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of sequences of expression pairs. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <algorithm>
-#include <string>
-#include <stdexcept>
-#include <iterator>
-
 #include "expairseq.h"
 #include "lst.h"
 #include "add.h"
 #include "utils.h"
 #include "indexed.h"
 
+#include <algorithm>
 #if EXPAIRSEQ_USE_HASHTAB
 #include <cmath>
 #endif // EXPAIRSEQ_USE_HASHTAB
+#include <iostream>
+#include <iterator>
+#include <stdexcept>
+#include <string>
 
 namespace GiNaC {
 
index f1b4309bea5d00a604aea5d7fc82f939fa98ceac..b5fa06574ebd70a2c387785fce687c7ba7654353 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to sequences of expression pairs. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_EXPAIRSEQ_H__
-#define __GINAC_EXPAIRSEQ_H__
-
-#include <vector>
-#include <list>
-#include <memory>
-// CINT needs <algorithm> to work properly with <vector> and <list>
-#include <algorithm>
+#ifndef GINAC_EXPAIRSEQ_H
+#define GINAC_EXPAIRSEQ_H
 
 #include "expair.h"
 #include "indexed.h"
 
+// CINT needs <algorithm> to work properly with <vector> and <list>
+#include <algorithm>
+#include <list>
+#include <memory>
+#include <vector>
+
 namespace GiNaC {
 
 /** Using hash tables can potentially enhance the asymptotic behaviour of
@@ -231,4 +231,4 @@ class make_flat_inserter
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_EXPAIRSEQ_H__
+#endif // ndef GINAC_EXPAIRSEQ_H
index 894eee831547e2bca165421dba2165a81d04415e..84efbc0648790ff45a5ee2e07e487bb1cba7fdf5 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of GiNaC's exprseq. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
index ea26f858241ec1fccb6c09764b585919ffe9728a..9d159e35f592c79ad16fa8d265e0a69a377442cd 100644 (file)
@@ -3,7 +3,7 @@
  *  Definition of GiNaC's exprseq. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_EXPRSEQ_H__
-#define __GINAC_EXPRSEQ_H__
-
-#include <vector>
+#ifndef GINAC_EXPRSEQ_H
+#define GINAC_EXPRSEQ_H
 
 #include "container.h"
 
+#include <vector>
+
 namespace GiNaC {
 
 typedef container<std::vector> exprseq;
@@ -36,4 +36,4 @@ template<> bool exprseq::info(unsigned inf) const;
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_EXPRSEQ_H__
+#endif // ndef GINAC_EXPRSEQ_H
index da870d3daf079a2d202376177074dbbc897e84e2..b8a1fb8ed296dc0b2a5a573e9c390d984c6b1512 100644 (file)
@@ -33,7 +33,7 @@
  */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
index b54e57b58f29d4dde383f35b0e8a4b29932caf6d..b61d278ce363c2ba4d4a67adbf90cc55b98d575a 100644 (file)
@@ -1,11 +1,9 @@
 /** @file factor.h
  *
- *  Polynomial factorization.
- *
- */
+ *  Polynomial factorization. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -22,8 +20,8 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_FACTOR_H__
-#define __GINAC_FACTOR_H__
+#ifndef GINAC_FACTOR_H
+#define GINAC_FACTOR_H
 
 namespace GiNaC {
 
@@ -45,4 +43,4 @@ extern ex factor(const ex& poly, unsigned options = 0);
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_FACTOR_H__
+#endif // ndef GINAC_FACTOR_H
index edc5852df684918ccdf47b9f4da0faa17b0fd86f..7664ebfe39853cb399061f68d8999686e64bf13e 100644 (file)
@@ -4,7 +4,7 @@
  *  somewhat obsolete (most of this can be replaced by exceptions). */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-
 #include "fail.h"
 #include "archive.h"
 #include "utils.h"
 
+#include <iostream>
+
 namespace GiNaC {
 
 GINAC_IMPLEMENT_REGISTERED_CLASS_OPT(fail, basic,
index dbd5fafdb2f1f756586cfdeadbd0f1c3601f4cf6..2393d32e6a5c9cfab2135481e9345b8048b05634 100644 (file)
@@ -4,7 +4,7 @@
  *  somewhat obsolete (most of this can be replaced by exceptions). */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -21,8 +21,8 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_FAIL_H__
-#define __GINAC_FAIL_H__
+#ifndef GINAC_FAIL_H
+#define GINAC_FAIL_H
 
 #include "basic.h"
 #include "archive.h"
@@ -45,4 +45,4 @@ GINAC_DECLARE_UNARCHIVER(fail);
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_FAIL_H__
+#endif // ndef GINAC_FAIL_H
index efe2a692a36c06d453130870af4ef0baebfff9ab..ae73eb489421f524bb0ed5c2d8928620a7d29438 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of abstract derivatives of functions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-
 #include "fderivative.h"
 #include "operators.h"
 #include "archive.h"
 #include "utils.h"
 
+#include <iostream>
+
 namespace GiNaC {
 
 GINAC_IMPLEMENT_REGISTERED_CLASS_OPT(fderivative, function,
index b43423cae6218bc537c8f37170545216878bd6dc..c15cc66221197659c3fd7c7db994f909880739ce 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to abstract derivatives of functions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_FDERIVATIVE_H__
-#define __GINAC_FDERIVATIVE_H__
-
-#include <set>
+#ifndef GINAC_FDERIVATIVE_H
+#define GINAC_FDERIVATIVE_H
 
 #include "function.h"
 
-namespace GiNaC {
+#include <set>
 
+namespace GiNaC {
 
 typedef std::multiset<unsigned> paramset;
 
@@ -87,4 +86,4 @@ GINAC_DECLARE_UNARCHIVER(fderivative);
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_DERIVATIVE_H__
+#endif // ndef GINAC_DERIVATIVE_H
index 3002fb716a05ff9677ddc8139c71fffebd58c231..c4593dc47c4c33627c2f2cdb44ba71fb1b96f032 100644 (file)
@@ -3,7 +3,7 @@
  *  Collection of all flags used through the GiNaC framework. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,8 +20,8 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_FLAGS_H__
-#define __GINAC_FLAGS_H__
+#ifndef GINAC_FLAGS_H
+#define GINAC_FLAGS_H
 
 namespace GiNaC {
 
@@ -292,4 +292,4 @@ public:
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_FLAGS_H__
+#endif // ndef GINAC_FLAGS_H
index 3ac3c3cab9e23549b35696f951dd3e307d0df278..dba4b3e0ba155fb4c9920882b8f615ad53a3db68 100644 (file)
@@ -2,7 +2,7 @@
 
 #  function.pl options: \$maxargs=${maxargs}
 # 
-#  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+#  GiNaC Copyright (C) 1999-2009 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
@@ -292,7 +292,7 @@ $interface=<<END_OF_INTERFACE;
  *  Please do not modify it directly, edit the perl script instead!
  *  function.pl options: \$maxargs=${maxargs}
  *
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -309,16 +309,15 @@ $interface=<<END_OF_INTERFACE;
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_FUNCTION_H__
-#define __GINAC_FUNCTION_H__
+#ifndef GINAC_FUNCTION_H
+#define GINAC_FUNCTION_H
 
-#include <string>
-#include <vector>
+#include "exprseq.h"
 
 // CINT needs <algorithm> to work properly with <vector>
 #include <algorithm>
-
-#include "exprseq.h"
+#include <string>
+#include <vector>
 
 // the following lines have been generated for max. ${maxargs} parameters
 $declare_function_macro
@@ -561,7 +560,7 @@ inline bool is_the_function(const ex & x)
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_FUNCTION_H__
+#endif // ndef GINAC_FUNCTION_H
 
 END_OF_INTERFACE
 
index b57c066e19f39f027835e93013d38bcef889f71d..1a23edd0cfca257b65b012be5fad1d669f87c630 100644 (file)
@@ -3,7 +3,7 @@
  *  This include file includes all other public GiNaC headers. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,8 +20,8 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_H__
-#define __GINAC_H__
+#ifndef GINAC_H
+#define GINAC_H
 
 #include "version.h"
 
@@ -81,4 +81,4 @@
 #pragma link C++ nestedtypedef;
 #endif
 
-#endif // ndef __GINAC_H__
+#endif // ndef GINAC_H
index e7aa924c446a5ab7c5907528e3ca95ae2dbf913d..c41fce290e7060025fcbe0a82d32f7225f048c6f 100644 (file)
@@ -3,7 +3,7 @@
  *  Replacement for map<> using hash tables. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_HASH_MAP_H__
-#define __GINAC_HASH_MAP_H__
+#ifndef GINAC_HASH_MAP_H
+#define GINAC_HASH_MAP_H
 
-#include <list>
-#include <iterator>
 #include <algorithm>
 #include <functional>
+#include <iterator>
+#include <list>
 #include <utility>
 
-
 namespace GiNaC {
 
 /*
@@ -594,4 +593,4 @@ inline void swap(GiNaC::exhashmap<T, A> &lhs, GiNaC::exhashmap<T, A> &rhs)
 
 } // namespace std
 
-#endif // ndef __GINAC_HASH_MAP_H__
+#endif // ndef GINAC_HASH_MAP_H
index 9a91e03dc45d5fa0957fd4954e678d58597c1ccb..c2565cada43947822d37de3a396e213948273e8d 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of GiNaC's indices. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <sstream>
-#include <stdexcept>
-
 #include "idx.h"
 #include "symbol.h"
 #include "lst.h"
 #include "archive.h"
 #include "utils.h"
 
+#include <iostream>
+#include <sstream>
+#include <stdexcept>
+
 namespace GiNaC {
 
 GINAC_IMPLEMENT_REGISTERED_CLASS_OPT(idx, basic,
index 7ea9e5fb7fc8285048ade83aab3eae08c0d0d443..09c8e3e2bf2e4ae515db7cb6f9354c3a718362b2 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to GiNaC's indices. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_IDX_H__
-#define __GINAC_IDX_H__
+#ifndef GINAC_IDX_H
+#define GINAC_IDX_H
 
 #include "ex.h"
 #include "numeric.h"
 
 namespace GiNaC {
 
-
 /** This class holds one index of an indexed object. Indices can
  *  theoretically consist of any symbolic expression but they are usually
  *  only just a symbol (e.g. "mu", "i") or numeric (integer). Indices belong
@@ -275,4 +274,4 @@ ex minimal_dim(const ex & dim1, const ex & dim2);
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_IDX_H__
+#endif // ndef GINAC_IDX_H
index 01fc985bb60805bb4cc1f961ae8faff42d4f3965..0360d3416fc9f5c372b933efd4ffba427807f006 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of GiNaC's indexed expressions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <sstream>
-#include <stdexcept>
-#include <limits>
-
 #include "indexed.h"
 #include "idx.h"
 #include "add.h"
 #include "matrix.h"
 #include "inifcns.h"
 
+#include <iostream>
+#include <limits>
+#include <sstream>
+#include <stdexcept>
+
 namespace GiNaC {
 
 GINAC_IMPLEMENT_REGISTERED_CLASS_OPT(indexed, exprseq,
index b5339a7e34005d47ff52554d9a4666c8c38075c7..71aee2ae6e3029647566d30fcd06440e25b7842e 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to GiNaC's indexed expressions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_INDEXED_H__
-#define __GINAC_INDEXED_H__
-
-#include <map>
+#ifndef GINAC_INDEXED_H
+#define GINAC_INDEXED_H
 
 #include "exprseq.h"
 #include "wildcard.h"
 
-namespace GiNaC {
+#include <map>
 
+namespace GiNaC {
 
 class scalar_products;
 class symmetry;
@@ -286,4 +285,4 @@ ex expand_dummy_sum(const ex & e, bool subs_idx = false);
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_INDEXED_H__
+#endif // ndef GINAC_INDEXED_H
index fa998b234bc1c6ff8968b993b42808188bf4d4a7..0abe001bb68f248299f5390ec1b1eb293efc9554 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of GiNaC's initially known functions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,9 +20,6 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <vector>
-#include <stdexcept>
-
 #include "inifcns.h"
 #include "ex.h"
 #include "constant.h"
@@ -37,6 +34,9 @@
 #include "symmetry.h"
 #include "utils.h"
 
+#include <stdexcept>
+#include <vector>
+
 namespace GiNaC {
 
 //////////
index b8349d1bba898d93e292debc4aef6ecbc313639d..ecfe561fd9a5167b5f245710562f402bf9a8fa4d 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to GiNaC's initially known functions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,8 +20,8 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_INIFCNS_H__
-#define __GINAC_INIFCNS_H__
+#ifndef GINAC_INIFCNS_H
+#define GINAC_INIFCNS_H
 
 #include "numeric.h"
 #include "function.h"
@@ -212,4 +212,4 @@ ex convert_H_to_Li(const ex& parameterlst, const ex& arg);
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_INIFCNS_H__
+#endif // ndef GINAC_INIFCNS_H
index 30c413ee178d8c8577595dcdd5b1456bd2d1b8c8..7d15231bbc5d35f7dfcd28e6eecccfed6e92715f 100644 (file)
@@ -4,7 +4,7 @@
  *  some related stuff. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -21,9 +21,6 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <vector>
-#include <stdexcept>
-
 #include "inifcns.h"
 #include "constant.h"
 #include "pseries.h"
@@ -35,6 +32,9 @@
 #include "symmetry.h"
 #include "utils.h"
 
+#include <stdexcept>
+#include <vector>
+
 namespace GiNaC {
 
 //////////
index 8212077f39f0c2b4858bf27233cd7909e2d9a9f1..2c4061a933850e781adf269d10373bda25fb6c9f 100644 (file)
@@ -47,7 +47,7 @@
  */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <sstream>
-#include <stdexcept>
-#include <vector>
-#include <cln/cln.h>
-
 #include "inifcns.h"
 
 #include "add.h"
 #include "utils.h"
 #include "wildcard.h"
 
+#include <cln/cln.h>
+#include <sstream>
+#include <stdexcept>
+#include <vector>
 
 namespace GiNaC {
 
index 57d13025c3447be0bba4206e910249f70dc5f618..e30f573a5321ce042163c53333c14b1dda9497ad 100644 (file)
@@ -4,7 +4,7 @@
  *  functions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -21,9 +21,6 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <vector>
-#include <stdexcept>
-
 #include "inifcns.h"
 #include "ex.h"
 #include "constant.h"
@@ -35,6 +32,9 @@
 #include "pseries.h"
 #include "utils.h"
 
+#include <stdexcept>
+#include <vector>
+
 namespace GiNaC {
 
 //////////
index d6a39cd0045611e0fd43140b79fcba986555268b..e5262e5edeeab724e982e2814d0f9784d7b022b6 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of GiNaC's symbolic  integral. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
index 874b528cc77eba720b2984fe4a950411fd0dd63c..3ff381026695780fcc5ba948493c94a389c6977d 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to GiNaC's symbolic  integral. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,8 +20,8 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_INTEGRAL_H__
-#define __GINAC_INTEGRAL_H__
+#ifndef GINAC_INTEGRAL_H
+#define GINAC_INTEGRAL_H
 
 #include "basic.h"
 #include "ex.h"
@@ -93,4 +93,4 @@ GiNaC::ex adaptivesimpson(
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_INTEGRAL_H__
+#endif // ndef GINAC_INTEGRAL_H
index f2106bd7ba30aea73bf8801b37d7d9aafc6179a0..9c3b5c651e0686c6274919cd47935822e77ae099 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of GiNaC's lst. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
index 85b5f893f6ddc9a50861954d5622e425945e90c3..7be96b9936b3da3e5585a90726c0a0e299e8eba7 100644 (file)
@@ -3,7 +3,7 @@
  *  Definition of GiNaC's lst. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_LST_H__
-#define __GINAC_LST_H__
-
-#include <list>
+#ifndef GINAC_LST_H
+#define GINAC_LST_H
 
 #include "container.h"
 
+#include <list>
+
 namespace GiNaC {
 
 typedef container<std::list> lst;
@@ -46,4 +46,4 @@ GINAC_DECLARE_UNARCHIVER(lst);
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_LST_H__
+#endif // ndef GINAC_LST_H
index 37c4927786299f1ad84453897258c6b0401fe6c3..1591e10a25c6ee3141333ee4ac3bbb231e705705 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of symbolic matrices */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <string>
-#include <iostream>
-#include <sstream>
-#include <algorithm>
-#include <map>
-#include <stdexcept>
-
 #include "matrix.h"
 #include "numeric.h"
 #include "lst.h"
 #include "archive.h"
 #include "utils.h"
 
+#include <algorithm>
+#include <iostream>
+#include <map>
+#include <sstream>
+#include <stdexcept>
+#include <string>
+
 namespace GiNaC {
 
 GINAC_IMPLEMENT_REGISTERED_CLASS_OPT(matrix, basic,
index e48f3d8a19942773de59f3f50c189f04bee63845..ea149452d018d7f972d13a5307b2336a04bea915 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to symbolic matrices */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_MATRIX_H__
-#define __GINAC_MATRIX_H__
+#ifndef GINAC_MATRIX_H
+#define GINAC_MATRIX_H
 
-#include <vector>
-#include <string>
 #include "basic.h"
 #include "ex.h"
 #include "archive.h"
 
-namespace GiNaC {
+#include <string>
+#include <vector>
 
+namespace GiNaC {
 
 /** Helper template to allow initialization of matrices via an overloaded
  *  comma operator (idea stolen from Blitz++). */
@@ -250,4 +250,4 @@ inline ex symbolic_matrix(unsigned r, unsigned c, const std::string & base_name)
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_MATRIX_H__
+#endif // ndef GINAC_MATRIX_H
index c09a0a537e748590d13a808ff999a12cd096f12a..35ba88e4431dbf90ee7475117ed3623c2c7d24e0 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of GiNaC's products of expressions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <vector>
-#include <stdexcept>
-#include <limits>
-
 #include "mul.h"
 #include "add.h"
 #include "power.h"
 #include "symbol.h"
 #include "compiler.h"
 
+#include <iostream>
+#include <limits>
+#include <stdexcept>
+#include <vector>
+
 namespace GiNaC {
 
 GINAC_IMPLEMENT_REGISTERED_CLASS_OPT(mul, expairseq,
index bfcd886bbacd1b0d6443316ef91f507729f3b7ab..50ab6edc0b6f0e2da608ff07708c943ab46a93f9 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to GiNaC's products of expressions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,8 +20,8 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_MUL_H__
-#define __GINAC_MUL_H__
+#ifndef GINAC_MUL_H
+#define GINAC_MUL_H
 
 #include "expairseq.h"
 
@@ -102,4 +102,4 @@ GINAC_DECLARE_UNARCHIVER(mul);
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_MUL_H__
+#endif // ndef GINAC_MUL_H
index dcc5f8ca277457e966c1598b72fad981f220f276..0c22a81f159b0a8318002a89b84ea41ad7036c97 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of GiNaC's non-commutative products of expressions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <algorithm>
-#include <iostream>
-#include <stdexcept>
-
 #include "ncmul.h"
 #include "ex.h"
 #include "add.h"
 #include "indexed.h"
 #include "utils.h"
 
+#include <algorithm>
+#include <iostream>
+#include <stdexcept>
+
 namespace GiNaC {
 
 GINAC_IMPLEMENT_REGISTERED_CLASS_OPT(ncmul, exprseq,
index 5e0a5d1950037a6851cb14ed7659816778015177..3ab3504befc57826616c54c2c13010ec1f9290f2 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to GiNaC's non-commutative products of expressions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,8 +20,8 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_NCMUL_H__
-#define __GINAC_NCMUL_H__
+#ifndef GINAC_NCMUL_H
+#define GINAC_NCMUL_H
 
 #include "exprseq.h"
 #include "archive.h"
@@ -96,4 +96,4 @@ ex hold_ncmul(const exvector & v);
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_NCMUL_H__
+#endif // ndef GINAC_NCMUL_H
index 54fff47bbfc5f505c8230c732b4d214870a0a33d..2a251a780704fdfb66ed96dc0befcf93567dc84b 100644 (file)
@@ -6,7 +6,7 @@
  *  computation, square-free factorization and rational function normalization. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -23,9 +23,6 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <algorithm>
-#include <map>
-
 #include "normal.h"
 #include "basic.h"
 #include "ex.h"
@@ -46,6 +43,9 @@
 #include "utils.h"
 #include "polynomial/chinrem_gcd.h"
 
+#include <algorithm>
+#include <map>
+
 namespace GiNaC {
 
 // If comparing expressions (ex::compare()) is fast, you can set this to 1.
index a352be8c8ef5f7fd5da48f8c6a95362db1667f26..3abb4fa381e53b6414def20953ad78f541798692 100644 (file)
@@ -6,7 +6,7 @@
  *  computation, square-free factorization and rational function normalization. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -23,8 +23,8 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_NORMAL_H__
-#define __GINAC_NORMAL_H__
+#ifndef GINAC_NORMAL_H
+#define GINAC_NORMAL_H
 
 #include "lst.h"
 
@@ -105,4 +105,4 @@ extern ex resultant(const ex & e1, const ex & e2, const ex & s);
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_NORMAL_H__
+#endif // ndef GINAC_NORMAL_H
index 50d873a9f6c5ac0da255553db40f64fb14a75057..255ec50003ae4e7bb214e994f14f4e6094f94de1 100644 (file)
@@ -7,7 +7,7 @@
  *  of special functions or implement the interface to the bignum package. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
 
 #include "config.h"
 
-#include <vector>
-#include <stdexcept>
-#include <string>
-#include <sstream>
-#include <limits>
-
 #include "numeric.h"
 #include "ex.h"
 #include "operators.h"
 #include "tostring.h"
 #include "utils.h"
 
+#include <limits>
+#include <sstream>
+#include <stdexcept>
+#include <string>
+#include <vector>
+
 // CLN should pollute the global namespace as little as possible.  Hence, we
 // include most of it here and include only the part needed for properly
 // declaring cln::cl_number in numeric.h.  This can only be safely done in
index 28bef0a06e172549699a3c4e2e8074f60accf176..3c5ec68b49583da86232e880a3d4a38427bd2ce9 100644 (file)
@@ -3,7 +3,7 @@
  *  Makes the interface to the underlying bignum package available. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_NUMERIC_H__
-#define __GINAC_NUMERIC_H__
+#ifndef GINAC_NUMERIC_H
+#define GINAC_NUMERIC_H
 
 #include "basic.h"
 #include "ex.h"
 #include "archive.h"
 
-#include <stdexcept>
-#include <vector>
-
 #include <cln/complex.h>
-
 #if defined(G__CINTVERSION) && !defined(__MAKECINT__)
 // Cint @$#$! doesn't like forward declaring classes used for casting operators
 // so we have to include the definition of cln::cl_N here, but it is enough to
 // do so for the compiler, hence the !defined(__MAKECINT__).
   #include <cln/complex_class.h>
 #endif
+#include <stdexcept>
+#include <vector>
 
 namespace GiNaC {
 
@@ -340,4 +338,4 @@ ex CatalanEvalf();
 #pragma link off defined_in cln/complex_class.h;
 #endif
 
-#endif // ndef __GINAC_NUMERIC_H__
+#endif // ndef GINAC_NUMERIC_H
index e8592e92b543dd1ebd63a524e27c7ccc274b392c..c5972c6ce9acc946a393a9aa59b75548b4f604b4 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of GiNaC's overloaded operators. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,9 +20,6 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <iomanip>
-
 #include "operators.h"
 #include "numeric.h"
 #include "add.h"
@@ -33,6 +30,9 @@
 #include "print.h"
 #include "utils.h"
 
+#include <iomanip>
+#include <iostream>
+
 namespace GiNaC {
 
 /** Used internally by operator+() to add two ex objects together. */
index c08713f31ce4799d5df1334575371b961d433bdb..a0fc6b7c852d5df4ed9ce1a77bca9e2d0be0cf11 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to GiNaC's overloaded operators. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,8 +20,8 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_OPERATORS_H__
-#define __GINAC_OPERATORS_H__
+#ifndef GINAC_OPERATORS_H
+#define GINAC_OPERATORS_H
 
 #include <iosfwd>
 
@@ -101,4 +101,4 @@ std::ostream & no_index_dimensions(std::ostream & os);
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_OPERATORS_H__
+#endif // ndef GINAC_OPERATORS_H
index 5221580d47a87939694d8f1f4c274bc91c67f176..5833a82afddae58f53c9a50b575e8ef3d3e09982 100644 (file)
@@ -1,9 +1,34 @@
-#ifndef GINAC_PARSER_DEBUG_HPP
-#define GINAC_PARSER_DEBUG_HPP
+/** @file debug.h
+ *
+ *  Debugging facilities for parser. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_PARSER_DEBUG_H
+#define GINAC_PARSER_DEBUG_H
+
+#include "compiler.h"
+
 #include <iosfwd>
 #include <sstream>
 #include <stdexcept>
-#include "compiler.h"
+
 #ifndef __GNUC__
 #if __STDC_VERSION__ < 199901L
 #define __PRETTY_FUNCTION__ "<unknown>"
@@ -44,5 +69,4 @@ do { \
        } \
 } while (0)
 
-#endif // GINAC_PARSER_DEBUG_HPP
-
+#endif // GINAC_PARSER_DEBUG_H
index 7b00c4aef560a8f00d4976ef0250049325548e44..050c85f73454a865750932297b0d0885a1bb934f 100644 (file)
@@ -1,11 +1,34 @@
-#include <string>
-#include <iostream>
-#include <sstream>
+/** @file lexer.cpp
+ *
+ *  Implementation of GiNaC's lexer. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #include "lexer.h"
 #include "compiler.h"
 
-namespace GiNaC
-{
+#include <iostream>
+#include <sstream>
+#include <string>
+
+namespace GiNaC {
+
 /// Skip to the end of line
 static int skipline(std::istream* s);
 /// Skip to the next non-whitespace character
@@ -154,4 +177,3 @@ std::string lexer::tok2str(const int tok) const
 }
 
 } // namespace GiNaC
-
index 0a00ed3936dbd2befc02d94e8a4d5778176d958c..7d23c091cf3bb39a16103460e751a760dfa18390 100644 (file)
@@ -1,10 +1,33 @@
-#ifndef GINAC_LEXER_HPP_
-#define GINAC_LEXER_HPP_
+/** @file lexer.h
+ *
+ *  The lexer. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_LEXER_H
+#define GINAC_LEXER_H
+
 #include <iosfwd>
 #include <string>
 #include <cstddef>
-namespace GiNaC
-{
+
+namespace GiNaC {
 
 class lexer
 {
@@ -44,5 +67,4 @@ public:
 
 } // namespace GiNaC
 
-#endif // GINAC_LEXER_HPP_
-
+#endif // ndef GINAC_LEXER_H
index 886975deeb2ccd666cb352de4647e8fe87e9521f..1dad113ecb5850c1ae263b84429f2cdd445ba85f 100644 (file)
@@ -1,17 +1,39 @@
+/** @file parse_binop_rhs.cpp
+ *
+ *  Code to deal with binary operators. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #include "ex.h"
 #include "symbol.h"
 #include "mul.h"
 #include "add.h"
 #include "power.h"
 #include "operators.h"
-#include <stdexcept>
-#include <sstream>
 #include "parser.h"
 #include "lexer.h"
 #include "debug.h"
 
-namespace GiNaC
-{
+#include <sstream>
+#include <stdexcept>
+
+namespace GiNaC {
 
 /// Make a sum or a product.
 static ex make_binop_expr(const int binop, const exvector& args);
@@ -173,4 +195,3 @@ static int get_tok_prec(const int c)
 }
 
 } // namespace GiNaC
-
index 71b1748685c75a66dcee99df4003001c6b13073d..5c442023afa0bbaa3f59edcd456f0a9075cb0950 100644 (file)
@@ -1,8 +1,31 @@
+/** @file parse_context.cpp
+ *
+ *  Implementation of the parser context. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #include "parse_context.h"
+
 #include <sstream>
 #include <stdexcept>
-namespace GiNaC
-{
+
+namespace GiNaC {
 
 symbol
 find_or_insert_symbol(const std::string& name, symtab& syms, const bool strict)
@@ -28,5 +51,4 @@ find_or_insert_symbol(const std::string& name, symtab& syms, const bool strict)
        return sy;
 }
 
-}
-
+} // namespace GiNaC
index efcb6c620f309f0413f9f4e1279164eb4eda1c09..15dfcd6302efb6e2ce173559e816b44eb98bf157 100644 (file)
@@ -1,14 +1,37 @@
-#ifndef _GINAC_PARSE_CONTEXT_HPP
-#define _GINAC_PARSE_CONTEXT_HPP
-#include <string>
-#include <cstddef> // size_t
+/** @file parse_context.h
+ *
+ *  Interface to parser context. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_PARSE_CONTEXT_H
+#define GINAC_PARSE_CONTEXT_H
+
 #include "ex.h"
 #include "symbol.h"
+
+#include <cstddef> // for size_t
 #include <map>
+#include <string>
 #include <utility>
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 /**
  * Establishes correspondence between the strings and expressions.
@@ -69,7 +92,6 @@ typedef std::map<prototype, reader_func> prototype_table;
  */
 extern const prototype_table& get_default_reader();
 
-}
-
-#endif // _GINAC_PARSE_CONTEXT_HPP
+} // namespace GiNaC
 
+#endif // GINAC_PARSE_CONTEXT_H
index b0d156e8a46b7b2f1ee508777bf72e13e47f4477..42edf5b0834eceac42f5bf52606935726c8a62ed 100644 (file)
@@ -1,13 +1,35 @@
-#include <stdexcept>
-#include <sstream>
+/** @file parser.cpp
+ *
+ *  Implementation of GiNaC's parser. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #include "parser.h"
 #include "lexer.h"
 #include "debug.h"
 #include "mul.h"
 #include "constant.h"
 
-namespace GiNaC 
-{
+#include <sstream>
+#include <stdexcept>
+
+namespace GiNaC {
 
 /// identifier_expr:  identifier |  identifier '(' expression* ')'
 ex parser::parse_identifier_expr()
index 523964d80a2ce033bb5ce1b8ef727d045c362b2d..0236f5c68e9f54a1343f12cbac52dc2788a8d3ad 100644 (file)
@@ -1,12 +1,34 @@
-#ifndef GINAC_PARSER_HPP_
-#define GINAC_PARSER_HPP_
+/** @file parser.h
+ *
+ *  Interface to the parser. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_PARSER_H
+#define GINAC_PARSER_H
 
 #include "parse_context.h"
-#include <stdexcept>
 #include "ex.h"
 
-namespace GiNaC
-{
+#include <stdexcept>
+
+namespace GiNaC {
 
 class lexer;
 
@@ -109,5 +131,4 @@ private:
 
 } // namespace GiNaC
 
-#endif // GINAC_PARSER_HPP_
-
+#endif // ndef GINAC_PARSER_H
index eede97e668b4192cc1e75131af997ae8e23bd51b..8bd2181434d8073ebc22921dbb7df893f4c73b64 100644 (file)
@@ -1,14 +1,35 @@
-/// @file parser_compat.cpp Parser interface compatible with the old
-///       (bison/flex based) parser.
+/** @file parser_compat.cpp
+ *
+ * Parser interface compatible with the old (bison/flex based) parser. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #include "ex.h"
 #include "idx.h"
 #include "lst.h"
 #include "parser.h"
-#include <string>
+
 #include <iostream>
+#include <string>
+
+namespace GiNaC {
 
-namespace GiNaC
-{
 static symtab make_symtab(const ex& l);
 
 ptr<basic> ex::construct_from_string_and_lst(const std::string &s, const ex &l)
@@ -45,5 +66,4 @@ static std::string get_symbol_name(const ex & s)
                throw (std::invalid_argument("get_symbol_name(): unexpected expression type"));
 }
 
-}
-
+} // namespace GiNaC
index 4048ee02c04d8accf9e1b7f1a8fcd26f7d868696..4d48e868f3cc1f45c40496880bef87353d5a8b13 100644 (file)
@@ -1,8 +1,29 @@
+/** @file cinrem_gcd.cpp
+ *
+ *  Chinese remainder algorithm. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #include "chinrem_gcd.h"
 #include "optimal_vars_finder.h"
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 ex chinrem_gcd(const ex& A, const ex& B)
 {
@@ -10,5 +31,5 @@ ex chinrem_gcd(const ex& A, const ex& B)
        ex g = chinrem_gcd(A, B, vars);
        return g;
 }
-} // namespace GiNaC
 
+} // namespace GiNaC
index 6c58a9fd4a6f286934c4e7303749feef84e4e10d..91359a9cfca2445ad4e2eb087ec71dfc8c527537 100644 (file)
@@ -1,9 +1,31 @@
+/** @file chinrem_gcd.h
+ *
+ *  Interface to GCD functions using Chinese remainder algorithm. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #ifndef GINAC_CHINREM_GCD_H
 #define GINAC_CHINREM_GCD_H
+
 #include "ex.h"
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 extern ex chinrem_gcd(const ex& A_, const ex& B_, const exvector& vars);
 extern ex chinrem_gcd(const ex& A, const ex& B);
@@ -13,7 +35,6 @@ struct chinrem_gcd_failed
        virtual ~chinrem_gcd_failed() { }
 };
 
-}
-
-#endif /* GINAC_CHINREM_GCD_H */
+} // namspace GiNaC
 
+#endif // ndef GINAC_CHINREM_GCD_H
index f014a874e4a76cda43de60f49d1530226efdfb5e..6dc26f6d6bfba5cf55945eadc34f19af27f1013c 100644 (file)
@@ -1,19 +1,41 @@
-#include <iterator>
-#include <map>
-#include <algorithm>
-#include <stdexcept>
-#include <string>
+/** @file collect_vargs.cpp
+ *
+ *  Utility functions. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #include "add.h"
 #include "mul.h"
 #include "operators.h"
 #include "power.h"
 #include "collect_vargs.h"
-#include <cln/integer.h>
 #include "smod_helpers.h"
 #include "debug.h"
 
-namespace GiNaC
-{
+#include <algorithm>
+#include <cln/integer.h>
+#include <iterator>
+#include <map>
+#include <stdexcept>
+#include <string>
+
+namespace GiNaC {
 
 typedef std::map<exp_vector_t, ex> ex_collect_priv_t;
 
@@ -164,4 +186,3 @@ cln::cl_I integer_lcoeff(const ex& e, const exvector& vars)
 }
 
 } // namespace GiNaC
-
index 4dd16bab9bdb92c64f6713e0b175bcd3c77efb24..c4f236746caa3266e6d490bcb1805cddc4114d8a 100644 (file)
@@ -1,12 +1,35 @@
-#ifndef GINAC_COLLECT_VARGS_HPP
-#define GINAC_COLLECT_VARGS_HPP
+/** @file collect_vargs.h
+ *
+ *  Interface to utility functions. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_COLLECT_VARGS_H
+#define GINAC_COLLECT_VARGS_H
+
 #include "ex.h"
+
 #include <cln/integer.h>
+#include <utility> // for std::pair
 #include <vector>
-#include <utility> // std::pair
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 typedef std::vector<int> exp_vector_t;
 typedef std::vector<std::pair<exp_vector_t, ex> > ex_collect_t;
@@ -31,4 +54,4 @@ extern cln::cl_I integer_lcoeff(const ex& e, const exvector& vars);
 
 } // namespace GiNaC
 
-#endif /* GINAC_COLLECT_VARGS_HPP */
+#endif // ndef GINAC_COLLECT_VARGS_H
index 647778e336a22ee1802a9e2ff4924bf1beee0b70..e98bcf553f2df47fdcd722545647830bd416b5fc 100644 (file)
@@ -1,12 +1,35 @@
+/** @file cra_garner.cpp
+ *
+ *  Garner's algorithm. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#include "cra_garner.h"
+#include "compiler.h"
+
 #include <cln/integer.h>
 #include <cln/modinteger.h>
-#include <vector>
 #include <cstddef>
-#include "cra_garner.h"
-#include "compiler.h"
+#include <vector>
+
+namespace cln {
 
-namespace cln
-{
 using std::vector;
 using std::size_t;
 
@@ -88,4 +111,3 @@ cl_I integer_cra(const vector<cl_I>& residues,
 }
 
 } // namespace cln
-
index eff8e9ba7188899ec4d245db834557bf8142a321..d963da8eff57e43593ba00d1af0c57bd41666281 100644 (file)
@@ -1,12 +1,36 @@
+/** @file cra_garner.h
+ *
+ *  Interface to Garner's algorithm. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #ifndef CL_INTEGER_CRA
 #define CL_INTEGER_CRA
-#include <vector>
+
 #include <cln/integer.h>
+#include <vector>
+
+namespace cln {
 
-namespace cln
-{
 extern cl_I integer_cra(const std::vector<cl_I>& residues,
                        const std::vector<cl_I>& moduli);
-}
-#endif // CL_INTEGER_CRA
 
+} // namespace cln
+
+#endif // CL_INTEGER_CRA
index 48659fdd8bc4d3d2e086d6ec1d12f3a8a32f091d..f8d4a37db6262c98a54e62acb785fa1f58212d6d 100644 (file)
@@ -1,30 +1,53 @@
-#ifndef GINAC_MOD_GCD_DEBUG_HPP
-#define GINAC_MOD_GCD_DEBUG_HPP
+/** @file debug.h
+ *
+ *  Utility macros and functions for debugging. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_MOD_GCD_DEBUG_H
+#define GINAC_MOD_GCD_DEBUG_H
+
+#include "compiler.h"
+
 #include <iostream>
-#include <string>
-#include <stdexcept>
 #include <sstream>
-#include "compiler.h"
+#include <stdexcept>
+#include <string>
 
 #define DEBUG_PREFIX __func__ << ':' << __LINE__ << ": "
 #define EXCEPTION_PREFIX std::string(__func__) + std::string(": ") +
 
-#define Dout2(stream, msg) \
-do {                                                                   \
-       stream << DEBUG_PREFIX << msg << std::endl << std::flush;       \
+#define Dout2(stream, msg)                                    \
+do {                                                          \
+       stream << DEBUG_PREFIX << msg << std::endl << std::flush; \
 } while (0)
 #define Dout(msg) Dout2(std::cout, msg)
 
-#define bug3_on(condition, the_exception, msg)                         \
-do {                                                                   \
-       if (unlikely(condition)) {                                      \
-               std::ostringstream err_stream;                          \
-               Dout2(err_stream, "BUG: " << msg);                      \
-               throw the_exception(err_stream.str());                  \
-       }                                                               \
+#define bug3_on(condition, the_exception, msg)  \
+do {                                            \
+       if (unlikely(condition)) {                  \
+               std::ostringstream err_stream;          \
+               Dout2(err_stream, "BUG: " << msg);      \
+               throw the_exception(err_stream.str());  \
+       }                                           \
 } while (0)
 
 #define bug_on(condition, msg) bug3_on(condition, std::logic_error, msg)
 
-#endif // GINAC_MOD_GCD_DEBUG_HPP
-
+#endif // ndef GINAC_MOD_GCD_DEBUG_H
index 58ad7e8b4eba48b47e397c4bf4edb0468996150c..476558699acfda605ae2140e2d09e194eea694aa 100644 (file)
@@ -1,10 +1,32 @@
+/** @file divide_in_z_p.cpp
+ *
+ *  Implementation of polynomial division in Z/Zp. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #include "add.h"
 #include "operators.h"
 #include "power.h"
 #include "smod_helpers.h"
 
-namespace GiNaC
-{
+namespace GiNaC {
+
 /** 
  * Exact polynomial division of a, b \in Z_p[x_0, \ldots, x_n]
  * It doesn't check whether the inputs are proper polynomials, so be careful
@@ -87,4 +109,4 @@ bool divide_in_z_p(const ex &a, const ex &b, ex &q, const exvector& vars, const
        return false;
 }
 
-}
+} // namespace GiNaC
index d973e5eaf7636a7dda93d45c12942cb7fb123300..4e771d7ad2704edbf4187da784f9ad37d1be2a73 100644 (file)
@@ -1,9 +1,31 @@
+/** @file divide_in_z_p.h
+ *
+ *  Interface to polynomial division in Z/Zp. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #ifndef GINAC_CHINREM_GCD_DIVIDE_IN_Z_P_H
 #define GINAC_CHINREM_GCD_DIVIDE_IN_Z_P_H
 
 #include "ex.h"
-namespace GiNaC
-{
+
+namespace GiNaC {
 
 /** 
  * Exact polynomial division of a, b \in Z_p[x_0, \ldots, x_n]
@@ -23,5 +45,4 @@ divide_in_z_p(const ex &a, const ex &b, ex &q, const exvector& vars, const long
 
 } // namespace GiNaC
 
-#endif /* GINAC_CHINREM_GCD_DIVIDE_IN_Z_P_H */
-
+#endif // ndef GINAC_CHINREM_GCD_DIVIDE_IN_Z_P_H
index 3b5d7298a260074f767d5e1b2455a1798a535de5..a9a17448734adc9392b60abe9eb52a92d8c2d29e 100644 (file)
@@ -1,5 +1,28 @@
+/** @file euclid_gcd_wrap.h
+ *
+ *  Euclidean GCD and supporting functions. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #ifndef GINAC_PGCD_EUCLID_GCD_H
 #define GINAC_PGCD_EUCLID_GCD_H
+
 #include "upoly.h"
 #include "gcd_euclid.h"
 #include "smod_helpers.h"
@@ -10,8 +33,7 @@
 #include "relational.h"
 #include "debug.h"
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 static void ex2upoly(umodpoly& u, ex e, const ex& var, const long p)
 {
@@ -57,4 +79,4 @@ static ex euclid_gcd(ex A, ex B, const ex& var, const long p)
 
 } // namespace GiNaC
 
-#endif
+#endif // ndef GINAC_PGCD_EUCLID_GCD_H
index afe718f9183f71206c9a98ade30a160365f46770..90c230aafdad8163950964e3cfee98bc247b67cf 100644 (file)
@@ -1,10 +1,33 @@
+/** @file eval_point_finder.h
+ *
+ *  Functions for finding an evaluation point. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #ifndef GINAC_PGCD_EVAL_POINT_FINDER_H
 #define GINAC_PGCD_EVAL_POINT_FINDER_H
+
 #include "operators.h"
+
 #include <set>
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 /// Find a `good' evaluation point b \in Z_p for a pair of multivariate
 /// polynomials A, B \in Z_p[x_n][x_0, \ldots, x_n]. Here `good' means
@@ -45,7 +68,6 @@ bool eval_point_finder::operator()(value_type& b, const ex& lc, const ex& x)
        return false;
 }
 
-}
-
-#endif /* GINAC_PGCD_EVAL_POINT_FINDER_H */
+} // namespace GiNaC
 
+#endif // ndef GINAC_PGCD_EVAL_POINT_FINDER_H
index 31fe591a0af17bb73f3480f0843bb51cf4e17845..169d514e26f14d76c011ab36d8aeb4cf22f5fdff 100644 (file)
@@ -1,10 +1,32 @@
-#ifndef GINAC_EVAL_UPOLY_TCC
-#define GINAC_EVAL_UPOLY_TCC
+/** @file eval_uvar.h
+ *
+ *  Numerical evaluation of univariate polynomials. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_EVAL_UPOLY_H
+#define GINAC_EVAL_UPOLY_H
+
 #include "upoly.h"
 #include "ring_traits.h"
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 /// Evaluate the polynomial using Horner rule.
 /// TODO: 
@@ -34,5 +56,4 @@ eval(const T& p, const typename T::value_type& x)
 
 } // namespace GiNaC
 
-#endif // GINAC_EVAL_UPOLY_TCC
-
+#endif // ndef GINAC_EVAL_UPOLY_H
index 4e148d1dc8eac6e7fb55ac4d306d76256285249a..f9c33ee1d005a156d2e5a0f7a68b3e7ad2ce30d4 100644 (file)
@@ -1,13 +1,35 @@
-#ifndef GINAC_GCD_EUCLID
-#define GINAC_GCD_EUCLID
+/** @file gcd_euclid.h
+ *
+ *  GCD using Euclidean algorithm. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_GCD_EUCLID_H
+#define GINAC_GCD_EUCLID_H
+
 #include "upoly.h"
 #include "remainder.h"
 #include "normalize.h"
 #include "debug.h"
 #include "upoly_io.h"
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 static bool
 gcd_euclid(umodpoly& c, umodpoly /* passed by value */ a, umodpoly b)
@@ -41,5 +63,4 @@ gcd_euclid(umodpoly& c, umodpoly /* passed by value */ a, umodpoly b)
 
 } // namespace GiNaC
 
-#endif // GINAC_GCD_EUCLID
-
+#endif // ndef GINAC_GCD_EUCLID_H
index 43d5f39343945746e157e313cba0985fc190a2ab..c9281b664075b2e663660fae72e3e9e0a3a6b94d 100644 (file)
@@ -1,10 +1,32 @@
+/** @file gcd_uvar.cpp
+ *
+ *  Several GCD algorithms. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #include "upoly.h"
 #include "sr_gcd_uvar.h"
 #include "heur_gcd_uvar.h"
+
 #include <stdexcept>
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 upoly sr_gcd(const upoly& a, const upoly& b)
 {
@@ -29,5 +51,4 @@ upoly pseudoremainder(const upoly& a, const upoly& b)
 
 }
 
-}
-
+} // namespace GiNaC
index 8dcccd222fd31bea20ee53828d4e374f45e50db8..dd2af260a71cd58a84ba69731d433894edd74f7a 100644 (file)
@@ -1,15 +1,38 @@
-#ifndef GINAC_UPOLY_HEUR_GCD
-#define GINAC_UPOLY_HEUR_GCD
+/** @file heur_gcd_uvar.h
+ *
+ *  Heuristic GCD code. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_UPOLY_HEUR_GCD_H
+#define GINAC_UPOLY_HEUR_GCD_H
+
 #include "upoly.h"
 #include "ring_traits.h"
 #include "normalize.h"
 #include "remainder.h"
 #include "eval_uvar.h"
 #include "interpolate_padic_uvar.h"
+
 #include <algorithm>
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 /// Compute GCD of primitive univariate polynomials.
 template<typename T> static bool
@@ -62,5 +85,4 @@ heur_gcd_z_priv(T& g, const T& a, const T& b, const unsigned max_tries = 66)
 
 } // namespace GiNaC
 
-#endif // GINAC_UPOLY_HEUR_GCD
-
+#endif // ndef GINAC_UPOLY_HEUR_GCD_H
index b1d79d98703b4f0cd495175cee03739a6f667c5d..10e1e53e5f312c9f50b4ede09575b2ee30dd5529 100644 (file)
@@ -1,9 +1,32 @@
-#ifndef GINAC_UPOLY_INTERPOLATE_PADIC_TCC
-#define GINAC_UPOLY_INTERPOLATE_PADIC_TCC
+/** @file interpolate_padic_uvar.h
+ *
+ *  Utility function for interpolation. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_UPOLY_INTERPOLATE_PADIC_H
+#define GINAC_UPOLY_INTERPOLATE_PADIC_H
+
 #include "ring_traits.h"
 
-namespace cln
-{
+namespace cln {
+
 static inline cln::cl_I smod(const cln::cl_I& x, const cln::cl_I y)
 {
        cln::cl_I r = mod(x, y);
@@ -15,8 +38,7 @@ static inline cln::cl_I smod(const cln::cl_I& x, const cln::cl_I y)
 
 } // namespace cln
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 template<typename T> static void
 interpolate(T& g, const typename T::value_type& gamma,
@@ -36,5 +58,4 @@ interpolate(T& g, const typename T::value_type& gamma,
 
 } // namespace GiNaC
 
-#endif // GINAC_UPOLY_INTERPOLATE_PADIC_TCC
-
+#endif // ndef GINAC_UPOLY_INTERPOLATE_PADIC_H
index 1dfd9207a7a767f7b9f373f90206aa1c4b07febe..b0c1b70a23219c0e414642c1d1ee23e91fe7bfdd 100644 (file)
@@ -1,14 +1,36 @@
+/** @file mgcd.cpp
+ *
+ *  Chinese remainder algorithm. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #include "operators.h"
 #include "chinrem_gcd.h"
-#include <cln/integer.h>
 #include "pgcd.h"
 #include "collect_vargs.h"
 #include "primes_factory.h"
 #include "divide_in_z_p.h"
 #include "poly_cra.h"
 
-namespace GiNaC
-{
+#include <cln/integer.h>
+
+namespace GiNaC {
 
 static cln::cl_I extract_integer_content(ex& Apr, const ex& A)
 {
@@ -94,4 +116,3 @@ ex chinrem_gcd(const ex& A_, const ex& B_, const exvector& vars)
 }
 
 } // namespace GiNaC
-
index d57d6cfc369e79b98f8df72cecca964aac12e512..243b96900a0db5f6faacfc02b56a88ecd2b7c8b7 100644 (file)
@@ -1,13 +1,36 @@
+/** @file mod_gcd.cpp
+ *
+ *  Implementation of modular GCD. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #include "upoly.h"
 #include "gcd_euclid.h"
 #include "cra_garner.h"
-#include <cln/random.h>
+#include "debug.h"
+
 #include <cln/numtheory.h>
+#include <cln/random.h>
 #include <stdexcept>
-#include "debug.h"
 
-namespace GiNaC
-{
+namespace GiNaC {
+
 /**
  * @brief Remove the integer content from univariate polynomials A and B.
  *
@@ -172,4 +195,3 @@ void mod_gcd(upoly& result, upoly A, upoly B)
 }
 
 } // namespace GiNaC
-
index 9307dd35d60a74aaeba0497f317b7112f40289b3..55b86a460d7374245519fa10437dcde9c2bd6b3d 100644 (file)
@@ -1,11 +1,34 @@
-#ifndef GINAC_MOD_GCD_HPP
-#define GINAC_MOD_GCD_HPP
+/** @file mod_gcd.h
+ *
+ *  Interface to modular GCD. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_MOD_GCD_H
+#define GINAC_MOD_GCD_H
+
 #include "upoly.h"
 
-namespace GiNaC
-{
+namespace GiNaC {
+
 extern void mod_gcd(upoly& result, upoly A, upoly B);
-}
 
-#endif // GINAC_MOD_GCD_HPP
+} // namespace GiNaC
 
+#endif // ndef GINAC_MOD_GCD_H
index e80687df94e68216acc95f4c099d2359f9df7ac7..9e605caba298ba131743a56da8056b4c0d0af8cb 100644 (file)
@@ -1,10 +1,33 @@
+/** @file newton_interpolate.h
+ *
+ *  Functions for Newton interpolation. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #ifndef GINAC_PGCD_NEWTON_INTERPOLATE_H
 #define GINAC_PGCD_NEWTON_INTERPOLATE_H
+
 #include "ex.h"
 #include "numeric.h"
 #include "smod_helpers.h"
-namespace GiNaC
-{
+
+namespace GiNaC {
 
 /**
  * Newton interpolation -- incremental form.
@@ -32,5 +55,6 @@ ex newton_interp(const ex& e1, const long pt1,
        return tmp;
 }
 
-}
-#endif /* GINAC_PGCD_NEWTON_INTERPOLATE_H */
+} // namespace GiNaC
+
+#endif // ndef GINAC_PGCD_NEWTON_INTERPOLATE_H
index 7f1ae7a57b624b244579b40b17ab17b18f841076..56f161be4747ab90aa2b1015b889dd42f241b6e7 100644 (file)
@@ -1,11 +1,33 @@
-#ifndef GINAC_UPOLY_NORMALIZE_TCC
-#define GINAC_UPOLY_NORMALIZE_TCC
+/** @file normalize.h
+ *
+ *  Functions to normalize polynomials in a field. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_UPOLY_NORMALIZE_H
+#define GINAC_UPOLY_NORMALIZE_H
+
 #include "upoly.h"
 #include "ring_traits.h"
 #include "debug.h"
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 /// Make the univariate polynomial @a a \in F[x] unit normal.
 /// F should be a field.
@@ -88,5 +110,4 @@ normalize_in_ring(T& x, typename T::value_type* content_ = 0, int* unit_ = 0)
 
 } // namespace GiNaC
        
-#endif // GINAC_UPOLY_NORMALIZE_TCC
-
+#endif // GINAC_UPOLY_NORMALIZE_H
index 4903699657fd57822454ba57134d900e5b14703f..e062da8b56d8a91e6bfcb03473806faf9464699e 100644 (file)
@@ -1,5 +1,25 @@
-#include <algorithm>
-#include <cstddef>
+/** @file optimal_vars_finder.cpp
+ *
+ *  Functions to optimize the choice of variable for multivariate GCD. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #include "optimal_vars_finder.h"
 #include "add.h"
 #include "mul.h"
 #include "symbol.h"
 #include "numeric.h"
 
-namespace GiNaC
-{
-namespace
-{
+#include <algorithm>
+#include <cstddef>
+
+namespace GiNaC {
+
+namespace {
 // XXX: copy-pasted from normal.cpp.
 /*
  *  Statistical information about symbols in polynomials
@@ -131,4 +153,3 @@ exvector gcd_optimal_variables_order(const ex& a, const ex& b)
 }
 
 } // namespace GiNaC
-
index 9715a476b5a43c0c726307570f047536279a25f5..af9c15825b8dde781c963e9a38a9ded0a3ea18e1 100644 (file)
@@ -1,10 +1,35 @@
+/** @file optimal_vars_finder.h
+ *
+ *  Interface to a function that optimizes the choice of variable for GCD
+ *  computations. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #ifndef GINAC_CHINREM_GCD_OPTIMAL_SYMBOL_FINDER_H
 #define GINAC_CHINREM_GCD_OPTIMAL_SYMBOL_FINDER_H
-#include <vector>
+
 #include "ex.h"
 
-namespace GiNaC
-{
+#include <vector>
+
+namespace GiNaC {
+
 /**
  * @brief Find the order of variables which is optimal for GCD computation.
  *
@@ -15,6 +40,7 @@ namespace GiNaC
  * for GCD computation.
  */
 extern exvector gcd_optimal_variables_order(const ex& A, const ex& B);
-}
-#endif /* GINAC_CHINREM_GCD_OPTIMAL_SYMBOL_FINDER_H */
 
+} // namespace GiNaC
+
+#endif // GINAC_CHINREM_GCD_OPTIMAL_SYMBOL_FINDER_H
index ddc3b8cb109ef7154cbf36f0202d5663954abb34..6e5e6b2ebc4bbaadc6adc1bcc20401f672d5af9d 100644 (file)
@@ -1,3 +1,25 @@
+/** @file pgcd.cpp
+ *
+ *  GCD for polynomials in prime field. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #include "pgcd.h"
 #include "collect_vargs.h"
 #include "smod_helpers.h"
@@ -6,8 +28,7 @@
 #include "newton_interpolate.h"
 #include "divide_in_z_p.h"
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 extern void
 primpart_content(ex& pp, ex& c, ex e, const exvector& vars, const long p);
@@ -133,4 +154,3 @@ ex pgcd(const ex& A, const ex& B, const exvector& vars, const long p)
 }
 
 } // namespace GiNaC
-
index 5e720381690a5a1daa11aff3cbdfd97a7279bd90..9162bb027c91363c2d9f77acbf4ca391e072c025 100644 (file)
@@ -1,9 +1,31 @@
+/** @file pgcd.h
+ *
+ *  Interface to GCD functions for polynomials over prime fields. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #ifndef GINAC_CHINREM_GCD_PGCD_H
 #define GINAC_CHINREM_GCD_PGCD_H
+
 #include "ex.h"
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 /// Exception to be thrown when modular GCD algorithm fails
 struct pgcd_failed
@@ -24,4 +46,4 @@ pgcd(const ex& A, const ex& B, const exvector& vars, const long p);
 
 } // namespace GiNaC
 
-#endif
+#endif // ndef GINAC_CHINREM_GCD_PGCD_H
index 2f68034cbca53b0bdd803c9bf719918020b8ea3e..f3c110fea21ab25b0351d824d694fcb0242cceba 100644 (file)
@@ -1,11 +1,34 @@
+/** @file poly_cra.h
+ *
+ *  Chinese remainder algorithm. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #ifndef GINAC_POLY_CRA_H
 #define GINAC_POLY_CRA_H
+
 #include "ex.h"
-#include <cln/integer.h>
 #include "smod_helpers.h"
 
-namespace GiNaC
-{
+#include <cln/integer.h>
+
+namespace GiNaC {
 
 /**
  * @brief Chinese reamainder algorithm for polynomials.
@@ -34,5 +57,4 @@ ex chinese_remainder(const ex& e1, const cln::cl_I& q1,
 
 } // namespace GiNaC
 
-#endif /* GINAC_POLY_CRA_H */
-
+#endif // ndef GINAC_POLY_CRA_H
index 20ea9c01405f28afd27bc946849c9782bd66b752..117ae0781ff392c5f378298c681fbc69b4a84c4d 100644 (file)
@@ -1,11 +1,33 @@
-#ifndef GINAC_POLYNOMIAL_PREM_TCC
-#define GINAC_POLYNOMIAL_PREM_TCC
+/** @file prem_uvar.h
+ *
+ *  Function to calculate the pseudo-remainder. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_POLYNOMIAL_PREM_H
+#define GINAC_POLYNOMIAL_PREM_H
+
 #include "upoly.h"
 #include "debug.h"
 #include "remainder.h"
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 /// Compute the pseudo-remainder of univariate polynomials @a a and @a b
 /// Pseudo remainder \f$r(x)\f$ is defined as 
@@ -41,7 +63,6 @@ template<typename T> bool pseudoremainder(T& r, const T& a, const T& b)
        return remainder_in_ring(r, a_, b);
 }
 
-}
-
-#endif // GINAC_POLYNOMIAL_PREM_TCC
+} // namespace GiNaC
 
+#endif // GINAC_POLYNOMIAL_PREM_H
index 0ebc872967d11ca1cc05f72730a04532fd5d4810..9fcc53f4bd0665b991d28abda6d9cbff0c63e006 100644 (file)
@@ -1,13 +1,36 @@
+/** @file primes_factory.h
+ *
+ *  Factory for prime numbers. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #ifndef GINAC_CHINREM_GCD_PRIMES_FACTORY_H
 #define GINAC_CHINREM_GCD_PRIMES_FACTORY_H
+
+#include "smod_helpers.h"
+#include "debug.h"
+
 #include <cln/integer.h>
 #include <cln/numtheory.h>
 #include <limits>
-#include "smod_helpers.h"
-#include "debug.h"
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 /**
  * Find a `big' prime p such that lc mod p != 0. Helper class used by modular
@@ -56,5 +79,4 @@ public:
 
 } // namespace GiNaC
 
-#endif /* GINAC_CHINREM_GCD_PRIMES_FACTORY_H */
-
+#endif // ndef GINAC_CHINREM_GCD_PRIMES_FACTORY_H
index fa7f69ba07bf39584a98dc43fc7b231c994d7fd2..44924e2d167984b5acfbf3c3826c3ecb6c60514a 100644 (file)
@@ -1,3 +1,25 @@
+/** @file primpart_content.cpp
+ *
+ *  Function to find primitive part of a multivariate polynomial. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #include "ex.h"
 #include "numeric.h"
 #include "collect_vargs.h"
@@ -5,8 +27,7 @@
 #include "divide_in_z_p.h"
 #include "debug.h"
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 /**
  * Compute the primitive part and the content of a modular multivariate
@@ -75,4 +96,3 @@ void primpart_content(ex& pp, ex& c, ex e, const exvector& vars,
 }
 
 } // namespace GiNaC
-
index 3b62ec4a485e470ab8bd57fa6447f3331562d04c..c099dfe9f9d4b7caabf33f455390d860b121145d 100644 (file)
@@ -1,12 +1,35 @@
-#ifndef GINAC_UPOLY_REMAINDER_TCC
-#define GINAC_UPOLY_REMAINDER_TCC
+/** @file remainder.h
+ *
+ *  Functions calculating remainders. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_UPOLY_REMAINDER_H
+#define GINAC_UPOLY_REMAINDER_H
+
 #include "upoly.h"
 #include "ring_traits.h"
 #include "upoly_io.h"
 #include "debug.h"
 
-namespace GiNaC
-{
+namespace GiNaC {
+
 /**
  * @brief Polynomial remainder for univariate polynomials over fields
  *
@@ -110,7 +133,7 @@ bool remainder_in_ring(T& r, const T& a, const T& b)
        canonicalize(r);
        return r.empty();
 }
-} // namespace GiNaC
 
-#endif // GINAC_UPOLY_REMAINDER_TCC
+} // namespace GiNaC
 
+#endif // GINAC_UPOLY_REMAINDER_H
index 540a6bd716e455eb7a084528b0d681ee3c8a08e9..01f2bbcf955e926dc68193c7116b28452fd4dc70 100644 (file)
@@ -1,10 +1,33 @@
-#ifndef GINAC_RING_TRAITS_HPP
-#define GINAC_RING_TRAITS_HPP
+/** @file ring_traits.h
+ *
+ *  Functions for polynomial ring arithmetic. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_RING_TRAITS_H
+#define GINAC_RING_TRAITS_H
+
 #include <cln/integer.h>
 #include <cln/modinteger.h>
 
-namespace cln
-{
+namespace cln {
+
 static inline cln::cl_I div(const cln::cl_I& x, const cln::cl_I& y)
 {
        return cln::exquo(x, y);
@@ -41,5 +64,4 @@ static inline T the_one(const T& sample)
 
 } // namespace cln
 
-#endif // GINAC_RING_TRAITS_HPP
-
+#endif // GINAC_RING_TRAITS_H
index addbe173de680afea3b836c45b6abd588c5320be..dc167ce1645d1a76ad5e8ffc60e5ee5025fcf9d2 100644 (file)
@@ -1,13 +1,36 @@
+/** @file smod_helpers.h
+ *
+ *  Utility functions for modular arithmetic. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #ifndef GINAC_POLYNOMIAL_SMOD_HELPERS_H
 #define GINAC_POLYNOMIAL_SMOD_HELPERS_H
-#include <cln/integer.h>
-#include <cln/integer_io.h>
+
 #include "ex.h"
 #include "numeric.h"
 #include "debug.h"
 
-namespace GiNaC
-{
+#include <cln/integer.h>
+#include <cln/integer_io.h>
+
+namespace GiNaC {
 
 /// Z -> Z_p (in the symmetric representation)
 static inline cln::cl_I smod(const cln::cl_I& a, long p)
index eead0027c418d4976eef6835604f8f3aeff76d6e..58600cbf657dfcfa6a26ed166ce1afe47cd4d0cc 100644 (file)
@@ -1,13 +1,36 @@
-#ifndef GINAC_UPOLY_SR_GCD_TCC
-#define GINAC_UPOLY_SR_GCD_TCC
+/** @file sr_gcd_uvar.h
+ *
+ *  GCD function for univariate polynomials using PRS method. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_UPOLY_SR_GCD_H
+#define GINAC_UPOLY_SR_GCD_H
+
 #include "upoly.h"
 #include "ring_traits.h"
 #include "normalize.h"
 #include "prem_uvar.h"
+
 #include <limits>
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 /// Calculate GCD of two univariate polynomials @a a and @a b using
 /// subresultant pseudo-remainder sequence method
@@ -89,7 +112,6 @@ sr_gcd_priv(T& g, T a, T b,
        } while (true);
 }
 
-}
-
-#endif // GINAC_UPOLY_SR_GCD_TCC
+} // namespace GiNaC
 
+#endif // GINAC_UPOLY_SR_GCD_H
index bbbb91a7ccb2854e7bed71137c03628ab359ecae..0603f42f5535a25795e8031d20d8e7947d0f9ba7 100644 (file)
@@ -1,19 +1,42 @@
-#ifndef GINAC_NEW_UPOLY_HPP
-#define GINAC_NEW_UPOLY_HPP
-#include <vector>
-#include <cstddef>
+/** @file upoly.h
+ *
+ *  Interface to polynomials with integer and modular coefficients. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_UPOLY_H
+#define GINAC_UPOLY_H
+
+#include "ring_traits.h"
+#include "debug.h"
+#include "compiler.h"
+
 #include <cln/integer.h>
-#include <cln/modinteger.h>
 #include <cln/integer_io.h>
-#include <stdexcept>
+#include <cln/modinteger.h>
+#include <cstddef>
 #include <iterator>
 #include <limits>
-#include "ring_traits.h"
-#include "debug.h"
-#include "compiler.h"
+#include <stdexcept>
+#include <vector>
 
-namespace GiNaC
-{
+namespace GiNaC {
 
 typedef std::vector<cln::cl_I> upoly;
 typedef std::vector<cln::cl_MI> umodpoly;
@@ -156,5 +179,4 @@ make_umodpoly(umodpoly& up, const upoly& p, const cln::cl_modint_ring& R)
 
 } // namespace GiNaC
 
-#endif // GINAC_NEW_UPOLY_HPP
-
+#endif // GINAC_UPOLY_H
index 6bba48d9e44f03bcfc53ddebd9aba0e7820bb3c2..247ad8701ac660759062c3425df408c2f2d6d3bc 100644 (file)
@@ -1,11 +1,34 @@
-#include <iostream>
-#include <string>
+/** @file upoly_io.cpp
+ *
+ *  Input/Output function for univariate polynomials. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
 #include "upoly.h"
 #include "upoly_io.h"
+
 #include <cln/integer_io.h>
+#include <iostream>
+#include <string>
+
+namespace GiNaC {
 
-namespace GiNaC
-{
 using std::ostream;
 using std::string;
 
@@ -34,15 +57,15 @@ print(const T& p, ostream& os, const string& varname = string("x"))
        }
 }
 
-#define DEFINE_OPERATOR_OUT(type)                                      \
-std::ostream& operator<<(std::ostream& os, const type& p)              \
-{                                                                      \
-       print(p, os);                                                   \
-       return os;                                                      \
-}                                                                      \
-void dbgprint(const type& p)                                           \
-{                                                                      \
-       print(p, std::cerr);                                            \
+#define DEFINE_OPERATOR_OUT(type)                         \
+std::ostream& operator<<(std::ostream& os, const type& p) \
+{                                                         \
+       print(p, os);                                         \
+       return os;                                            \
+}                                                         \
+void dbgprint(const type& p)                              \
+{                                                         \
+       print(p, std::cerr);                                  \
 }
 
 DEFINE_OPERATOR_OUT(upoly);
@@ -50,4 +73,3 @@ DEFINE_OPERATOR_OUT(umodpoly);
 #undef DEFINE_OPERATOR_OUT
 
 } // namespace GiNaC
-
index b88f602fd5d684ebc7e734a62cd86587443ae5ab..993251673df800e5fb48d261d1c70d131c134dad 100644 (file)
@@ -1,12 +1,37 @@
-#ifndef GINAC_UPOLY_IO_HPP
-#define GINAC_UPOLY_IO_HPP
-#include <iostream>
+/** @file upoly_io.h
+ *
+ *  Output operators for polynomials. */
+
+/*
+ *  GiNaC Copyright (C) 1999-2009 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+#ifndef GINAC_UPOLY_IO_H
+#define GINAC_UPOLY_IO_H
+
 #include "upoly.h"
 
-namespace GiNaC
-{
+#include <ostream>
+
+namespace GiNaC {
+
 extern std::ostream& operator<<(std::ostream&, const upoly& );
 extern std::ostream& operator<<(std::ostream&, const umodpoly& );
-}
 
-#endif // GINAC_UPOLY_IO_HPP
+} // namespace GiNaC
+
+#endif // GINAC_UPOLY_IO_H
index 53f7bb8700e9d27ce386ef24b6a5f13f38db4ff0..999d9b147284f894f1e18298f6bd9a5465c2e9e8 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of GiNaC's symbolic exponentiation (basis^exponent). */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <vector>
-#include <iostream>
-#include <stdexcept>
-#include <limits>
-
 #include "power.h"
 #include "expairseq.h"
 #include "add.h"
 #include "relational.h"
 #include "compiler.h"
 
+#include <iostream>
+#include <limits>
+#include <stdexcept>
+#include <vector>
+
 namespace GiNaC {
 
 GINAC_IMPLEMENT_REGISTERED_CLASS_OPT(power, basic,
index 4a22ef445c151787361494bf8adebac4d7ddd491..99a7bda3c17463d15e9dbbb3b8471b0ceb88debb 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to GiNaC's symbolic exponentiation (basis^exponent). */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,8 +20,8 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_POWER_H__
-#define __GINAC_POWER_H__
+#ifndef GINAC_POWER_H
+#define GINAC_POWER_H
 
 #include "basic.h"
 #include "ex.h"
@@ -132,4 +132,4 @@ inline ex sqrt(const ex & a)
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_POWER_H__
+#endif // ndef GINAC_POWER_H
index 4d5995b34cb638a13b022aae009d681663d880f9..187c4b5d6b3278ca24e8c5d9be8bc985be10cf1a 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of helper classes for expression output. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-
 #include "print.h"
 
+#include <iostream>
+
 namespace GiNaC {
 
 /** Next free ID for print_context types. */
index e2ba2509292084155c7c00bc0b4c1d48a8f8a12b..d9406abb275efe38e7213de4ca902f4faf6a0a3f 100644 (file)
@@ -3,7 +3,7 @@
  *  Definition of helper classes for expression output. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_PRINT_H__
-#define __GINAC_PRINT_H__
+#ifndef GINAC_PRINT_H
+#define GINAC_PRINT_H
+
+#include "class_info.h"
 
 #include <iosfwd>
-#include <string>
 #include <memory>
-
-#include "class_info.h"
+#include <string>
 
 namespace GiNaC {
 
-
 /** This class stores information about a registered print_context class. */
 class print_context_options {
 public:
@@ -272,4 +271,4 @@ private:
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_BASIC_H__
+#endif // ndef GINAC_BASIC_H
index 15fac1fdfe7a164f5eb16ee326d04f325c66db24..5c66deca06399bb03957279b2d2f42e3f27dd19b 100644 (file)
@@ -4,7 +4,7 @@
  *  methods for series expansion. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <numeric>
-#include <stdexcept>
-#include <limits>
-
 #include "pseries.h"
 #include "add.h"
 #include "inifcns.h" // for Order function
 #include "archive.h"
 #include "utils.h"
 
+#include <limits>
+#include <numeric>
+#include <stdexcept>
+
 namespace GiNaC {
 
 GINAC_IMPLEMENT_REGISTERED_CLASS_OPT(pseries, basic,
index e84cc5b3ae54c1349c63298bc0cb73e9b66efe9e..f465b8a45c969a13aa1470a0b217f8fae1ce8435 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to class for extended truncated power series. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,8 +20,8 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_SERIES_H__
-#define __GINAC_SERIES_H__
+#ifndef GINAC_SERIES_H
+#define GINAC_SERIES_H
 
 #include "basic.h"
 #include "expairseq.h"
@@ -144,4 +144,4 @@ inline bool is_terminating(const pseries & s)
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_SERIES_H__
+#endif // ndef GINAC_SERIES_H
index db7f95824864702962d5aa41723ecc8f8a7f01b1..6460fe106990feac6e9a41bcbd6d41e98f80ee90 100644 (file)
@@ -3,7 +3,7 @@
  *  Reference-counted pointer template. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_PTR_H__
-#define __GINAC_PTR_H__
+#ifndef GINAC_PTR_H
+#define GINAC_PTR_H
+
+#include "assertion.h"
 
 #include <cstddef> // for size_t
 #include <functional>
 #include <iosfwd>
 
-#include "assertion.h"
-
 namespace GiNaC {
 
-
 /** Base class for reference-counted objects. */
 class refcounted {
 public:
@@ -166,4 +165,4 @@ template <class T> struct less< GiNaC::ptr<T> >
 
 } // namespace std
 
-#endif // ndef __GINAC_PTR_H__
+#endif // ndef GINAC_PTR_H
index 2f5ac70c979658337937bccffb791b251dfd1dc9..f3efa28d76cdbacb37ab37b1376aef0d233c7340 100644 (file)
@@ -3,7 +3,7 @@
  *  GiNaC's class registrar (for class basic and all classes derived from it). */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <string>
+#include "registrar.h"
+
 #include <map>
 #include <stdexcept>
-
-#include "registrar.h"
+#include <string>
 
 namespace GiNaC {
 
index caa5e84e02ff6a7ce32d5207233b73190bb353ce..24ef9f77cb9605d3b0d228268a0371da510c37f7 100644 (file)
@@ -3,7 +3,7 @@
  *  GiNaC's class registrar (for class basic and all classes derived from it). */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_REGISTRAR_H__
-#define __GINAC_REGISTRAR_H__
-
-#include <string>
-#include <list>
-#include <vector>
-#include <typeinfo>
+#ifndef GINAC_REGISTRAR_H
+#define GINAC_REGISTRAR_H
 
 #include "class_info.h"
 #include "print.h"
 
+#include <list>
+#include <string>
+#include <typeinfo>
+#include <vector>
+
 namespace GiNaC {
 
 class ex;
@@ -197,4 +197,4 @@ extern void set_print_func(void (T::*f)(const C &, unsigned))
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_REGISTRAR_H__
+#endif // ndef GINAC_REGISTRAR_H
index d345943c26cc2bbea2157efbe0ff9894d220d0ad..fc75e68f93925ab54c4c09ac4aede3c1f507ceb9 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of relations between expressions */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <iostream>
-#include <stdexcept>
-
 #include "relational.h"
 #include "operators.h"
 #include "numeric.h"
 #include "archive.h"
 #include "utils.h"
 
+#include <iostream>
+#include <stdexcept>
+
 namespace GiNaC {
 
 GINAC_IMPLEMENT_REGISTERED_CLASS_OPT(relational, basic,
index b16b9d3f4f2aa0d59253f143fb3bd2d18cbb5c0b..87065f19f763eaec752dff9376326b79191982b7 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to relations between expressions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
@@ -20,8 +20,8 @@
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_RELATIONAL_H__
-#define __GINAC_RELATIONAL_H__
+#ifndef GINAC_RELATIONAL_H
+#define GINAC_RELATIONAL_H
 
 #include "basic.h"
 #include "ex.h"
@@ -117,4 +117,4 @@ inline relational::safe_bool relational::operator!() const
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_RELATIONAL_H__
+#endif // ndef GINAC_RELATIONAL_H
index 701a27e7b7c42a56fe229c88093be052853ecc56..1fd51b6198de08c1aeded497d0fb2882c7cee793 100644 (file)
@@ -4,7 +4,7 @@
  *  in GiNaC functions */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <stdexcept>
-
 #include "function.h"
 #include "utils.h"
 #include "remember.h"
 
+#include <stdexcept>
+
 namespace GiNaC {
 
 //////////
index 9a32d1753874d4de06b1f916c9c07eaed66c46c2..bf3e65dff23390a2da2680e33f29448ebd2dc7a4 100644 (file)
@@ -4,7 +4,7 @@
  *  in GiNaC functions */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_REMEMBER_H__
-#define __GINAC_REMEMBER_H__
+#ifndef GINAC_REMEMBER_H
+#define GINAC_REMEMBER_H
 
 #include <iosfwd>
-#include <vector>
 #include <list>
+#include <vector>
 
 namespace GiNaC {
 
@@ -98,4 +98,4 @@ protected:
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_REMEMBER_H__
+#endif // ndef GINAC_REMEMBER_H
index 67b29cb4738f9f785630576773f13426bcf6d422..6cefe0c8b7f48462e2f073116a666d35a8a6378d 100644 (file)
@@ -3,7 +3,7 @@
  *  Wrapper template for making GiNaC classes out of C++ structures. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_STRUCTURE_H__
-#define __GINAC_STRUCTURE_H__
-
-#include <functional>
+#ifndef GINAC_STRUCTURE_H
+#define GINAC_STRUCTURE_H
 
 #include "ex.h"
 #include "ncmul.h"
@@ -31,8 +29,9 @@
 #include "operators.h"
 #include "print.h"
 
-namespace GiNaC {
+#include <functional>
 
+namespace GiNaC {
 
 /** Comparison policy: all structures of one type are equal */
 template <class T>
@@ -244,7 +243,6 @@ int structure<T, CP>::compare_same_type(const basic & other) const
 template <class T, template <class> class CP>
 registered_class_info structure<T, CP>::reg_info = registered_class_info(registered_class_options(structure::get_class_name(), "basic", typeid(structure<T, CP>)));
 
-
 } // namespace GiNaC
 
-#endif // ndef __GINAC_STRUCTURE_H__
+#endif // ndef GINAC_STRUCTURE_H
index aa8ebc0fc28a00f254c5209418a1f67883852da1..cb33de7f964342699e2cc017bbdfbc181c5a2c76 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of GiNaC's symbolic objects. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#include <string>
-#include <stdexcept>
-#include <map>
-
 #include "symbol.h"
 #include "lst.h"
 #include "archive.h"
 #include "utils.h"
 #include "inifcns.h"
 
+#include <map>
+#include <stdexcept>
+#include <string>
+
 namespace GiNaC {
 
 GINAC_IMPLEMENT_REGISTERED_CLASS_OPT(symbol, basic,
index 3537776b7fa7c13b3e0860a0fc14cba70a666f42..abfb3d7dddef4e6ce0f07a776713e7a8c04e0e28 100644 (file)
@@ -3,7 +3,7 @@
  *  Interface to GiNaC's symbolic objects. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
-#ifndef __GINAC_SYMBOL_H__
-#define __GINAC_SYMBOL_H__
+#ifndef GINAC_SYMBOL_H
+#define GINAC_SYMBOL_H
 
-#include <string>
-#include <typeinfo>
 #include "basic.h"
 #include "ex.h"
 #include "ptr.h"
 #include "archive.h"
 
+#include <string>
+#include <typeinfo>
+
 namespace GiNaC {
 
 /** Basic CAS symbol.  It has a name because it must know how to output itself.
@@ -123,4 +124,4 @@ GINAC_DECLARE_UNARCHIVER(possymbol);
 
 } // namespace GiNaC
 
-#endif // ndef __GINAC_SYMBOL_H__
+#endif // ndef GINAC_SYMBOL_H
index 6b684c3055c9ea549555671e38911544628622cc..1de84e644dd9d95737c3a0812dd544225f9f9d7b 100644 (file)
@@ -3,7 +3,7 @@
  *  Implementation of GiNaC's symmetry definitions. */
 
 /*
- *  GiNaC Copyright (C) 1999-2008 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2009 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
  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */