Created
July 8, 2019 20:42
-
-
Save samth/24fbcb3304b84ad1f6d4d53f153c8168 to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
not same result untyped: +nan.0+nan.0i typed: +nan.0+0.0i | |
(/ 2.3454025 (flmin (real->double-flonum 1.797693134862315e+308) (real->double-flonum -1.2848677e+32)) (make-rectangular +nan.0 0.0)) | |
not same result untyped: -0.0-0.0i typed: -0.0+nan.0i | |
(/ (+ (real->double-flonum 0.41378116537811604) (real->double-flonum 1)) (round (real->double-flonum 1.8869765)) (make-rectangular -1/2 1.7976931348623157e+308)) | |
not same result untyped: 0.0-0.0i typed: 0.0+nan.0i | |
(/ (+ (exact-round 1.8655746e+35) (exact-round 1)) 2.0324421e-21 (make-rectangular 4 1.7976931348623157e+308)) | |
not same result untyped: -3.701631435361851+1.5e-322i typed: +nan.0+0.0i | |
(/ (bitwise-not (exact-round 0.9279912613796584)) (flcos (real->double-flonum -1)) (+ (make-rectangular 1 4e-323))) | |
not same result untyped: -0.0+0.0i typed: +nan.0+0.0i | |
(/ (make-rectangular -1.7976931348623157e+308 -1.0118355e-14)) | |
not same result untyped: -0.2-0.0i typed: +nan.0-0.0i | |
(/ (make-rectangular -5 2e-323)) | |
not same result untyped: -2.3480354005364233e-300-3.8135844188303834e+24i typed: -0.0+nan.0i | |
(/ -1144.6757051834838 1.8702761e-23 (make-rectangular 1e-323 -16.04883)) | |
not same result untyped: 2.5922170946555414-1.5e-323i typed: +nan.0-0.0i | |
(/ 4 (cosh (make-rectangular 1 1e-323))) | |
not same result untyped: 0.0-0.0i typed: +nan.0-0.0i | |
(/ 1.7976931348623141e+308 (make-rectangular (min 1.5e-323 +inf.0 -1.7976931348623147e+308) -0.766481613292698) (unsafe-fl+ (sub1 (real->double-flonum 0.6712944)) (real->double-flonum 0.0))) | |
not same result untyped: -7.976850792053209e+307+6.995069365946365e-16i typed: +nan.0+0.0i | |
(/ -1.797693134862314e+308 (flexp (real->double-flonum 0)) (make-rectangular (sqrt 5.0788827) (min 2e-323))) | |
not same result untyped: +nan.0+nan.0i typed: +inf.0+0.0i | |
(/ (make-polar 0.0 (max (real->double-flonum 2) (real->double-flonum 30.317604)))) | |
not same result untyped: +nan.0+nan.0i typed: -inf.0+nan.0i | |
(/ -8.302019e-6 (make-polar 0.0 5.560084769914483) (abs (real->double-flonum 0))) | |
not same result untyped: +nan.0+nan.0i typed: +inf.0+0.0i | |
(/ (* 0.0 (make-rectangular -7 6e-323) -1.7976931348623155e+308)) | |
not same result untyped: 1e-322+2.0i typed: 0.0+nan.0i | |
(/ (+ (make-rectangular 2.5e-323 -1/2) (* (exact-round 0) (exact-round -6.85372) (exact-round -1/2)))) | |
not same result untyped: 0.4655272429403348-0.0i typed: +nan.0-0.0i | |
(/ (make-rectangular 2.1481019965316337 1e-323)) | |
not same result untyped: -0.0+2.40129835e-29i typed: -0.0+nan.0i | |
(/ (+ (real->double-flonum -9.6051934e-29) (real->double-flonum 0)) (make-rectangular 1.5e-323 4)) | |
not same result untyped: 1.6613238491677433e-13-0.0i typed: +nan.0-0.0i | |
(/ (make-rectangular 6.019296e+12 1e-323)) | |
not same result untyped: +nan.0+nan.0i typed: -inf.0+0.0i | |
(/ -5 2/7 (make-polar -0.0 (fltan (real->double-flonum -3.833043e+21)))) | |
not same result untyped: -9.0651197858688e-54+9.080760665255492e+288i typed: -0.0+nan.0i | |
(/ (min (real->double-flonum 3) (real->double-flonum -1.7976931348623157e+308) (real->double-flonum 3/2)) (make-rectangular 2e-323 1.9796724097581277e+19)) | |
not same result untyped: -1.3451028767099911e+26+5.316552972037123e-297i typed: +nan.0+0.0i | |
(/ (tan (real->double-flonum 9)) 3.3626845e-27 (make-rectangular 1 4e-323)) | |
not same result untyped: +nan.0+nan.0i typed: +inf.0-0.0i | |
(/ (/ 1e-323 (make-rectangular 4 -1.7976931348623145e+308) (add1 (exact-round -0.0)))) | |
not same result untyped: +nan.0+nan.0i typed: -inf.0-0.0i | |
(/ (make-polar -0.0 -0.0)) | |
not same result untyped: 8.686650436982806+2.1e-322i typed: +nan.0+0.0i | |
(/ (sinh (sqr 2)) (make-rectangular (max (real->double-flonum 21/40) (real->double-flonum 2) (real->double-flonum -1)) (/ 6e-323 -15/13)) (unsafe-fl* (real->double-flonum 1) (flatan (real->double-flonum 7.9906573e+31)))) | |
not same result untyped: 3.9599206e-16-0.0i typed: +nan.0-0.0i | |
(/ (make-rectangular (/ (real->double-flonum 3.9599206e-16)) (unsafe-flabs (real->double-flonum 1e-323)))) | |
not same result untyped: +nan.0+nan.0i typed: +inf.0+0.0i | |
(/ (make-rectangular (floor 5e-324) -0.0)) | |
not same result untyped: 0.9883340996217054-5e-324i typed: +nan.0-0.0i | |
(/ (make-rectangular 1.0118036 5e-324)) | |
not same result untyped: 0.0-0.0i typed: +nan.0-0.0i | |
(/ (min 4 -1) (make-rectangular -1.7976931348623157e+308 -0.48362154)) | |
not same result untyped: -1e-323+2.2222222222222223i typed: -0.0+nan.0i | |
(/ (unsafe-flmin (real->double-flonum 1) (real->double-flonum 5/8)) (/ 1 -32/3) (make-rectangular 1.5e-323 3)) | |
not same result untyped: +nan.0+nan.0i typed: -inf.0-0.0i | |
(/ (make-polar (max (real->double-flonum 0.0) (real->double-flonum -2.400264341701695e+14)) (- (real->double-flonum 3) (real->double-flonum 1/2)))) | |
not same result untyped: 0.0-0.0i typed: 0.0+nan.0i | |
(/ (make-rectangular 4/5 1.797693134862315e+308)) | |
not same result untyped: 0.0-0.0i typed: +nan.0-0.0i | |
(/ (sqr 3) (make-rectangular 1.7976931348623151e+308 (cos 1.7976931348623147e+308))) | |
not same result untyped: +nan.0+inf.0i typed: -0.0+inf.0i | |
(/ (sub1 0.8550388) (+ (+ 5.5293337e-15 1.6585703248349453) (gcd (exact-round 0) (exact-round 1)) (+ (real->double-flonum 2) (real->double-flonum -1/2))) (sin (make-rectangular 0.0 8.4e-323))) | |
not same result untyped: -0.0-0.0i typed: +nan.0-0.0i | |
(/ (flcos (real->double-flonum 0)) (make-rectangular -1.7976931348623157e+308 1.5e-323)) | |
not same result untyped: 0.0-0.0i typed: 0.0+nan.0i | |
(/ (/ (real->double-flonum -1.4275423)) (make-rectangular -2.85069689139348e-54 -1.7976931348623151e+308)) | |
not same result untyped: -0.0-0.0i typed: -0.0+nan.0i | |
(* -0.0 (/ (make-rectangular -5e-324 0.02826022)) -0.03135514535167072) | |
not same result untyped: -0.0+0.0i typed: +nan.0+0.0i | |
(/ 2 (make-rectangular 1.7976931348623155e+308 1) (sub1 (real->double-flonum 0.034460585393126276))) | |
not same result untyped: -5e-323+5.1424126i typed: -0.0+nan.0i | |
(/ (flmin (real->double-flonum -15) (real->double-flonum -51.424126)) (add1 4) (make-rectangular 2e-323 2)) | |
not same result untyped: 4.849907969653664+3.1e-322i typed: +nan.0+0.0i | |
(- (cos (min (exact-round -9/5) (exact-round 7))) (/ 3.9495411046506046 (flceiling (real->double-flonum 3)) (make-rectangular -1/4 1.5e-323))) | |
not same result untyped: -2.966079813663431e+62-0.0i typed: -2.966079813663431e+62+nan.0i | |
(- (/ -0.3713432 (make-rectangular 5e-324 -1.797693134862315e+308)) (flexpt (max (real->double-flonum 1.4994744e-21)) (real->double-flonum -3))) | |
not same result untyped: +nan.0+nan.0i typed: -inf.0-0.0i | |
(/ (unsafe-flsqrt (real->double-flonum 7)) (make-polar (unsafe-fl* (real->double-flonum 0) (real->double-flonum 1.3238051e-30)) (ceiling (real->double-flonum 3)))) | |
not same result untyped: +nan.0+nan.0i typed: +inf.0-0.0i | |
(/ (max (exact-round -3) (exact-round 1)) 2 (make-polar 0.0 (fltan (real->double-flonum 0)))) | |
not same result untyped: 0.0-0.0i typed: 0.0+nan.0i | |
(/ (cos (real->double-flonum 2)) (make-rectangular (flmin (real->double-flonum -7.4815276e-19) (real->double-flonum 3/2)) (ceiling -1.7976931348623157e+308))) | |
type-before = (U 0 1 Byte-Larger-Than-One Float-Nan Float-Negative-Zero Float-Positive-Zero Positive-Fixnum-Not-Index Positive-Float-No-NaN Positive-Index-Not-Byte Positive-Integer-Not-Fixnum Positive-Rational-Not-Integer Positive-Single-Flonum-No-Nan Single-Flonum-Nan Single-Flonum-Negative-Zero Single-Flonum-Positive-Zero) | |
type-after = -inf.0 | |
(round (expt -0.0 -1)) | |
type-before = (U Float-Nan Float-Negative-Zero Float-Positive-Zero Positive-Float-No-NaN) | |
type-after = -inf.0 | |
(expt (sinh -0.0) (floor (real->double-flonum -1/9))) | |
type-before = (U 1 Float-Nan Float-Negative-Zero Float-Positive-Zero Positive-Float-No-NaN) | |
type-after = -inf.0 | |
(expt -0.0 (floor -2/3)) | |
type-before = (U 1 Float-Nan Float-Negative-Zero Float-Positive-Zero Positive-Float-No-NaN) | |
type-after = -inf.0 | |
(expt -0.0 -1) | |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment