Happy New Year!

[ginac.git] / check / mul_eval_memleak.cpp

diff --git a/check/mul_eval_memleak.cpp b/check/mul_eval_memleak.cpp
index d5d4b2b33a87c8d94c3daaba88f35c55a4c4214a..0d2b1d6eccf448253f8f60346d27030553a98f86 100644 (file)
--- a/check/mul_eval_memleak.cpp
+++ b/check/mul_eval_memleak.cpp
@@ -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-2007 Johannes Gutenberg University Mainz, Germany
+ *  GiNaC Copyright (C) 1999-2019 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
@@ -30,12 +31,13 @@
  *  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)
 {
@@ -47,30 +49,30 @@ const unsigned check_mul_eval_memleak(const unsigned N)
 )*(2539001*(-1+2*eps)*((-2539001/2)*eps^(-2)+(-7617003/2+1692800*log\
 (920*scale^(-1))+3385202*log(1301*scale^(-1)))*eps^(-1)+F)+286523497\
 2800*(-1+eps)^(-1)*eps^(-2)*(920*scale^(-1))^(-2*eps)*(1301*scale^(-\
-1))^(-2*eps)*tgamma(1+eps)2)+6061411748045832000*(-1+eps)^(-1)*eps^\
+1))^(-2*eps)*tgamma(1+eps)^2)+6061411748045832000*(-1+eps)^(-1)*eps^\
 (-2)*(920*scale^(-1))^(-2*eps)*(1301*scale^(-1))^(-2*eps)*tgamma(1+e\
-ps)2+716056132401*((-2539001/2)*eps^(-2)+(-7617003/2+1692800*log(92\
+ps)^2+716056132401*((-2539001/2)*eps^(-2)+(-7617003/2+1692800*log(92\
 0*scale^(-1))+3385202*log(1301*scale^(-1)))*eps^(-1)+F))+71656139360\
-0/716056132401*tgamma(1-eps)*tgamma(2*eps)^(-1)*tgamma(eps)2*tgamma\
+0/716056132401*tgamma(1-eps)*tgamma(2*eps)^(-1)*tgamma(eps)^2*tgamma\
 (3-eps)^(-1)*(920*scale^(-1))^(-4*eps)*tgamma(-1+2*eps)-2/6059274152\
 93858601*tgamma(3-eps)^(-1)*(2149010446400*(-1+2*eps)*((-2539001/2)*\
 eps^(-2)+(-7617003/2+1692800*log(920*scale^(-1))+3385202*log(1301*sc\
 ale^(-1)))*eps^(-1)+F)+2425134880977920000*(-1+eps)^(-1)*eps^(-2)*(9\
-20*scale^(-1))^(-2*eps)*(1301*scale^(-1))^(-2*eps)*tgamma(1+eps)2-7\
+20*scale^(-1))^(-2*eps)*(1301*scale^(-1))^(-2*eps)*tgamma(1+eps)^2-7\
 16056132401*((-2539001/2)*eps^(-2)+(-7617003/2+1692800*log(920*scale\
 ^(-1))+3385202*log(1301*scale^(-1)))*eps^(-1)+F)+1692601*(-1+2*eps)*\
 (2539001*(-1+2*eps)*((-2539001/2)*eps^(-2)+(-7617003/2+1692800*log(9\
 20*scale^(-1))+3385202*log(1301*scale^(-1)))*eps^(-1)+F)+28652349728\
 00*(-1+eps)^(-1)*eps^(-2)*(920*scale^(-1))^(-2*eps)*(1301*scale^(-1)\
-)^(-2*eps)*tgamma(1+eps)2))*tgamma(2-eps)+(1/716056132401*I)*tgamma\
-(-1+eps)*mb2*(mb*scale^(-1))^(-2*eps)*((716392960000*I)*mb^(-2)*(92\
+)^(-2*eps)*tgamma(1+eps)^2))*tgamma(2-eps)+(1/716056132401*I)*tgamma\
+(-1+eps)*mb^2*(mb*scale^(-1))^(-2*eps)*((716392960000*I)*mb^(-2)*(92\
 0*scale^(-1))^(-2*eps)*tgamma(-2+eps)-(2864898145201*I)*mb^(-2)*(130\
 1*scale^(-1))^(-2*eps)*tgamma(-2+eps)-(716224526400*I)*tgamma(-1+eps\
 )*mb^(-2)*(920*scale^(-1))^(-2*eps))-3385202/605927415293858601*tgam\
 ma(3-eps)^(-1)*tgamma(2-eps)*(2539001*(-1+2*eps)*((-2539001/2)*eps^(\
 -2)+(-7617003/2+1692800*log(920*scale^(-1))+3385202*log(1301*scale^(\
 -1)))*eps^(-1)+F)+2865234972800*(-1+eps)^(-1)*eps^(-2)*(920*scale^(-\
-1))^(-2*eps)*(1301*scale^(-1))^(-2*eps)*tgamma(1+eps)2+846201*((-25\
+1))^(-2*eps)*(1301*scale^(-1))^(-2*eps)*tgamma(1+eps)^2+846201*((-25\
 39001/2)*eps^(-2)+(-7617003/2+1692800*log(920*scale^(-1))+3385202*lo\
 g(1301*scale^(-1)))*eps^(-1)+F))\
 ");
@@ -94,7 +96,6 @@ g(1301*scale^(-1)))*eps^(-1)+F))\
 #include <sys/types.h>
 #include <sys/time.h>
 #include <sys/resource.h>
-#include <unistd.h>
 
 static void set_VM_limit(const unsigned long MB) {
        const unsigned mem_lim_kb = MB*1024*1024;
@@ -116,4 +117,3 @@ int main(int argc, char** argv) {
        }
        return 0;
 }
-