R \cdot \left(2 \cdot \tan^{-1}_* \frac{\sqrt{{\left(\sin \left(\frac{\phi_1 - \phi_2}{2}\right)\right)}^{2} + \left(\left(\cos \phi_1 \cdot \cos \phi_2\right) \cdot \sin \left(\frac{\lambda_1 - \lambda_2}{2}\right)\right) \cdot \sin \left(\frac{\lambda_1 - \lambda_2}{2}\right)}}{\sqrt{1 - \left({\left(\sin \left(\frac{\phi_1 - \phi_2}{2}\right)\right)}^{2} + \left(\left(\cos \phi_1 \cdot \cos \phi_2\right) \cdot \sin \left(\frac{\lambda_1 - \lambda_2}{2}\right)\right) \cdot \sin \left(\frac{\lambda_1 - \lambda_2}{2}\right)\right)}}\right)double f(double R, double lambda1, double lambda2, double phi1, double phi2) {
double r9972 = R;
double r9973 = 2.0;
double r9974 = phi1;
double r9975 = phi2;
double r9976 = r9974 - r9975;
double r9977 = r9976 / r9973;
double r9978 = sin(r9977);
double r9979 = pow(r9978, r9973);
double r9980 = cos(r9974);
double r9981 = cos(r9975);
double r9982 = r9980 * r9981;
double r9983 = lambda1;
double r9984 = lambda2;
double r9985 = r9983 - r9984;
double r9986 = r9985 / r9973;
double r9987 = sin(r9986);
double r9988 = r9982 * r9987;
double r9989 = r9988 * r9987;
double r9990 = r9979 + r9989;
double r9991 = sqrt(r9990);
double r9992 = 1.0;
double r9993 = r9992 - r9990;
double r9994 = sqrt(r9993);
double r9995 = atan2(r9991, r9994);
double r9996 = r9973 * r9995;
double r9997 = r9972 * r9996;
return r9997;
}
Please include this information when filing a bug report:
herbie shell --seed 2020045 +o rules:numerics
(FPCore (R lambda1 lambda2 phi1 phi2)
:name "Distance on a great circle"
:precision binary64
(* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))))
| hash-ref: no value found for key key: '(* #<enode 0(738)> #<enode 746(746)>) | L | C | |
|---|---|---|---|
| for-loop | /data/pavpan/nightlies/herbie/simplify-regraph-rebuilding/regraph/egraph.rkt | 270 | 6 |
| update-leader! | /data/pavpan/nightlies/herbie/simplify-regraph-rebuilding/regraph/egraph.rkt | 265 | 0 |
| for-loop | /data/pavpan/nightlies/herbie/simplify-regraph-rebuilding/regraph/main.rkt | 77 | 2 |
| prune-phase | /data/pavpan/nightlies/herbie/simplify-regraph-rebuilding/regraph/main.rkt | 74 | 0 |
| for-loop | /data/pavpan/nightlies/herbie/simplify-upwards-no-duplicates/src/core/simplify.rkt | 80 | 4 |
| for-loop | /data/pavpan/nightlies/herbie/simplify-upwards-no-duplicates/src/core/simplify.rkt | 76 | 2 |
| (unnamed) | /data/pavpan/nightlies/herbie/simplify-upwards-no-duplicates/src/core/simplify.rkt | 56 | 0 |
| (unnamed) | /data/pavpan/nightlies/herbie/simplify-upwards-no-duplicates/src/core/simplify.rkt | 38 | 0 |
| simplify! | /data/pavpan/nightlies/herbie/simplify-upwards-no-duplicates/src/mainloop.rkt | 224 | 0 |
| run-iter! | /data/pavpan/nightlies/herbie/simplify-upwards-no-duplicates/src/mainloop.rkt | 327 | 0 |
| for-loop | /data/pavpan/nightlies/herbie/simplify-upwards-no-duplicates/src/mainloop.rkt | 365 | 4 |
| run-improve47 | /data/pavpan/nightlies/herbie/simplify-upwards-no-duplicates/src/mainloop.rkt | 346 | 0 |
| .../more-scheme.rkt:261:28 | unknown | ||
| run | /opt/racket-7.5/share/pkgs/profile-lib/main.rkt | 39 | 2 |
| profile-thunk16 | /opt/racket-7.5/share/pkgs/profile-lib/main.rkt | 9 | 0 |
| (unnamed) | /opt/racket-7.5/collects/racket/private/more-scheme.rkt | 261 | 28 |