X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=src%2Fent%2Fent-pseumpc.c;h=ef7b8c95620d37cb943b671090d12b941c00190d;hb=HEAD;hp=5778e7945111ac6f4b743d07cb630ff1a114a7ee;hpb=1473f115161aae88ea13df5f07ab4dbd3a8fea47;p=sxemacs diff --git a/src/ent/ent-pseumpc.c b/src/ent/ent-pseumpc.c index 5778e79..ef7b8c9 100644 --- a/src/ent/ent-pseumpc.c +++ b/src/ent/ent-pseumpc.c @@ -312,7 +312,7 @@ void bigc_set_bigfr_bigfr(bigc c, bigfr f1, bigfr f2) /* void bigc_set_bigc(bigc c, bigc c) * { - * bigc_set_bigfr_bigfr(bigc_re(c), z1); + * bigc_set_bigfr_bigfr(bigc_re(c), z1); * } */ @@ -550,7 +550,7 @@ void bigc_sqrt(bigc res, bigc c) bigc_abs(tmpnorm, c); bigfr_add(bigc_re(res), tmpnorm, bigc_re(c)); bigfr_sub(bigc_im(res), tmpnorm, bigc_re(c)); - + /* compute 1/2 and divide the above by it */ bigfr_set_long(tmphalf, 2); bigfr_div(bigc_re(res), bigc_re(res), tmphalf);