\sqrt{\frac{1}{2} \cdot \left(1 + \frac{1}{\sqrt{1 + {\left(\frac{2 \cdot \ell}{Om}\right)}^{2} \cdot \left({\left(\sin kx\right)}^{2} + {\left(\sin ky\right)}^{2}\right)}}\right)}\sqrt{\frac{1}{2} \cdot \left(1 + \frac{1}{\sqrt{1 + \left({\left(\frac{2 \cdot \ell}{Om}\right)}^{\left(\frac{2}{2}\right)} \cdot \sqrt{{\left(\sin kx\right)}^{2} + {\left(\sin ky\right)}^{2}}\right) \cdot \left({\left(\frac{2 \cdot \ell}{Om}\right)}^{\left(\frac{2}{2}\right)} \cdot \sqrt{{\left(\sin kx\right)}^{2} + {\left(\sin ky\right)}^{2}}\right)}}\right)}double f(double l, double Om, double kx, double ky) {
double r35584 = 1.0;
double r35585 = 2.0;
double r35586 = r35584 / r35585;
double r35587 = l;
double r35588 = r35585 * r35587;
double r35589 = Om;
double r35590 = r35588 / r35589;
double r35591 = pow(r35590, r35585);
double r35592 = kx;
double r35593 = sin(r35592);
double r35594 = pow(r35593, r35585);
double r35595 = ky;
double r35596 = sin(r35595);
double r35597 = pow(r35596, r35585);
double r35598 = r35594 + r35597;
double r35599 = r35591 * r35598;
double r35600 = r35584 + r35599;
double r35601 = sqrt(r35600);
double r35602 = r35584 / r35601;
double r35603 = r35584 + r35602;
double r35604 = r35586 * r35603;
double r35605 = sqrt(r35604);
return r35605;
}
double f(double l, double Om, double kx, double ky) {
double r35606 = 1.0;
double r35607 = 2.0;
double r35608 = r35606 / r35607;
double r35609 = l;
double r35610 = r35607 * r35609;
double r35611 = Om;
double r35612 = r35610 / r35611;
double r35613 = 2.0;
double r35614 = r35607 / r35613;
double r35615 = pow(r35612, r35614);
double r35616 = kx;
double r35617 = sin(r35616);
double r35618 = pow(r35617, r35607);
double r35619 = ky;
double r35620 = sin(r35619);
double r35621 = pow(r35620, r35607);
double r35622 = r35618 + r35621;
double r35623 = sqrt(r35622);
double r35624 = r35615 * r35623;
double r35625 = r35624 * r35624;
double r35626 = r35606 + r35625;
double r35627 = sqrt(r35626);
double r35628 = r35606 / r35627;
double r35629 = r35606 + r35628;
double r35630 = r35608 * r35629;
double r35631 = sqrt(r35630);
return r35631;
}



Bits error versus l



Bits error versus Om



Bits error versus kx



Bits error versus ky
Results
Initial program 1.0
rmApplied add-sqr-sqrt1.0
Applied sqr-pow1.0
Applied unswap-sqr0.7
Final simplification0.7
herbie shell --seed 2020062
(FPCore (l Om kx ky)
:name "Toniolo and Linder, Equation (3a)"
:precision binary64
(sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))