X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=check%2Fcheck_inifcns.cpp;h=3a914a90a7cd214d87e39a3ef81a0cebafdd09db;hp=b5945d2e15cca0124fded728120d6cebee96965a;hb=2dcbb3a4955e294d62b45c3db8bdccb7d6fdf833;hpb=383d5eb3b0f0506810d9105a268f939125bfc347 diff --git a/check/check_inifcns.cpp b/check/check_inifcns.cpp index b5945d2e..3a914a90 100644 --- a/check/check_inifcns.cpp +++ b/check/check_inifcns.cpp @@ -4,7 +4,7 @@ * functions. */ /* - * GiNaC Copyright (C) 1999-2001 Johannes Gutenberg University Mainz, Germany + * GiNaC Copyright (C) 1999-2002 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 @@ -178,7 +178,7 @@ static unsigned inifcns_check_Li2(void) argument = numeric(20.0*rand()/(RAND_MAX+1.0)-10.0) + numeric(20.0*rand()/(RAND_MAX+1.0)-10.0)*I; if (abs(Li2(pow(argument,2))-2*Li2(argument)-2*Li2(-argument)) > epsilon) { - cout << "Li2(z) at z==" << argument + clog << "Li2(z) at z==" << argument << " failed to satisfy Li2(z^2)==2*(Li2(z)+Li2(-z))" << endl; errorflag = true; }