X-Git-Url: https://ginac.de/CLN/cln.git//cln.git?a=blobdiff_plain;ds=sidebyside;f=src%2Freal%2Fmisc%2Fcl_R_expt.cc;h=7a6afc33dc93e03df68da1be440fbfbdc573a85c;hb=ce250e91fb8d16bc6b35be0add1896fc64f31ec1;hp=c1f581db242da53699c3d50e5792820d29661e23;hpb=850abfde7f0d985ba01526c346bcd0d733562943;p=cln.git

diff --git a/src/real/misc/cl_R_expt.cc b/src/real/misc/cl_R_expt.cc
index c1f581d..7a6afc3 100644
--- a/src/real/misc/cl_R_expt.cc
+++ b/src/real/misc/cl_R_expt.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_R expt_pos (const cl_R& x, uintL y)