\frac{1}{\sqrt{k}} \cdot {\left(\left(2 \cdot \pi\right) \cdot n\right)}^{\left(\frac{1 - k}{2}\right)}
{\left(\sqrt{2} \cdot \sqrt{n \cdot \pi}\right)}^{\left(1 - k\right)} \cdot \sqrt{\frac{1}{k}}
(FPCore (k n) :precision binary64 (* (/ 1.0 (sqrt k)) (pow (* (* 2.0 PI) n) (/ (- 1.0 k) 2.0))))
(FPCore (k n) :precision binary64 (* (pow (* (sqrt 2.0) (sqrt (* n PI))) (- 1.0 k)) (sqrt (/ 1.0 k))))
double code(double k, double n) {
return (1.0 / sqrt(k)) * pow(((2.0 * ((double) M_PI)) * n), ((1.0 - k) / 2.0));
}
double code(double k, double n) {
return pow((sqrt(2.0) * sqrt(n * ((double) M_PI))), (1.0 - k)) * sqrt(1.0 / k);
}



Bits error versus k



Bits error versus n
Results
Initial program 0.5
Simplified0.5
Taylor expanded around 0 3.4
Simplified0.5
Taylor expanded around inf 0.6
Simplified0.6
Final simplification0.6
herbie shell --seed 2021196
(FPCore (k n)
:name "Migdal et al, Equation (51)"
:precision binary64
(* (/ 1.0 (sqrt k)) (pow (* (* 2.0 PI) n) (/ (- 1.0 k) 2.0))))