Average Error: 18.7 → 13.5
Time: 10.8s
Precision: binary64
\[\]
\[\]
double code(double J, double K, double U) {
	return ((double) (((double) (((double) (-2.0 * J)) * ((double) cos(((double) (K / 2.0)))))) * ((double) sqrt(((double) (1.0 + ((double) pow(((double) (U / ((double) (((double) (2.0 * J)) * ((double) cos(((double) (K / 2.0)))))))), 2.0))))))));
}
double code(double J, double K, double U) {
	double VAR;
	if (((((double) (((double) (((double) (-2.0 * J)) * ((double) cos(((double) (K / 2.0)))))) * ((double) sqrt(((double) (1.0 + ((double) pow(((double) (U / ((double) (((double) cos(((double) (K / 2.0)))) * ((double) (J * 2.0)))))), 2.0)))))))) <= -inf.0) || !(((double) (((double) (((double) (-2.0 * J)) * ((double) cos(((double) (K / 2.0)))))) * ((double) sqrt(((double) (1.0 + ((double) pow(((double) (U / ((double) (((double) cos(((double) (K / 2.0)))) * ((double) (J * 2.0)))))), 2.0)))))))) <= 1.8142929240578263e+307))) {
		VAR = ((double) (((double) (((double) (-2.0 * J)) * ((double) cos(((double) (K / 2.0)))))) * ((double) (U * ((double) (((double) sqrt(0.25)) / ((double) (J * ((double) cos(((double) (K * 0.5))))))))))));
	} else {
		VAR = ((double) (((double) (((double) (-2.0 * J)) * ((double) cos(((double) (K / 2.0)))))) * ((double) sqrt(((double) (1.0 + ((double) pow(((double) (U / ((double) (((double) cos(((double) (K / 2.0)))) * ((double) (J * 2.0)))))), 2.0))))))));
	}
	return VAR;
}

Error

Bits error versus J

Bits error versus K

Bits error versus U

Try it out

Your Program's Arguments

Results

Enter valid numbers for all inputs

Derivation

  1. Split input into 2 regimes
  2. if (* (* (* -2.0 J) (cos (/ K 2.0))) (sqrt (+ 1.0 (pow (/ U (* (* 2.0 J) (cos (/ K 2.0)))) 2.0)))) < -inf.0 or 1.81429292405782629e307 < (* (* (* -2.0 J) (cos (/ K 2.0))) (sqrt (+ 1.0 (pow (/ U (* (* 2.0 J) (cos (/ K 2.0)))) 2.0))))

    1. Initial program 63.9

      \[\]
    2. Taylor expanded around inf 45.9

      \[\leadsto \]
    3. Simplified46.0

      \[\leadsto \]

    if -inf.0 < (* (* (* -2.0 J) (cos (/ K 2.0))) (sqrt (+ 1.0 (pow (/ U (* (* 2.0 J) (cos (/ K 2.0)))) 2.0)))) < 1.81429292405782629e307

    1. Initial program 0.1

      \[\]
  3. Recombined 2 regimes into one program.
  4. Final simplification13.5

    \[\leadsto \]

Reproduce

herbie shell --seed 2020192 
(FPCore (J K U)
  :name "Maksimov and Kolovsky, Equation (3)"
  :precision binary64
  (* (* (* -2.0 J) (cos (/ K 2.0))) (sqrt (+ 1.0 (pow (/ U (* (* 2.0 J) (cos (/ K 2.0)))) 2.0)))))