From f39ad090513e48fc2cbaf421c8b39fa3ca12a221 Mon Sep 17 00:00:00 2001 From: Alberto Ruiz Date: Wed, 19 Sep 2007 08:59:32 +0000 Subject: minor changes --- lib/GSL/gsl-aux.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib/GSL/gsl-aux.c') diff --git a/lib/GSL/gsl-aux.c b/lib/GSL/gsl-aux.c index c2839a8..0e8406c 100644 --- a/lib/GSL/gsl-aux.c +++ b/lib/GSL/gsl-aux.c @@ -229,7 +229,7 @@ int mapValCAux(int code, gsl_complex* pval, KGCVEC(x), GCVEC(r)) { OPV(2,gsl_complex_add(val,xp[k])) OPV(3,gsl_complex_sub(val,xp[k])) OPV(4,gsl_complex_pow(val,xp[k])) - OPV(5,gsl_complex_pow(val,xp[k])) + OPV(5,gsl_complex_pow(xp[k],val)) default: ERROR(BAD_CODE); } } -- cgit v1.2.3