\frac{1}{\sqrt{k}} \cdot {\left(\left(2 \cdot \pi\right) \cdot n\right)}^{\left(\frac{1 - k}{2}\right)}\frac{1}{\sqrt{k}} \cdot \left({\left(\left(2 \cdot \pi\right) \cdot n\right)}^{\left(\frac{\frac{1 - k}{2}}{2}\right)} \cdot \left({\left(\left(2 \cdot \pi\right) \cdot n\right)}^{\left(\frac{\frac{\frac{1 - k}{2}}{2}}{2}\right)} \cdot {\left(\left(2 \cdot \pi\right) \cdot n\right)}^{\left(\frac{\frac{\frac{1 - k}{2}}{2}}{2}\right)}\right)\right)double f(double k, double n) {
double r176568 = 1.0;
double r176569 = k;
double r176570 = sqrt(r176569);
double r176571 = r176568 / r176570;
double r176572 = 2.0;
double r176573 = atan2(1.0, 0.0);
double r176574 = r176572 * r176573;
double r176575 = n;
double r176576 = r176574 * r176575;
double r176577 = r176568 - r176569;
double r176578 = r176577 / r176572;
double r176579 = pow(r176576, r176578);
double r176580 = r176571 * r176579;
return r176580;
}
double f(double k, double n) {
double r176581 = 1.0;
double r176582 = k;
double r176583 = sqrt(r176582);
double r176584 = r176581 / r176583;
double r176585 = 2.0;
double r176586 = atan2(1.0, 0.0);
double r176587 = r176585 * r176586;
double r176588 = n;
double r176589 = r176587 * r176588;
double r176590 = r176581 - r176582;
double r176591 = r176590 / r176585;
double r176592 = 2.0;
double r176593 = r176591 / r176592;
double r176594 = pow(r176589, r176593);
double r176595 = r176593 / r176592;
double r176596 = pow(r176589, r176595);
double r176597 = r176596 * r176596;
double r176598 = r176594 * r176597;
double r176599 = r176584 * r176598;
return r176599;
}



Bits error versus k



Bits error versus n
Results
Initial program 0.4
rmApplied sqr-pow0.4
rmApplied sqr-pow0.5
Final simplification0.5
herbie shell --seed 2020036 +o rules:numerics
(FPCore (k n)
:name "Migdal et al, Equation (51)"
:precision binary64
(* (/ 1 (sqrt k)) (pow (* (* 2 PI) n) (/ (- 1 k) 2))))