X-Git-Url: https://ginac.de/CLN/cln.git//cln.git?a=blobdiff_plain;f=src%2Fcomplex%2Fmisc%2Fcl_C_expt_I.cc;h=9e0bfd603c92d6619f39b6801b8429ddbb4437f4;hb=478f9e32c706f314e23cc20640f8650ce5631fe5;hp=64e1da03095cb463a099b894dc2d77626c5f61b8;hpb=850abfde7f0d985ba01526c346bcd0d733562943;p=cln.git diff --git a/src/complex/misc/cl_C_expt_I.cc b/src/complex/misc/cl_C_expt_I.cc index 64e1da0..9e0bfd6 100644 --- a/src/complex/misc/cl_C_expt_I.cc +++ b/src/complex/misc/cl_C_expt_I.cc @@ -16,15 +16,15 @@ namespace cln { // Methode: -// Für y>0: +// Für y>0: // a:=x, b:=y. // Solange b gerade, setze a:=a*a, b:=b/2. [a^b bleibt invariant, = x^y.] // c:=a. // Solange b:=floor(b/2) >0 ist, // setze a:=a*a, und falls b ungerade, setze c:=a*c. // Ergebnis c. -// Für y=0: Ergebnis 1. -// Für y<0: (/ (expt x (- y))). +// Für y=0: Ergebnis 1. +// Für y<0: (/ (expt x (- y))). // Assume y>0. inline const cl_N expt_pos (const cl_N& x, const cl_I& y) @@ -49,7 +49,7 @@ const cl_N expt (const cl_N& x, const cl_I& y) return expt(x,y); } if (eq(y,0)) { return 1; } // y=0 -> Ergebnis 1 - var cl_boolean y_negative = minusp(y); + var bool y_negative = minusp(y); var cl_I abs_y = (y_negative ? -y : y); // Betrag von y nehmen var cl_N z = expt_pos(x,abs_y); // (expt x (abs y)) return (y_negative ? recip(z) : z); // evtl. noch Kehrwert nehmen