Henrywood and Agarwal, Equation (13)

Time bar (total: 8.2s)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated; 0ms collecting garbage

analyze688.0ms (8.4%)

Memory
20.5MiB live, 946.1MiB allocated; 203ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.7%0.3%0%0%0%0
0%0%99.7%0.3%0%0%0%1
0%0%99.7%0.3%0%0%0%2
0%0%99.7%0.3%0%0%0%3
0%0%99.7%0.3%0%0%0%4
0%0%99.7%0.3%0%0%0%5
0%0%99.7%0.3%0%0%0%6
0%0%99.7%0.3%0%0%0%7
0%0%99.7%0.3%0%0%0%8
0%0%99.7%0.3%0%0%0%9
0%0%99.7%0.3%0%0%0%10
0%0%99.7%0.3%0%0%0%11
0%0%99.7%0.3%0%0%0%12
Compiler

Compiled 54 to 23 computations (57.4% saved)

sample3.7s (44.7%)

Memory
134.8MiB live, 4 641.7MiB allocated; 1.0s collecting garbage
Samples
932.0ms8 323×0invalid
583.0ms1 842×2valid
516.0ms4 231×0valid
417.0ms1 362×1valid
292.0ms821×3valid
0.0ms3exit
Precisions
Click to see histograms. Total time spent on operations: 1.9s
ival-mult!: 1.1s (56.2% of total)
ival-div!: 245.0ms (12.6% of total)
ival-sqrt: 239.0ms (12.3% of total)
adjust: 196.0ms (10.1% of total)
ival-add!: 112.0ms (5.8% of total)
ival-sub!: 57.0ms (2.9% of total)
Bogosity

preprocess69.0ms (0.8%)

Memory
-23.2MiB live, 35.0MiB allocated; 12ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
02171480
110611456
261471456
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
25.5%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Symmetry

(abs D)

(abs d)

(abs M)

Compiler

Compiled 66 to 42 computations (36.4% saved)

series148.0ms (1.8%)

Memory
-0.5MiB live, 287.3MiB allocated; 41ms collecting garbage
Counts
21 → 153
Calls
Call 1
Inputs
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
c0
(*.f64 #s(literal 2 binary64) w)
#s(literal 2 binary64)
w
(+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))
(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))
(*.f64 c0 (*.f64 d d))
(*.f64 d d)
d
(*.f64 (*.f64 w h) (*.f64 D D))
(*.f64 w h)
h
(*.f64 D D)
D
(sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))
(-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))
(*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))))
(*.f64 M M)
M
Outputs
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (/ c0 (* 2 w)) #s(hole binary64 (* 1/2 (/ c0 w))))
#s(approx c0 #s(hole binary64 c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (/ (* c0 (* d d)) (* (* w h) (* D D))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (* c0 (* d d)) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow c0 2) (+ (* -1/8 (/ (pow d 8) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 2) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (* -1 (pow M 2))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (- (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2)))) (pow M 2))))
#s(approx (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) #s(hole binary64 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (* (pow c0 2) (+ (* -1 (/ (pow M 2) (pow c0 2))) (/ (pow d 4) (* (pow D 4) (* (pow h 2) (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* 2 w) #s(hole binary64 (* 2 w)))
#s(approx w #s(hole binary64 w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (* w h) (* D D)) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* w h) #s(hole binary64 (* h w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow M 2) (pow w 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (pow h 2)))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx h #s(hole binary64 h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow M 2) (pow h 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (pow w 2)))) (pow h 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx D #s(hole binary64 D))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow D 4) (pow M 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow h 2) (pow w 2)))) (pow D 4))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx d #s(hole binary64 d))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow d 4) (+ (* -1/8 (/ (pow c0 4) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 6) (pow d 4)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (* (pow d 4) (+ (* -1 (/ (pow M 2) (pow d 4))) (/ (pow c0 2) (* (pow D 4) (* (pow h 2) (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (+ (* -1 (pow M 2)) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2)))))))
#s(approx (* M M) #s(hole binary64 (pow M 2)))
#s(approx M #s(hole binary64 M))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (* (pow M 2) (- (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (pow w 2))))) 1))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))))
Calls

18 calls:

TimeVariablePointExpression
24.0ms
D
@-inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* d d) d (* (* w h) (* D D)) (* w h) h (* D D) D (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M) M)
15.0ms
c0
@inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* d d) d (* (* w h) (* D D)) (* w h) h (* D D) D (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M) M)
10.0ms
w
@0
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* d d) d (* (* w h) (* D D)) (* w h) h (* D D) D (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M) M)
9.0ms
d
@inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* d d) d (* (* w h) (* D D)) (* w h) h (* D D) D (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M) M)
8.0ms
c0
@0
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* d d) d (* (* w h) (* D D)) (* w h) h (* D D) D (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M) M)

rewrite220.0ms (2.7%)

Memory
27.4MiB live, 309.3MiB allocated; 31ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0105613977
0107811750
1637911750
0803911426
Stop Event
iter-limit
node-limit
iter-limit
Counts
174 → 247
Calls
Call 1
Inputs
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
c0
(*.f64 #s(literal 2 binary64) w)
#s(literal 2 binary64)
w
(+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))))
(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))
(*.f64 c0 (*.f64 d d))
(*.f64 d d)
d
(*.f64 (*.f64 w h) (*.f64 D D))
(*.f64 w h)
h
(*.f64 D D)
D
(sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))
(-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M))
(*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))))
(*.f64 M M)
M
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (/ c0 (* 2 w)) #s(hole binary64 (* 1/2 (/ c0 w))))
#s(approx c0 #s(hole binary64 c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (/ (* c0 (* d d)) (* (* w h) (* D D))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (* c0 (* d d)) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow c0 2) (+ (* -1/8 (/ (pow d 8) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 2) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (* -1 (pow M 2))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (- (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2)))) (pow M 2))))
#s(approx (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) #s(hole binary64 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (* (pow c0 2) (+ (* -1 (/ (pow M 2) (pow c0 2))) (/ (pow d 4) (* (pow D 4) (* (pow h 2) (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* 2 w) #s(hole binary64 (* 2 w)))
#s(approx w #s(hole binary64 w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (* w h) (* D D)) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* w h) #s(hole binary64 (* h w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow M 2) (pow w 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (pow h 2)))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx h #s(hole binary64 h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow M 2) (pow h 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (pow w 2)))) (pow h 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx D #s(hole binary64 D))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow D 4) (pow M 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow h 2) (pow w 2)))) (pow D 4))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx d #s(hole binary64 d))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow d 4) (+ (* -1/8 (/ (pow c0 4) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 6) (pow d 4)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (* (pow d 4) (+ (* -1 (/ (pow M 2) (pow d 4))) (/ (pow c0 2) (* (pow D 4) (* (pow h 2) (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (+ (* -1 (pow M 2)) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2)))))))
#s(approx (* M M) #s(hole binary64 (pow M 2)))
#s(approx M #s(hole binary64 M))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) #s(hole binary64 (* (pow M 2) (- (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (pow w 2))))) 1))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))))
Outputs
(*.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))) (/.f64 c0 (+.f64 w w)))
(*.f64 (/.f64 c0 (+.f64 w w)) (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))
(/.f64 (*.f64 c0 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))) (+.f64 w w))
(fma.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (/.f64 c0 (+.f64 w w)) (*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))) (/.f64 c0 (+.f64 w w))))
(fma.f64 (/.f64 c0 (+.f64 w w)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (/.f64 c0 (+.f64 w w)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))
(+.f64 (*.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (/.f64 c0 (+.f64 w w))) (*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))) (/.f64 c0 (+.f64 w w))))
(+.f64 (*.f64 (/.f64 c0 (+.f64 w w)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) (*.f64 (/.f64 c0 (+.f64 w w)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))
(/.f64 (/.f64 c0 #s(literal 2 binary64)) w)
(/.f64 (neg.f64 c0) (neg.f64 (+.f64 w w)))
(/.f64 c0 (+.f64 w w))
c0
(*.f64 w #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) w)
(+.f64 w w)
#s(literal 2 binary64)
w
(/.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))) (-.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))
(/.f64 (+.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 3 binary64)) (pow.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)) #s(literal 3/2 binary64))) (+.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (-.f64 (*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))) (*.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))))
(fma.f64 (pow.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) M) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) M) #s(literal 1/2 binary64)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))
(fma.f64 (/.f64 c0 (*.f64 h w)) (/.f64 (*.f64 d d) (*.f64 D D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))
(fma.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) (*.f64 h w)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))
(fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))
(+.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))
(+.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 (/.f64 c0 (*.f64 h w)) (/.f64 (*.f64 d d) (*.f64 D D)))
(*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) (*.f64 h w)))
(*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 D D)) (*.f64 h w))
(/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (neg.f64 (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 h w)) (*.f64 D D))
(/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (*.f64 c0 d) d)
(*.f64 (*.f64 d d) c0)
(*.f64 c0 (*.f64 d d))
(*.f64 (pow.f64 d #s(literal 1 binary64)) (pow.f64 d #s(literal 1 binary64)))
(*.f64 (neg.f64 d) (neg.f64 d))
(*.f64 (fabs.f64 d) (fabs.f64 d))
(*.f64 d d)
(pow.f64 d #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 d) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 d) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 d) #s(literal 2 binary64))))
d
(*.f64 (*.f64 (*.f64 h w) D) D)
(*.f64 (*.f64 (*.f64 D D) h) w)
(*.f64 (*.f64 h w) (*.f64 D D))
(*.f64 (*.f64 D D) (*.f64 h w))
(*.f64 w (*.f64 (*.f64 D D) h))
(*.f64 h w)
(*.f64 w h)
h
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (neg.f64 D) (neg.f64 D))
(*.f64 (fabs.f64 D) (fabs.f64 D))
(*.f64 D D)
(pow.f64 D #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 D) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 D) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 D) #s(literal 2 binary64))))
D
(*.f64 (pow.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) M) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) M) #s(literal 1/2 binary64)))
(pow.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))
(exp.f64 (*.f64 (log.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) M) (-.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) M))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))) (*.f64 (*.f64 M M) (*.f64 M M))) (+.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))
(/.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (fma.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (fma.f64 (*.f64 M M) (*.f64 M M) (*.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))
(fma.f64 (pow.f64 (/.f64 c0 (*.f64 h w)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 D D)) #s(literal 2 binary64)) (*.f64 (neg.f64 M) M))
(fma.f64 (pow.f64 (/.f64 c0 (*.f64 D D)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 h w)) #s(literal 2 binary64)) (*.f64 (neg.f64 M) M))
(fma.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 1 binary64)) (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 1 binary64)) (*.f64 (neg.f64 M) M))
(fma.f64 (neg.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) (neg.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) (*.f64 (neg.f64 M) M))
(fma.f64 (fabs.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) (fabs.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) (*.f64 (neg.f64 M) M))
(fma.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (neg.f64 M) M))
(fma.f64 (*.f64 c0 c0) (pow.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 (neg.f64 M) M))
(-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))
(+.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 (neg.f64 M) M))
(*.f64 (pow.f64 (/.f64 c0 (*.f64 h w)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 D D)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 c0 (*.f64 D D)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 d d) (*.f64 h w)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 1 binary64)) (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 1 binary64)))
(*.f64 (neg.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) (neg.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))
(*.f64 (fabs.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) (fabs.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))
(*.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 (*.f64 c0 c0) (pow.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)))
(pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (*.f64 d d) c0) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) (*.f64 (*.f64 (*.f64 h w) D) D))
(/.f64 (*.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))
(/.f64 (*.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 (*.f64 h w) D) D) (*.f64 (*.f64 (*.f64 h w) D) D)))
(exp.f64 (*.f64 (log.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) #s(literal 2 binary64)))
(*.f64 (pow.f64 M #s(literal 1 binary64)) (pow.f64 M #s(literal 1 binary64)))
(*.f64 (neg.f64 M) (neg.f64 M))
(*.f64 (fabs.f64 M) (fabs.f64 M))
(*.f64 M M)
(pow.f64 M #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 M) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 M) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 M) #s(literal 2 binary64))))
M
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) c0))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/4 binary64))) c0 (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/4 binary64))) c0 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) c0 (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (/ c0 (* 2 w)) (*.f64 (/.f64 c0 w) #s(literal 1/2 binary64)))
#s(approx c0 c0)
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 c0 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64))) c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* c0 (* d d)) (* (* w h) (* D D))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))
#s(approx (* c0 (* d d)) (*.f64 (*.f64 d d) c0))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64))) (*.f64 c0 c0) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h))) (pow.f64 M #s(literal 5 binary64))) (pow.f64 D #s(literal 12 binary64))))) #s(literal 1/16 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 c0 c0) (*.f64 (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64))) (*.f64 c0 c0) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (neg.f64 (*.f64 M M)))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (-.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 h h) (*.f64 w w)) (*.f64 (*.f64 D D) (*.f64 D D)))) (*.f64 M M)))
#s(approx (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 h h) (*.f64 w w)) (*.f64 (*.f64 D D) (*.f64 D D)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/4 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/16 binary64) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))) (*.f64 c0 c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)))) c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/8 binary64) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))))) c0))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) c0))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/8 binary64) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))) c0))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 h h) (*.f64 w w)) (*.f64 (*.f64 D D) (*.f64 D D)))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 h h) (*.f64 w w)) (*.f64 (*.f64 D D) (*.f64 D D)))) (/.f64 (neg.f64 (*.f64 M M)) (*.f64 c0 c0))) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) w) #s(literal -1/2 binary64)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) w) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal 1/4 binary64))) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) w) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (*.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal 1/4 binary64)))) (*.f64 c0 c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) w) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (*.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal 1/4 binary64))))) (*.f64 c0 c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))) c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/8 binary64) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))) c0)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) c0)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/8 binary64) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))) c0)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 d d)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 d d)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/32 binary64) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))))) (*.f64 w w) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 d d)) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* 2 w) (+.f64 w w))
#s(approx w w)
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h)) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w)) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 w w) (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h)) #s(literal 2 binary64))) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) #s(literal -1/8 binary64))) (*.f64 w w) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 w w) (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h)) #s(literal 2 binary64))) w))
#s(approx (* (* w h) (* D D)) (*.f64 (*.f64 (*.f64 h w) D) D))
#s(approx (* w h) (*.f64 h w))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w)) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h))) w))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 D D) h)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 w w))) w))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) #s(literal -1/8 binary64))) (*.f64 w w) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 w w) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h))) w))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (/.f64 (fma.f64 (neg.f64 (*.f64 M M)) (*.f64 w w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 h h) (*.f64 (*.f64 D D) (*.f64 D D)))))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) #s(literal -1/16 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) #s(literal -1/8 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h))) (pow.f64 M #s(literal 5 binary64))) (pow.f64 D #s(literal 12 binary64))))) #s(literal 1/16 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) M) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 d d)) (*.f64 (*.f64 D D) h)) #s(literal 1/2 binary64))) w))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) M) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 d d)) (*.f64 (*.f64 D D) h)) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 d d) (*.f64 d d)))) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 D D) (*.f64 D D))))) w))) w))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h)))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/2 binary64))) w)) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h)))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h h)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) (*.f64 D D))))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) (*.f64 D D))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) (*.f64 w w))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 h h))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (*.f64 w w)) (*.f64 h h)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 w w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64))) (*.f64 h h) (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 h h) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) (*.f64 D D))))) h))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) w)) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) w) (*.f64 M M)) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) h))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 h h)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) w) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 h h) (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) w)) #s(literal 2 binary64))) h))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) #s(literal -1/8 binary64))) (*.f64 h h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) w) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 h h) (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) w)) #s(literal 2 binary64))) h))
#s(approx h h)
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) w) (*.f64 M M)) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) w))) h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 D D) w)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 h h)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) w) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 h h))) h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) #s(literal -1/8 binary64))) (*.f64 h h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) w) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 h h) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) w))) h))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (/.f64 (fma.f64 (neg.f64 (*.f64 M M)) (*.f64 h h) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 w w))))) (*.f64 h h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/16 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 h (*.f64 (*.f64 w w) w)) (sqrt.f64 #s(literal -1 binary64))) M) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) (*.f64 D D)))) #s(literal -1/2 binary64))) h))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) (*.f64 D D)))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 (*.f64 w w) w)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/16 binary64))) h))) h))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) w)))) h))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 w w) (*.f64 w w)) (*.f64 h h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/2 binary64))) h)) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) w)))) h))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 D D) (*.f64 D D))) (*.f64 d d)) #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 d d)) (*.f64 (*.f64 w w) h))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 D D) (*.f64 D D))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 d d)) (*.f64 (*.f64 w w) h))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0))))) #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 d d)) (*.f64 (*.f64 w w) h))) (*.f64 D D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 h w)) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 D D) (*.f64 D D))) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 D D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 D D) (*.f64 D D))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) c0))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 h w))) (*.f64 D D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (/.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0)))) #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))) #s(literal -1/16 binary64))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) c0))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 h w))) (*.f64 D D)))
#s(approx (* D D) (*.f64 D D))
#s(approx D D)
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 D D) (*.f64 D D))) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 h w))) (*.f64 D D)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 D D) (*.f64 D D))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) c0))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 h w))) (*.f64 D D)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (/.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0)))) #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))) #s(literal -1/16 binary64))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) c0))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 h w))) (*.f64 D D)))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (/.f64 (fma.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 h h) (*.f64 w w))) (neg.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 D D) (*.f64 D D))))) (*.f64 (*.f64 D D) (*.f64 D D))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/4 binary64))) (*.f64 d d) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (fma.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/2 binary64) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 d d) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 c0 d) #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 d d) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (* d d) (*.f64 d d))
#s(approx d d)
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (fma.f64 (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 c0 d) #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (fma.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h))) (pow.f64 M #s(literal 5 binary64))) (pow.f64 D #s(literal 12 binary64))))) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/8 binary64))) (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) (*.f64 d d))) #s(literal -1/4 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) (*.f64 d d))) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 c0 c0))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 d d)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) (*.f64 d d))) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 c0 c0))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 12 binary64))))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))) (*.f64 d d)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0)) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 d d)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 c0 c0) c0))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))) (*.f64 d d)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 c0 c0) c0))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 12 binary64)))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))) (*.f64 d d)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0)) #s(literal -1/2 binary64) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 d d)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (*.f64 d d) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 c0 c0) c0))) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0)) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 c0 c0) c0))) #s(literal -1/8 binary64) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 12 binary64)))) (/.f64 c0 (*.f64 (*.f64 (*.f64 h w) D) D))))) (*.f64 d d)))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (*.f64 (+.f64 (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 h h) (*.f64 w w)) (*.f64 (*.f64 D D) (*.f64 D D)))) (/.f64 (neg.f64 (*.f64 M M)) (*.f64 (*.f64 d d) (*.f64 d d)))) (*.f64 (*.f64 d d) (*.f64 d d))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 M M)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d))) (*.f64 M M))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 M M)) (pow.f64 D #s(literal 10 binary64)))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0))))) (*.f64 M M) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d))) (*.f64 M M) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 d d) c0))) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)) (*.f64 M M)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 h w) D) D) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 M M))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0)))) #s(literal -1/8 binary64) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 M M)) (pow.f64 D #s(literal 10 binary64)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))) (*.f64 M M) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 h w) D) D) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 M M) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 d d) c0))) #s(literal -1/2 binary64) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)) (*.f64 M M)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 h w) D) D) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 M M))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0)))) #s(literal -1/8 binary64) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 M M)) (pow.f64 D #s(literal 10 binary64)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))) (*.f64 M M) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 h w) D) D) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 M M) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (fma.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 h h) (*.f64 w w)) (*.f64 (*.f64 D D) (*.f64 D D)))) (neg.f64 (*.f64 M M))))
#s(approx (* M M) (*.f64 M M))
#s(approx M M)
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h)))))) M))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64))) M))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64)))) M))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 12 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 12 binary64)))))) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)) (*.f64 (-.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1 binary64)) (*.f64 M M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) #s(literal 1/2 binary64))) M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) #s(literal 1/2 binary64))) M))) M)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/16 binary64))) M))) M))) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) M)) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 h h))) (*.f64 (*.f64 (*.f64 w w) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))) (pow.f64 D #s(literal 8 binary64)))) #s(literal -1/8 binary64))) M))) M)) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 12 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 12 binary64)))))) (sqrt.f64 #s(literal -1 binary64))) M)))

eval51.0ms (0.6%)

Memory
-37.4MiB live, 52.8MiB allocated; 9ms collecting garbage
Compiler

Compiled 9 691 to 1 951 computations (79.9% saved)

prune21.0ms (0.3%)

Memory
2.9MiB live, 49.2MiB allocated; 2ms collecting garbage
Pruning

19 alts after pruning (19 fresh and 0 done)

PrunedKeptTotal
New30019319
Fresh000
Picked101
Done000
Total30119320
Accuracy
37.0%
Counts
320 → 19
Alt Table
Click to see full alt table
StatusAccuracyProgram
25.9%
(fma.f64 (/.f64 c0 (+.f64 w w)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (/.f64 c0 (+.f64 w w)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))
25.7%
(/.f64 (*.f64 c0 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))) (+.f64 w w))
25.5%
(*.f64 (/.f64 c0 (+.f64 w w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
24.4%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 h w)) (/.f64 (*.f64 d d) (*.f64 D D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))
25.6%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 (*.f64 c0 d) d) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
24.3%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w)) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
29.0%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
3.6%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))))
22.3%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) w)) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) w) (*.f64 M M)) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) h)))
22.1%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h)) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w)) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) w)))
34.0%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
25.7%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0)) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 d d))))
21.8%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) c0)))
0.0%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
3.8%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0))))
17.7%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h h)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) (*.f64 D D))))) h))
2.9%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) w) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal 1/4 binary64))) (*.f64 c0 c0)))
3.4%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) w) #s(literal -1/2 binary64)))
22.4%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
Compiler

Compiled 1 570 to 1 162 computations (26% saved)

series207.0ms (2.5%)

Memory
16.7MiB live, 402.7MiB allocated; 40ms collecting garbage
Counts
53 → 372
Calls
Call 1
Inputs
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
c0
(*.f64 #s(literal 2 binary64) w)
#s(literal 2 binary64)
w
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0))
(*.f64 (*.f64 d d) c0)
(*.f64 d d)
d
(*.f64 (*.f64 (*.f64 h w) D) D)
(*.f64 (*.f64 h w) D)
(*.f64 h w)
h
D
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) M)
(sqrt.f64 #s(literal -1 binary64))
#s(literal -1 binary64)
M
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))
(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))
(*.f64 c0 (*.f64 d d))
(*.f64 (*.f64 w h) (*.f64 D D))
(*.f64 w h)
(*.f64 D D)
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) c0))
(*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) c0)
(fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d))))
(/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 M M) h) w)
(*.f64 (*.f64 M M) h)
(*.f64 M M)
(*.f64 (*.f64 c0 c0) (*.f64 d d))
(*.f64 c0 c0)
#s(literal -1/2 binary64)
(*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))
(/.f64 (*.f64 c0 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))) (+.f64 w w))
(*.f64 c0 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))
(fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))
(sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))
(-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))
(pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))
(+.f64 w w)
Outputs
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (/ c0 (* 2 w)) #s(hole binary64 (* 1/2 (/ c0 w))))
#s(approx c0 #s(hole binary64 c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* 2 (* (* d d) c0)) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* (* d d) c0) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (/ (* c0 (* d d)) (* (* w h) (* D D))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (* c0 (* d d)) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow c0 2) (+ (* -1/8 (/ (pow d 8) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 2) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (* c0 (/ (* d d) (* (* (* h w) D) D))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) c0)))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) (pow c0 2))))
#s(approx (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) #s(hole binary64 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))
#s(approx (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d))) #s(hole binary64 (/ (* (pow M 2) (* h w)) (* (pow c0 2) (pow d 2)))))
#s(approx (* (* c0 c0) (* d d)) #s(hole binary64 (* (pow c0 2) (pow d 2))))
#s(approx (* c0 c0) #s(hole binary64 (pow c0 2)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* M (* c0 (sqrt -1)))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow c0 2) (+ (* -1/8 (/ (pow d 8) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 2) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (* -1 (pow M 2))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (- (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2)))) (pow M 2))))
#s(approx (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) #s(hole binary64 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2))))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (* (pow c0 2) (+ (* -1 (/ (pow M 2) (pow c0 2))) (/ (pow d 4) (* (pow D 4) (* (pow h 2) (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* -1 (* c0 (+ (* -2 (/ (pow d 2) (* (pow D 2) (* h w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* -1 (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* 2 w) #s(hole binary64 (* 2 w)))
#s(approx w #s(hole binary64 w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (* (* h w) D) D) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (* h w) D) #s(hole binary64 (* D (* h w))))
#s(approx (* h w) #s(hole binary64 (* h w)))
#s(approx (* (* w h) (* D D)) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* w h) #s(hole binary64 (* h w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (/ (* d d) (* (* (* h w) D) D)) #s(hole binary64 (/ (pow d 2) (* (pow D 2) (* h w)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) h)))) w)))
#s(approx (* (* (* M M) h) w) #s(hole binary64 (* (pow M 2) (* h w))))
#s(approx (* (/ (* d d) (* (* (* h w) D) D)) 2) #s(hole binary64 (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6))))))) w)))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10))))))))) w)))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow M 2) (pow w 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (pow h 2)))) (pow w 2))))
#s(approx (+ w w) #s(hole binary64 (* 2 w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* w (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (* w (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* -1 (* w (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (* -1 (* w (+ (* -2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx h #s(hole binary64 h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) w)))) h)))
#s(approx (* (* M M) h) #s(hole binary64 (* (pow M 2) h)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) h)))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) h)))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow M 2) (pow h 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (pow w 2)))) (pow h 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow h 2) w))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* (pow h 2) w))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* -1 (* h (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow h 2) w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (* -1 (* h (+ (* -2 (/ (pow d 2) (* (pow D 2) (* (pow h 2) w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx D #s(hole binary64 D))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* h w)))) (pow D 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) (pow D 2))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) (pow D 2))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow D 4) (pow M 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow h 2) (pow w 2)))) (pow D 4))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 4) (* h w))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 4) (* h w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx d #s(hole binary64 d))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow d 4) (+ (* -1/8 (/ (pow c0 4) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 6) (pow d 4)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) c0)) (* 2 (/ (* c0 (pow d 4)) (* (pow D 2) (* h w))))) (pow d 2))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow c0 2))) (* 2 (/ (pow d 4) (* (pow D 2) (* h w))))) (pow d 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow d 4) (+ (* -1/8 (/ (pow c0 4) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 6) (pow d 4)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 4)))) (* 2 (/ 1 (* (pow D 2) (* h w))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 12)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (* (pow d 4) (+ (* -1 (/ (pow M 2) (pow d 4))) (/ (pow c0 2) (* (pow D 4) (* (pow h 2) (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (* (sqrt -1) M) #s(hole binary64 (* M (sqrt -1))))
#s(approx M #s(hole binary64 M))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* M M) #s(hole binary64 (pow M 2)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6)))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10)))))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (+ (* -1 (pow M 2)) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow M 2) (* h w)))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* (pow M 2) (* h w)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* M (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* M (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (* (pow M 2) (- (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (pow w 2))))) 1))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* -1 (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))))
Calls

18 calls:

TimeVariablePointExpression
24.0ms
d
@inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) d (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* (* w h) (* D D)) (* w h) (* D D) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (* c0 (/ (* d d) (* (* (* h w) D) D))) (/ (* d d) (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d))) (* (* (* M M) h) w) (* (* M M) h) (* M M) (* (* c0 c0) (* d d)) (* c0 c0) -1/2 (* (/ (* d d) (* (* (* h w) D) D)) 2) (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (+ w w))
18.0ms
D
@inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) d (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* (* w h) (* D D)) (* w h) (* D D) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (* c0 (/ (* d d) (* (* (* h w) D) D))) (/ (* d d) (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d))) (* (* (* M M) h) w) (* (* M M) h) (* M M) (* (* c0 c0) (* d d)) (* c0 c0) -1/2 (* (/ (* d d) (* (* (* h w) D) D)) 2) (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (+ w w))
15.0ms
c0
@-inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) d (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* (* w h) (* D D)) (* w h) (* D D) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (* c0 (/ (* d d) (* (* (* h w) D) D))) (/ (* d d) (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d))) (* (* (* M M) h) w) (* (* M M) h) (* M M) (* (* c0 c0) (* d d)) (* c0 c0) -1/2 (* (/ (* d d) (* (* (* h w) D) D)) 2) (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (+ w w))
12.0ms
w
@0
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) d (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* (* w h) (* D D)) (* w h) (* D D) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (* c0 (/ (* d d) (* (* (* h w) D) D))) (/ (* d d) (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d))) (* (* (* M M) h) w) (* (* M M) h) (* M M) (* (* c0 c0) (* d d)) (* c0 c0) -1/2 (* (/ (* d d) (* (* (* h w) D) D)) 2) (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (+ w w))
11.0ms
h
@-inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) d (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* c0 (* d d)) (* (* w h) (* D D))) (* c0 (* d d)) (* (* w h) (* D D)) (* w h) (* D D) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (* c0 (/ (* d d) (* (* (* h w) D) D))) (/ (* d d) (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d))) (* (* (* M M) h) w) (* (* M M) h) (* M M) (* (* c0 c0) (* d d)) (* c0 c0) -1/2 (* (/ (* d d) (* (* (* h w) D) D)) 2) (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (+ w w))

rewrite236.0ms (2.9%)

Memory
14.5MiB live, 388.9MiB allocated; 25ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0164532559
0171729452
0828428841
Stop Event
iter-limit
node-limit
iter-limit
Counts
425 → 532
Calls
Call 1
Inputs
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
c0
(*.f64 #s(literal 2 binary64) w)
#s(literal 2 binary64)
w
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0))
(*.f64 (*.f64 d d) c0)
(*.f64 d d)
d
(*.f64 (*.f64 (*.f64 h w) D) D)
(*.f64 (*.f64 h w) D)
(*.f64 h w)
h
D
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) M)
(sqrt.f64 #s(literal -1 binary64))
#s(literal -1 binary64)
M
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))
(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))
(*.f64 c0 (*.f64 d d))
(*.f64 (*.f64 w h) (*.f64 D D))
(*.f64 w h)
(*.f64 D D)
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) c0))
(*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) c0)
(fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d))))
(/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 M M) h) w)
(*.f64 (*.f64 M M) h)
(*.f64 M M)
(*.f64 (*.f64 c0 c0) (*.f64 d d))
(*.f64 c0 c0)
#s(literal -1/2 binary64)
(*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))
(/.f64 (*.f64 c0 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))) (+.f64 w w))
(*.f64 c0 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))
(fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))
(sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))
(-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))
(pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))
(+.f64 w w)
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (/ c0 (* 2 w)) #s(hole binary64 (* 1/2 (/ c0 w))))
#s(approx c0 #s(hole binary64 c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* 2 (* (* d d) c0)) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* (* d d) c0) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (/ (* c0 (* d d)) (* (* w h) (* D D))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (* c0 (* d d)) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow c0 2) (+ (* -1/8 (/ (pow d 8) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 2) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (* c0 (/ (* d d) (* (* (* h w) D) D))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) c0)))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) (pow c0 2))))
#s(approx (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) #s(hole binary64 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))
#s(approx (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d))) #s(hole binary64 (/ (* (pow M 2) (* h w)) (* (pow c0 2) (pow d 2)))))
#s(approx (* (* c0 c0) (* d d)) #s(hole binary64 (* (pow c0 2) (pow d 2))))
#s(approx (* c0 c0) #s(hole binary64 (pow c0 2)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* M (* c0 (sqrt -1)))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow c0 2) (+ (* -1/8 (/ (pow d 8) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 2) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (* -1 (pow M 2))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (- (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2)))) (pow M 2))))
#s(approx (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) #s(hole binary64 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2))))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (* (pow c0 2) (+ (* -1 (/ (pow M 2) (pow c0 2))) (/ (pow d 4) (* (pow D 4) (* (pow h 2) (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* -1 (* c0 (+ (* -2 (/ (pow d 2) (* (pow D 2) (* h w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* -1 (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* 2 w) #s(hole binary64 (* 2 w)))
#s(approx w #s(hole binary64 w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (* (* h w) D) D) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (* h w) D) #s(hole binary64 (* D (* h w))))
#s(approx (* h w) #s(hole binary64 (* h w)))
#s(approx (* (* w h) (* D D)) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* w h) #s(hole binary64 (* h w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (/ (* d d) (* (* (* h w) D) D)) #s(hole binary64 (/ (pow d 2) (* (pow D 2) (* h w)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) h)))) w)))
#s(approx (* (* (* M M) h) w) #s(hole binary64 (* (pow M 2) (* h w))))
#s(approx (* (/ (* d d) (* (* (* h w) D) D)) 2) #s(hole binary64 (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6))))))) w)))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10))))))))) w)))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow M 2) (pow w 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (pow h 2)))) (pow w 2))))
#s(approx (+ w w) #s(hole binary64 (* 2 w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* w (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (* w (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* -1 (* w (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (* -1 (* w (+ (* -2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx h #s(hole binary64 h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) w)))) h)))
#s(approx (* (* M M) h) #s(hole binary64 (* (pow M 2) h)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) h)))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) h)))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow M 2) (pow h 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (pow w 2)))) (pow h 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow h 2) w))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* (pow h 2) w))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* -1 (* h (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow h 2) w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (* -1 (* h (+ (* -2 (/ (pow d 2) (* (pow D 2) (* (pow h 2) w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx D #s(hole binary64 D))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* h w)))) (pow D 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) (pow D 2))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) (pow D 2))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (/ (+ (* -1 (* (pow D 4) (pow M 2))) (/ (* (pow c0 2) (pow d 4)) (* (pow h 2) (pow w 2)))) (pow D 4))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 4) (* h w))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 4) (* h w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx d #s(hole binary64 d))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow d 4) (+ (* -1/8 (/ (pow c0 4) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 6) (pow d 4)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) c0)) (* 2 (/ (* c0 (pow d 4)) (* (pow D 2) (* h w))))) (pow d 2))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow c0 2))) (* 2 (/ (pow d 4) (* (pow D 2) (* h w))))) (pow d 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow d 4) (+ (* -1/8 (/ (pow c0 4) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 6) (pow d 4)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 4)))) (* 2 (/ 1 (* (pow D 2) (* h w))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 12)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (* (pow d 4) (+ (* -1 (/ (pow M 2) (pow d 4))) (/ (pow c0 2) (* (pow D 4) (* (pow h 2) (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (* (sqrt -1) M) #s(hole binary64 (* M (sqrt -1))))
#s(approx M #s(hole binary64 M))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* M M) #s(hole binary64 (pow M 2)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6)))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10)))))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (+ (* -1 (pow M 2)) (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow M 2) (* h w)))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* (pow M 2) (* h w)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* M (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* M (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) #s(hole binary64 (* (pow M 2) (- (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (pow w 2))))) 1))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* -1 (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))))
Outputs
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))) (+.f64 w w))
(/.f64 (/.f64 c0 #s(literal 2 binary64)) w)
(/.f64 (neg.f64 c0) (neg.f64 (+.f64 w w)))
(/.f64 c0 (+.f64 w w))
c0
(*.f64 #s(literal 2 binary64) w)
(/.f64 (-.f64 (*.f64 w w) (*.f64 w w)) (-.f64 w w))
(/.f64 (fma.f64 (*.f64 w w) w (*.f64 (*.f64 w w) w)) (fma.f64 w w (-.f64 (*.f64 w w) (*.f64 w w))))
(+.f64 w w)
#s(literal 2 binary64)
w
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 h w) D)) D)
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0)) (neg.f64 (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0)
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0))
(fma.f64 (*.f64 d d) c0 (*.f64 (*.f64 d d) c0))
(fma.f64 d (*.f64 d c0) (*.f64 (*.f64 d d) c0))
(+.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 d d) c0))
(*.f64 (*.f64 d d) c0)
(*.f64 d (*.f64 d c0))
(*.f64 (pow.f64 d #s(literal 1 binary64)) (pow.f64 d #s(literal 1 binary64)))
(*.f64 (neg.f64 d) (neg.f64 d))
(*.f64 (fabs.f64 d) (fabs.f64 d))
(*.f64 d d)
(pow.f64 d #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 d) #s(literal 2 binary64)))
d
(*.f64 (*.f64 (*.f64 h w) D) D)
(*.f64 (*.f64 h w) (*.f64 D D))
(*.f64 (*.f64 h w) D)
(*.f64 h (*.f64 w D))
(*.f64 h w)
h
D
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))) (+.f64 w w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) M)
(pow.f64 #s(literal -1 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal -1 binary64))
#s(literal -1 binary64)
M
(*.f64 (/.f64 c0 (+.f64 w w)) (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(/.f64 (*.f64 c0 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))) (+.f64 w w))
(fma.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) (/.f64 c0 (+.f64 w w)) (*.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) (/.f64 c0 (+.f64 w w))))
(fma.f64 (/.f64 c0 (+.f64 w w)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) (*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(+.f64 (*.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) (/.f64 c0 (+.f64 w w))) (*.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) (/.f64 c0 (+.f64 w w))))
(+.f64 (*.f64 (/.f64 c0 (+.f64 w w)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D)))) (*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(/.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) #s(literal 2 binary64)) (*.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))) (-.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(/.f64 (+.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) #s(literal 3 binary64)) (pow.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))) (*.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))))
(fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))
(fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))
(+.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))
(*.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)))
(*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D)))
(/.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 w h)) (*.f64 D D))
(/.f64 (neg.f64 (*.f64 c0 (*.f64 d d))) (neg.f64 (*.f64 (*.f64 (*.f64 w h) D) D)))
(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 w h) D) D))
(*.f64 (*.f64 c0 d) d)
(*.f64 c0 (*.f64 d d))
(*.f64 (*.f64 (*.f64 w h) D) D)
(*.f64 (*.f64 w h) (*.f64 D D))
(*.f64 w (*.f64 h (*.f64 D D)))
(*.f64 w h)
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (neg.f64 D) (neg.f64 D))
(*.f64 (fabs.f64 D) (fabs.f64 D))
(*.f64 D D)
(pow.f64 D #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 D) #s(literal 2 binary64)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (/.f64 d (*.f64 (*.f64 h w) D)) (/.f64 d D))
(*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) D)
(/.f64 (neg.f64 (*.f64 d d)) (neg.f64 (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) c0)))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) c0))) (+.f64 w w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) c0))
(*.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) c0)
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)))
(fma.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d))))) #s(literal -1/2 binary64)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64)) (*.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 D D) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 d d)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d))))))
(*.f64 D (*.f64 D (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w))) (neg.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d)))))
(/.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 c0)) (*.f64 d d))
(/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 c0 (*.f64 d d))))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) (*.f64 c0 c0)) (/.f64 w (*.f64 d d)))
(*.f64 (/.f64 (*.f64 M M) (*.f64 c0 c0)) (/.f64 (*.f64 h w) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))
(*.f64 (*.f64 M M) (/.f64 (*.f64 h w) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 c0)) (*.f64 d d))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) h) w)) (neg.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d)))))
(/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 (*.f64 c0 (*.f64 d d))))
(*.f64 (*.f64 (*.f64 M M) h) w)
(*.f64 (*.f64 M M) (*.f64 h w))
(*.f64 (*.f64 M M) h)
(*.f64 M (*.f64 M h))
(*.f64 (pow.f64 M #s(literal 1 binary64)) (pow.f64 M #s(literal 1 binary64)))
(*.f64 (neg.f64 M) (neg.f64 M))
(*.f64 (fabs.f64 M) (fabs.f64 M))
(*.f64 M M)
(pow.f64 M #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 M) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 c0 c0) d) d)
(*.f64 (*.f64 c0 d) (*.f64 c0 d))
(*.f64 (*.f64 c0 c0) (*.f64 d d))
(*.f64 c0 (*.f64 c0 (*.f64 d d)))
(pow.f64 (*.f64 c0 d) #s(literal 2 binary64))
(*.f64 (pow.f64 c0 #s(literal 1 binary64)) (pow.f64 c0 #s(literal 1 binary64)))
(*.f64 (neg.f64 c0) (neg.f64 c0))
(*.f64 (fabs.f64 c0) (fabs.f64 c0))
(*.f64 c0 c0)
(pow.f64 c0 #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 c0) #s(literal 2 binary64)))
#s(literal -1/2 binary64)
(*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 d d) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 c0 (/.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))) (+.f64 w w)))
(/.f64 (neg.f64 (*.f64 c0 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))) (neg.f64 (+.f64 w w)))
(/.f64 (*.f64 c0 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))) (+.f64 w w))
(*.f64 c0 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))
(fma.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0 (*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))) c0))
(fma.f64 c0 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 c0 (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))
(+.f64 (*.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0) (*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))) c0))
(+.f64 (*.f64 c0 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) (*.f64 c0 (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))
(/.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))) (-.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))
(/.f64 (+.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (-.f64 (*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))) (*.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))))
(fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))
(+.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))
(pow.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))) (*.f64 (*.f64 M M) (*.f64 M M))) (+.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))
(/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 M M) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (fma.f64 (*.f64 M M) (*.f64 M M) (*.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))
(fma.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 1 binary64)) (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 1 binary64)) (*.f64 (neg.f64 M) M))
(fma.f64 (*.f64 c0 c0) (pow.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 (neg.f64 M) M))
(fma.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (neg.f64 M) M))
(-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))
(+.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 (neg.f64 M) M))
(*.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 1 binary64)) (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 1 binary64)))
(*.f64 (*.f64 c0 c0) (pow.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)))
(*.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))
(pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) w)
(/.f64 (-.f64 (*.f64 w w) (*.f64 w w)) (-.f64 w w))
(/.f64 (fma.f64 (*.f64 w w) w (*.f64 (*.f64 w w) w)) (fma.f64 w w (-.f64 (*.f64 w w) (*.f64 w w))))
(+.f64 w w)
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 c0 (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 c0 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 c0 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))))))))))
#s(approx (/ c0 (* 2 w)) (*.f64 #s(literal 1/2 binary64) (/.f64 c0 w)))
#s(approx c0 c0)
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (fma.f64 c0 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (/ (* 2 (* (* d d) c0)) (* (* (* h w) D) D)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (* 2 (* (* d d) c0)) (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))))
#s(approx (* (* d d) c0) (*.f64 c0 (*.f64 d d)))
#s(approx (/ (* c0 (* d d)) (* (* w h) (* D D))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (* c0 (* d d)) (*.f64 c0 (*.f64 d d)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 D #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))))))))))
#s(approx (* c0 (/ (* d d) (* (* (* h w) D) D))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w))) (*.f64 c0 (*.f64 d d))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 d d)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) c0))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 d d)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) (*.f64 c0 c0)))
#s(approx (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
#s(approx (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d))) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d))))))
#s(approx (* (* c0 c0) (* d d)) (*.f64 c0 (*.f64 c0 (*.f64 d d))))
#s(approx (* c0 c0) (*.f64 c0 c0))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 c0 (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 c0 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 c0 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 c0 (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 c0 (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 c0 (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (fma.f64 c0 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (fma.f64 c0 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 D #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))))))))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) (neg.f64 (*.f64 M M)))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) (-.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 h h) (*.f64 w w)))) (*.f64 M M)))
#s(approx (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 h h) (*.f64 w w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 h h) (*.f64 w w)))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) (*.f64 (*.f64 c0 c0) (+.f64 (/.f64 (neg.f64 (*.f64 M M)) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 h h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (fma.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 c0 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 c0 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 c0 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (neg.f64 (*.f64 c0 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (fma.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (neg.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 (*.f64 c0 c0) (-.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d))))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 (*.f64 c0 c0) (+.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 (*.f64 c0 c0) (+.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d))))))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (neg.f64 (*.f64 c0 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (neg.f64 (*.f64 c0 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (neg.f64 (*.f64 c0 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (neg.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (neg.f64 (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (neg.f64 (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (neg.f64 (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 d d)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 w w) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 w w) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64)))))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (+ w w) (+.f64 w w))
#s(approx w w)
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h)))) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64))))))) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))))))))) w))
#s(approx (* (* (* h w) D) D) (*.f64 (*.f64 (*.f64 D D) h) w))
#s(approx (* (* h w) D) (*.f64 D (*.f64 h w)))
#s(approx (* h w) (*.f64 h w))
#s(approx (* (* w h) (* D D)) (*.f64 (*.f64 (*.f64 D D) h) w))
#s(approx (* w h) (*.f64 h w))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h))) w))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (*.f64 w w) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h))) w))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (*.f64 w w) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h))) w))
#s(approx (/ (* d d) (* (* (* h w) D) D)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h)))) w))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 (*.f64 D D) h))) w))
#s(approx (* (* (* M M) h) w) (*.f64 (*.f64 (*.f64 M M) h) w))
#s(approx (* (/ (* d d) (* (* (* h w) D) D)) 2) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 d d)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (*.f64 w w) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (*.f64 w w) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64)))))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 d d)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 (*.f64 D D) h))) w))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64))))))) w))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64)))))))))) w))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h)))) w))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64))))))) w))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))))))))) w))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h))) w))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (/.f64 (fma.f64 (*.f64 w w) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h))) w))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (/.f64 (fma.f64 (*.f64 w w) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h))) w))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) (/.f64 (fma.f64 (neg.f64 (*.f64 M M)) (*.f64 w w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 h h))))) (*.f64 w w)))
#s(approx (+ w w) (+.f64 w w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))) w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 D #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (*.f64 w (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (*.f64 w (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) w))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))) w))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))) w))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 D #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 w (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 (*.f64 D D) h))) w)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))))) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h)))) w)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 w (sqrt.f64 #s(literal -1 binary64))))))))) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64)))))))) w))) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (neg.f64 (*.f64 w (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 d d))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (neg.f64 (*.f64 w (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 w (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 (*.f64 D D) h))) w)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))))) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h)))) w)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))) w)))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 w (sqrt.f64 #s(literal -1 binary64))))))))) w)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 d d) (*.f64 d d)))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64)))))) w))) w)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 w (sqrt.f64 #s(literal -1 binary64))))))))) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64)))))))) w))) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (*.f64 h h))) (*.f64 d d)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w)))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 h h) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 d d)) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w)))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 h h) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 d d)) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 w w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64)))))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w)))) h))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w)))) h))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w)) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) w))))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64))))))) h))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w)) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64))))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))))))))) h))
#s(approx h h)
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w))) h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (*.f64 h h) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) w))))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w))) h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (*.f64 h h) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64))))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w))) h))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w)))) h))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 (*.f64 D D) w))) h))
#s(approx (* (* M M) h) (*.f64 (*.f64 M M) h))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (*.f64 h h))) (*.f64 d d)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w)))) h))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (*.f64 h h) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 d d)) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w)))) h))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (*.f64 h h) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 d d)) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 w w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64)))))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w)))) h))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 (*.f64 h h) w)) (*.f64 d d)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 (*.f64 D D) w))) h))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 D D) w))) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 d d)) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) w))))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64))))))) h))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 D D) w))) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 d d)) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64))))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64)))))))))) h))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w)))) h))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w)) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) w))))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64))))))) h))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w)) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64))))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))))))))) h))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w))) h))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (/.f64 (fma.f64 (*.f64 h h) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) w))))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w))) h))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (/.f64 (fma.f64 (*.f64 h h) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64))))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w))) h))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) (/.f64 (fma.f64 (neg.f64 (*.f64 M M)) (*.f64 h h) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 w w))))) (*.f64 h h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (*.f64 h (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) (*.f64 (*.f64 h h) w)))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (*.f64 h (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 (*.f64 D D) (*.f64 (*.f64 h h) w))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 (*.f64 w w) w)) (sqrt.f64 #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))) h)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64)))))))) h))) h)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (neg.f64 (*.f64 h (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) (*.f64 (*.f64 h h) w))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (neg.f64 (*.f64 h (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 D D) (*.f64 (*.f64 h h) w))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w))) (*.f64 c0 (*.f64 c0 (*.f64 d d))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 (*.f64 w w) w)) (sqrt.f64 #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 D D) w)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))) h)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 D D) w)))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 d d) (*.f64 d d)))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64)))))) h))) h)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))) h)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64)))))))) h))) h)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 h (*.f64 w w)))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 d d))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 h (*.f64 w w)))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64))))))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 h (*.f64 w w)))) (*.f64 D D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 h w))) (*.f64 D D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 h w)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))))))) (*.f64 D D)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 h w)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))))))))) (*.f64 D D)))
#s(approx D D)
#s(approx (* D D) (*.f64 D D))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 h w))) (*.f64 D D)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 h w))) (*.f64 D D)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 h w))) (*.f64 D D)))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 h w))) (*.f64 D D)))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 h w))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 h (*.f64 w w)))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 d d))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 h (*.f64 w w)))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64))))))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 h (*.f64 w w)))) (*.f64 D D)))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 d d))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 h w))))) (*.f64 D D)))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 h w))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 d d)) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))))) (*.f64 D D)))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 h w))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64)))))))))) (*.f64 D D)))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 h w))) (*.f64 D D)))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 h w)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))))))) (*.f64 D D)))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 h w)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))))))))) (*.f64 D D)))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 h w))) (*.f64 D D)))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (/.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 h w))) (*.f64 D D)))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (/.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 h w))) (*.f64 D D)))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) (/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 M M))) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 h h) (*.f64 w w)))) (*.f64 (*.f64 D D) (*.f64 D D))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (*.f64 (*.f64 D D) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 h w))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (*.f64 (*.f64 D D) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 h w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w) (*.f64 (*.f64 d d) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w) (*.f64 (*.f64 d d) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 c0 c0) c0)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 d d) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 d d) (fma.f64 (*.f64 d d) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (* d d) (*.f64 d d))
#s(approx d d)
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (pow.f64 D #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) c0) (*.f64 #s(literal 2 binary64) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w))))) (*.f64 d d)))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 c0)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w)))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w) (*.f64 (*.f64 d d) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w) (*.f64 (*.f64 d d) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 c0 c0) c0)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 d d) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 d d) (fma.f64 (*.f64 d d) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) c0)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 d d) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 d d) (fma.f64 (*.f64 d d) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (pow.f64 D #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) (*.f64 d d))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) (*.f64 d d))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64)))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) (*.f64 d d))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 12 binary64))))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 8 binary64)))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 8 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 12 binary64)))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 8 binary64)))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 8 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 12 binary64)))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d)))) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) (*.f64 d d))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) (*.f64 d d))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64)))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) (*.f64 d d))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 12 binary64))))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) (*.f64 d d))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) (*.f64 d d))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 12 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 8 binary64)))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 8 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 12 binary64)))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 8 binary64)))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 8 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 12 binary64)))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (+.f64 (/.f64 (neg.f64 (*.f64 M M)) (*.f64 (*.f64 d d) (*.f64 d d))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 h h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (*.f64 M M) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 d d))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (*.f64 M M) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 d d))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w)))))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 #s(literal 2 binary64) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 #s(literal 2 binary64) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 5 binary64))))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))))))))
#s(approx (* (sqrt -1) M) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))
#s(approx M M)
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 5 binary64))))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (* M M) (*.f64 M M))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (*.f64 M M) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 d d))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (*.f64 M M) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 d d))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w)))))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 d d)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 d d)) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 d d)) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64)))))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (fma.f64 #s(literal 2 binary64) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (fma.f64 #s(literal 2 binary64) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 5 binary64))))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (fma.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (fma.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 5 binary64))))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) (+.f64 (neg.f64 (*.f64 M M)) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 h h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 M (-.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 D #s(literal 12 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 M (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 M (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 M (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w))))))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 M (fma.f64 c0 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 M (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))) (fma.f64 c0 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 M (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))) (fma.f64 c0 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (*.f64 M (-.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 D #s(literal 12 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))))))))
#s(approx (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)) (*.f64 (*.f64 M M) (-.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 M M)) (*.f64 (*.f64 h h) (*.f64 w w))))) #s(literal 1 binary64))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 h h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))))) M)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) M))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 h h))) (*.f64 (*.f64 (*.f64 w w) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))) M)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) M))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 M (-.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 D #s(literal 12 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (*.f64 M (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (*.f64 M (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (*.f64 M (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 h h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))))) M)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (neg.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (neg.f64 (*.f64 M (+.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))) (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (neg.f64 (*.f64 M (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) M)) (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (neg.f64 (*.f64 M (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 h h))) (*.f64 (*.f64 (*.f64 w w) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))) M)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) M)) (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (neg.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (neg.f64 (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (neg.f64 (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) M))))))
#s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (neg.f64 (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 h h))) (*.f64 (*.f64 (*.f64 w w) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))) M)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) M))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (neg.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (neg.f64 (*.f64 M (-.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (neg.f64 (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))))))))
#s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (neg.f64 (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 D #s(literal 12 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))))))))

eval68.0ms (0.8%)

Memory
-14.8MiB live, 126.3MiB allocated; 17ms collecting garbage
Compiler

Compiled 21 485 to 3 449 computations (83.9% saved)

prune80.0ms (1%)

Memory
-34.1MiB live, 97.3MiB allocated; 86ms collecting garbage
Pruning

33 alts after pruning (32 fresh and 1 done)

PrunedKeptTotal
New63027657
Fresh9514
Picked415
Done000
Total64333676
Accuracy
60.1%
Counts
676 → 33
Alt Table
Click to see full alt table
StatusAccuracyProgram
25.9%
(fma.f64 (/.f64 c0 (+.f64 w w)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (/.f64 c0 (+.f64 w w)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))
25.6%
(/.f64 (fma.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0 (*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))) c0)) (+.f64 w w))
25.7%
(/.f64 (*.f64 c0 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))) (+.f64 w w))
3.2%
(/.f64 (*.f64 c0 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (neg.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))) (+.f64 w w))
33.8%
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))) (+.f64 w w))
0.0%
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))) (+.f64 w w))
22.7%
(/.f64 (*.f64 c0 #s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w)))) h))) (+.f64 w w))
30.1%
(/.f64 (*.f64 c0 #s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))) (+.f64 w w))
3.6%
(/.f64 (*.f64 c0 #s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))) (+.f64 w w))
21.8%
(/.f64 #s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 d d)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 (*.f64 D D) h))) w)) (+.f64 w w))
24.4%
(/.f64 #s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) (+.f64 w w))
31.5%
(*.f64 (/.f64 c0 (+.f64 w w)) (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
34.0%
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))
29.0%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
29.2%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))))))
3.6%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))))
29.0%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (*.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
37.3%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 h w) D)) D)))
32.5%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 h (*.f64 w D)) D))))
37.9%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
23.0%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 d (*.f64 (*.f64 h w) D)) (/.f64 d D)) #s(literal 2 binary64))) c0)))
23.4%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))) c0)))
36.9%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D))))
28.2%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 #s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) c0)))
15.9%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 #s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))) c0)))
3.8%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0))))
17.9%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w))) (*.f64 c0 (*.f64 d d))))))
19.2%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (*.f64 h (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) (*.f64 (*.f64 h h) w)))))))))
26.1%
(*.f64 c0 (/.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))) (+.f64 w w)))
2.9%
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
22.4%
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
17.7%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h h)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) (*.f64 D D))))) h))
3.4%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) w) #s(literal -1/2 binary64)))
Compiler

Compiled 2 816 to 2 179 computations (22.6% saved)

series154.0ms (1.9%)

Memory
38.6MiB live, 322.7MiB allocated; 18ms collecting garbage
Counts
58 → 378
Calls
Call 1
Inputs
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
c0
(*.f64 #s(literal 2 binary64) w)
#s(literal 2 binary64)
w
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0)))
(*.f64 d (*.f64 d c0))
d
(*.f64 d c0)
(*.f64 (*.f64 (*.f64 h w) D) D)
(*.f64 (*.f64 h w) D)
(*.f64 h w)
h
D
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))) (+.f64 w w))
(*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) M)
(sqrt.f64 #s(literal -1 binary64))
#s(literal -1 binary64)
M
(+.f64 w w)
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 h (*.f64 w D)) D))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 h (*.f64 w D)) D)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 h (*.f64 w D)) D))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0))
(*.f64 (*.f64 d d) c0)
(*.f64 d d)
(*.f64 (*.f64 h (*.f64 w D)) D)
(*.f64 h (*.f64 w D))
(*.f64 w D)
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))
(/.f64 c0 (*.f64 w h))
(*.f64 w h)
(/.f64 (*.f64 d d) (*.f64 D D))
(*.f64 D D)
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))) c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))) c0))
(*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))) c0)
(fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d))))
(/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 M M) h) w)
(*.f64 (*.f64 M M) h)
(*.f64 M M)
(*.f64 (*.f64 c0 c0) (*.f64 d d))
(*.f64 c0 c0)
#s(literal -1/2 binary64)
(*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))
(*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))
Outputs
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (/ c0 (* 2 w)) #s(hole binary64 (* 1/2 (/ c0 w))))
#s(approx c0 #s(hole binary64 c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (/ (* 2 (* d (* d c0))) (* (* (* h w) D) D)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* 2 (* d (* d c0))) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* d (* d c0)) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (* d c0) #s(hole binary64 (* c0 d)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (* c0 (sqrt -1)))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (/ (* 2 (* (* d d) c0)) (* (* h (* w D)) D)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* 2 (* (* d d) c0)) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* (* d d) c0) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (/ c0 (* w h)) #s(hole binary64 (/ c0 (* h w))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow c0 2) (+ (* -1/8 (/ (pow d 8) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 2) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (* c0 (/ (* d d) (* (* (* h w) D) D))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) c0)))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) (pow c0 2))))
#s(approx (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) #s(hole binary64 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))
#s(approx (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d))) #s(hole binary64 (/ (* (pow M 2) (* h w)) (* (pow c0 2) (pow d 2)))))
#s(approx (* (* c0 c0) (* d d)) #s(hole binary64 (* (pow c0 2) (pow d 2))))
#s(approx (* c0 c0) #s(hole binary64 (pow c0 2)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* -1 (* c0 (+ (* -2 (/ (pow d 2) (* (pow D 2) (* h w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* 2 w) #s(hole binary64 (* 2 w)))
#s(approx w #s(hole binary64 w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (* (* h w) D) D) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (* h w) D) #s(hole binary64 (* D (* h w))))
#s(approx (* h w) #s(hole binary64 (* h w)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6))))))) w)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10))))))))) w)))
#s(approx (+ w w) #s(hole binary64 (* 2 w)))
#s(approx (* (* h (* w D)) D) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* h (* w D)) #s(hole binary64 (* D (* h w))))
#s(approx (* w D) #s(hole binary64 (* D w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* w h) #s(hole binary64 (* h w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (/ (* d d) (* (* (* h w) D) D)) #s(hole binary64 (/ (pow d 2) (* (pow D 2) (* h w)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) h)))) w)))
#s(approx (* (* (* M M) h) w) #s(hole binary64 (* (pow M 2) (* h w))))
#s(approx (* (* d (/ d (* (* (* h w) D) D))) 2) #s(hole binary64 (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))
#s(approx (* d (/ d (* (* (* h w) D) D))) #s(hole binary64 (/ (pow d 2) (* (pow D 2) (* h w)))))
#s(approx (/ d (* (* (* h w) D) D)) #s(hole binary64 (/ d (* (pow D 2) (* h w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* w (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (* w (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* -1 (* w (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (* -1 (* w (+ (* -2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx h #s(hole binary64 h))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) h)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) w)))) h)))
#s(approx (* (* M M) h) #s(hole binary64 (* (pow M 2) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow h 2) w))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* (pow h 2) w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* -1 (* h (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow h 2) w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (* -1 (* h (+ (* -2 (/ (pow d 2) (* (pow D 2) (* (pow h 2) w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx D #s(hole binary64 D))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) (pow D 2))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx (/ (* d d) (* D D)) #s(hole binary64 (/ (pow d 2) (pow D 2))))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* h w)))) (pow D 2))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 4) (* h w))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 4) (* h w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx d #s(hole binary64 d))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow d 4) (+ (* -1/8 (/ (pow c0 4) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 6) (pow d 4)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) c0)) (* 2 (/ (* c0 (pow d 4)) (* (pow D 2) (* h w))))) (pow d 2))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow c0 2))) (* 2 (/ (pow d 4) (* (pow D 2) (* h w))))) (pow d 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 12)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 4)))) (* 2 (/ 1 (* (pow D 2) (* h w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10)))))))))))
#s(approx (* (sqrt -1) M) #s(hole binary64 (* M (sqrt -1))))
#s(approx M #s(hole binary64 M))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* M M) #s(hole binary64 (pow M 2)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow M 2) (* h w)))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* (pow M 2) (* h w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))))
Calls

18 calls:

TimeVariablePointExpression
10.0ms
h
@-inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* d (* d c0))) (* (* (* h w) D) D)) (* 2 (* d (* d c0))) (* d (* d c0)) d (* d c0) (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (+ w w) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* h (* w D)) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) (* (* h (* w D)) D) (* h (* w D)) (* w D) (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ c0 (* w h)) (* w h) (/ (* d d) (* D D)) (* D D) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (* c0 (/ (* d d) (* (* (* h w) D) D))) (/ (* d d) (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d))) (* (* (* M M) h) w) (* (* M M) h) (* M M) (* (* c0 c0) (* d d)) (* c0 c0) -1/2 (* (* d (/ d (* (* (* h w) D) D))) 2) (* d (/ d (* (* (* h w) D) D))) (/ d (* (* (* h w) D) D)))
9.0ms
w
@0
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* d (* d c0))) (* (* (* h w) D) D)) (* 2 (* d (* d c0))) (* d (* d c0)) d (* d c0) (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (+ w w) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* h (* w D)) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) (* (* h (* w D)) D) (* h (* w D)) (* w D) (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ c0 (* w h)) (* w h) (/ (* d d) (* D D)) (* D D) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (* c0 (/ (* d d) (* (* (* h w) D) D))) (/ (* d d) (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d))) (* (* (* M M) h) w) (* (* M M) h) (* M M) (* (* c0 c0) (* d d)) (* c0 c0) -1/2 (* (* d (/ d (* (* (* h w) D) D))) 2) (* d (/ d (* (* (* h w) D) D))) (/ d (* (* (* h w) D) D)))
9.0ms
d
@inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* d (* d c0))) (* (* (* h w) D) D)) (* 2 (* d (* d c0))) (* d (* d c0)) d (* d c0) (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (+ w w) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* h (* w D)) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) (* (* h (* w D)) D) (* h (* w D)) (* w D) (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ c0 (* w h)) (* w h) (/ (* d d) (* D D)) (* D D) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (* c0 (/ (* d d) (* (* (* h w) D) D))) (/ (* d d) (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d))) (* (* (* M M) h) w) (* (* M M) h) (* M M) (* (* c0 c0) (* d d)) (* c0 c0) -1/2 (* (* d (/ d (* (* (* h w) D) D))) 2) (* d (/ d (* (* (* h w) D) D))) (/ d (* (* (* h w) D) D)))
9.0ms
w
@-inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* d (* d c0))) (* (* (* h w) D) D)) (* 2 (* d (* d c0))) (* d (* d c0)) d (* d c0) (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (+ w w) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* h (* w D)) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) (* (* h (* w D)) D) (* h (* w D)) (* w D) (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ c0 (* w h)) (* w h) (/ (* d d) (* D D)) (* D D) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (* c0 (/ (* d d) (* (* (* h w) D) D))) (/ (* d d) (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d))) (* (* (* M M) h) w) (* (* M M) h) (* M M) (* (* c0 c0) (* d d)) (* c0 c0) -1/2 (* (* d (/ d (* (* (* h w) D) D))) 2) (* d (/ d (* (* (* h w) D) D))) (/ d (* (* (* h w) D) D)))
9.0ms
h
@0
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* d (* d c0))) (* (* (* h w) D) D)) (* 2 (* d (* d c0))) (* d (* d c0)) d (* d c0) (* (* (* h w) D) D) (* (* h w) D) (* h w) h D (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (sqrt -1) M) (sqrt -1) -1 M (+ w w) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* (* d d) c0)) (* (* h (* w D)) D)) (* 2 (* (* d d) c0)) (* (* d d) c0) (* d d) (* (* h (* w D)) D) (* h (* w D)) (* w D) (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ c0 (* w h)) (* w h) (/ (* d d) (* D D)) (* D D) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (* c0 (/ (* d d) (* (* (* h w) D) D))) (/ (* d d) (* (* (* h w) D) D)) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d))) (* (* (* M M) h) w) (* (* M M) h) (* M M) (* (* c0 c0) (* d d)) (* c0 c0) -1/2 (* (* d (/ d (* (* (* h w) D) D))) 2) (* d (/ d (* (* (* h w) D) D))) (/ d (* (* (* h w) D) D)))

rewrite221.0ms (2.7%)

Memory
-30.0MiB live, 393.2MiB allocated; 25ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0163536233
0171130877
0812030071
Stop Event
iter-limit
node-limit
iter-limit
Counts
436 → 545
Calls
Call 1
Inputs
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
c0
(*.f64 #s(literal 2 binary64) w)
#s(literal 2 binary64)
w
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0)))
(*.f64 d (*.f64 d c0))
d
(*.f64 d c0)
(*.f64 (*.f64 (*.f64 h w) D) D)
(*.f64 (*.f64 h w) D)
(*.f64 h w)
h
D
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))) (+.f64 w w))
(*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) M)
(sqrt.f64 #s(literal -1 binary64))
#s(literal -1 binary64)
M
(+.f64 w w)
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 h (*.f64 w D)) D))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 h (*.f64 w D)) D)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 h (*.f64 w D)) D))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0))
(*.f64 (*.f64 d d) c0)
(*.f64 d d)
(*.f64 (*.f64 h (*.f64 w D)) D)
(*.f64 h (*.f64 w D))
(*.f64 w D)
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))
(/.f64 c0 (*.f64 w h))
(*.f64 w h)
(/.f64 (*.f64 d d) (*.f64 D D))
(*.f64 D D)
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))) c0)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))) c0))
(*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))) c0)
(fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)))
(*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d))))
(/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 M M) h) w)
(*.f64 (*.f64 M M) h)
(*.f64 M M)
(*.f64 (*.f64 c0 c0) (*.f64 d d))
(*.f64 c0 c0)
#s(literal -1/2 binary64)
(*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))
(*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (/ c0 (* 2 w)) #s(hole binary64 (* 1/2 (/ c0 w))))
#s(approx c0 #s(hole binary64 c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (/ (* 2 (* d (* d c0))) (* (* (* h w) D) D)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* 2 (* d (* d c0))) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* d (* d c0)) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (* d c0) #s(hole binary64 (* c0 d)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (* c0 (sqrt -1)))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (/ (* 2 (* (* d d) c0)) (* (* h (* w D)) D)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* 2 (* (* d d) c0)) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* (* d d) c0) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (/ c0 (* w h)) #s(hole binary64 (/ c0 (* h w))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow c0 2) (+ (* -1/8 (/ (pow d 8) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 2) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (* c0 (/ (* d d) (* (* (* h w) D) D))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) c0)))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) (pow c0 2))))
#s(approx (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) #s(hole binary64 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))
#s(approx (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d))) #s(hole binary64 (/ (* (pow M 2) (* h w)) (* (pow c0 2) (pow d 2)))))
#s(approx (* (* c0 c0) (* d d)) #s(hole binary64 (* (pow c0 2) (pow d 2))))
#s(approx (* c0 c0) #s(hole binary64 (pow c0 2)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) (+ (* 1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* -1 (* c0 (+ (* -2 (/ (pow d 2) (* (pow D 2) (* h w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* 2 w) #s(hole binary64 (* 2 w)))
#s(approx w #s(hole binary64 w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (* (* h w) D) D) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (* h w) D) #s(hole binary64 (* D (* h w))))
#s(approx (* h w) #s(hole binary64 (* h w)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6))))))) w)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10))))))))) w)))
#s(approx (+ w w) #s(hole binary64 (* 2 w)))
#s(approx (* (* h (* w D)) D) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* h (* w D)) #s(hole binary64 (* D (* h w))))
#s(approx (* w D) #s(hole binary64 (* D w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* w h) #s(hole binary64 (* h w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (/ (* d d) (* (* (* h w) D) D)) #s(hole binary64 (/ (pow d 2) (* (pow D 2) (* h w)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) h)))) w)))
#s(approx (* (* (* M M) h) w) #s(hole binary64 (* (pow M 2) (* h w))))
#s(approx (* (* d (/ d (* (* (* h w) D) D))) 2) #s(hole binary64 (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))
#s(approx (* d (/ d (* (* (* h w) D) D))) #s(hole binary64 (/ (pow d 2) (* (pow D 2) (* h w)))))
#s(approx (/ d (* (* (* h w) D) D)) #s(hole binary64 (/ d (* (pow D 2) (* h w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (* c0 (sqrt -1))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* w (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (* w (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (* c0 (sqrt -1))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* -1 (* w (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (* -1 (* w (+ (* -2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx h #s(hole binary64 h))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) h)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (pow d 2))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) w)))) h)))
#s(approx (* (* M M) h) #s(hole binary64 (* (pow M 2) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow h 2) w))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* (pow h 2) w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (* c0 (sqrt -1))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* -1 (* h (+ (* -2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow h 2) w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (* -1 (* h (+ (* -2 (/ (pow d 2) (* (pow D 2) (* (pow h 2) w)))) (* 1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx D #s(hole binary64 D))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6))))))) (pow D 2))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (pow d 2))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10))))))))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx (/ (* d d) (* D D)) #s(hole binary64 (/ (pow d 2) (pow D 2))))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* h w)))) (pow D 2))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 4) (* h w))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (* (pow D 2) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 4) (* h w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx d #s(hole binary64 d))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* M (* c0 (sqrt -1))) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow d 4) (+ (* -1/8 (/ (pow c0 4) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 6) (pow d 4)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) c0)) (* 2 (/ (* c0 (pow d 4)) (* (pow D 2) (* h w))))) (pow d 2))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow c0 2))) (* 2 (/ (pow d 4) (* (pow D 2) (* h w))))) (pow d 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 4))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 12)))) (* 2 (/ (pow c0 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 4)))) (* 2 (/ 1 (* (pow D 2) (* h w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (pow d 2))) (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 2) (pow d 6)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (pow d 2))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 2) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 4) (pow d 10)))))))))))
#s(approx (* (sqrt -1) M) #s(hole binary64 (* M (sqrt -1))))
#s(approx M #s(hole binary64 M))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (* M M) #s(hole binary64 (pow M 2)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* c0 (sqrt -1)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* (pow M 2) (* h w)))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) #s(hole binary64 (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* (pow M 2) (* h w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (* c0 (sqrt -1))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h w))))) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))) M)) (* c0 (sqrt -1)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))))
Outputs
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
(/.f64 (*.f64 c0 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D)))) (+.f64 w w))
(/.f64 (/.f64 c0 #s(literal 2 binary64)) w)
(/.f64 (neg.f64 c0) (neg.f64 (+.f64 w w)))
(/.f64 c0 (+.f64 w w))
c0
(*.f64 #s(literal 2 binary64) w)
(/.f64 (-.f64 (*.f64 w w) (*.f64 w w)) (-.f64 w w))
(/.f64 (fma.f64 (*.f64 w w) w (*.f64 (*.f64 w w) w)) (fma.f64 w w (-.f64 (*.f64 w w) (*.f64 w w))))
(+.f64 w w)
#s(literal 2 binary64)
w
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D)))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 d (*.f64 d c0)) D))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d (*.f64 d c0)) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h w) D)) D)
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0)))) (neg.f64 (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0)
(*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 d c0))
(*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0)))
(fma.f64 (*.f64 d d) c0 (*.f64 d (*.f64 d c0)))
(fma.f64 d (*.f64 d c0) (*.f64 d (*.f64 d c0)))
(+.f64 (*.f64 d (*.f64 d c0)) (*.f64 d (*.f64 d c0)))
(*.f64 (*.f64 d d) c0)
(*.f64 d (*.f64 d c0))
d
(*.f64 d c0)
(*.f64 (*.f64 (*.f64 h w) D) D)
(*.f64 (*.f64 h w) (*.f64 D D))
(*.f64 h (*.f64 (*.f64 w D) D))
(*.f64 (*.f64 h w) D)
(*.f64 h (*.f64 w D))
(*.f64 h w)
h
D
(*.f64 c0 (/.f64 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)) (+.f64 w w)))
(/.f64 (neg.f64 (*.f64 c0 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))) (neg.f64 (+.f64 w w)))
(/.f64 (*.f64 c0 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))) (+.f64 w w))
(*.f64 c0 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) M)
(pow.f64 #s(literal -1 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal -1 binary64))
#s(literal -1 binary64)
M
(*.f64 #s(literal 2 binary64) w)
(/.f64 (-.f64 (*.f64 w w) (*.f64 w w)) (-.f64 w w))
(/.f64 (fma.f64 (*.f64 w w) w (*.f64 (*.f64 w w) w)) (fma.f64 w w (-.f64 (*.f64 w w) (*.f64 w w))))
(+.f64 w w)
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
(/.f64 (*.f64 c0 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D)))) (+.f64 w w))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D)))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 d (*.f64 d c0)) D))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d (*.f64 d c0)) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h w) D)) D)
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0)))) (neg.f64 (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0)
(*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 d c0))
(*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0)))
(fma.f64 (*.f64 d d) c0 (*.f64 d (*.f64 d c0)))
(fma.f64 d (*.f64 d c0) (*.f64 d (*.f64 d c0)))
(+.f64 (*.f64 d (*.f64 d c0)) (*.f64 d (*.f64 d c0)))
(*.f64 (*.f64 d d) c0)
(*.f64 d (*.f64 d c0))
(*.f64 (pow.f64 d #s(literal 1 binary64)) (pow.f64 d #s(literal 1 binary64)))
(*.f64 (neg.f64 d) (neg.f64 d))
(*.f64 (fabs.f64 d) (fabs.f64 d))
(*.f64 d d)
(pow.f64 d #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 d) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 h w) D) D)
(*.f64 (*.f64 h w) (*.f64 D D))
(*.f64 h (*.f64 (*.f64 w D) D))
(*.f64 (*.f64 h w) D)
(*.f64 h (*.f64 w D))
(*.f64 w D)
(*.f64 (/.f64 c0 (+.f64 w w)) (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(/.f64 (*.f64 c0 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))) (+.f64 w w))
(fma.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) (/.f64 c0 (+.f64 w w)) (*.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) (/.f64 c0 (+.f64 w w))))
(fma.f64 (/.f64 c0 (+.f64 w w)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) (*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(+.f64 (*.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) (/.f64 c0 (+.f64 w w))) (*.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) (/.f64 c0 (+.f64 w w))))
(+.f64 (*.f64 (/.f64 c0 (+.f64 w w)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D)))) (*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(/.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) #s(literal 2 binary64)) (*.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))) (-.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(/.f64 (+.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) #s(literal 3 binary64)) (pow.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))) (*.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))))
(fma.f64 (/.f64 c0 (*.f64 w h)) (*.f64 d (/.f64 d (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))
(fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))
(+.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))
(/.f64 (neg.f64 c0) (neg.f64 (*.f64 w h)))
(/.f64 (/.f64 c0 w) h)
(/.f64 c0 (*.f64 w h))
(*.f64 w h)
(*.f64 (/.f64 d D) (/.f64 d D))
(*.f64 d (/.f64 d (*.f64 D D)))
(/.f64 (/.f64 (*.f64 d d) D) D)
(/.f64 (neg.f64 (*.f64 d d)) (neg.f64 (*.f64 D D)))
(/.f64 (*.f64 d d) (*.f64 D D))
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (neg.f64 D) (neg.f64 D))
(*.f64 (fabs.f64 D) (fabs.f64 D))
(*.f64 D D)
(pow.f64 D #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 D) #s(literal 2 binary64)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (/.f64 d (*.f64 (*.f64 h w) D)) (/.f64 d D))
(*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) D)
(/.f64 (neg.f64 (*.f64 d d)) (neg.f64 (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) c0)))
(/.f64 (*.f64 c0 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) c0))) (+.f64 w w))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) c0))
(*.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) c0)
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))))))
(fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)))
(fma.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d))))) #s(literal -1/2 binary64)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64)) (*.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 D D) (*.f64 c0 c0)) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 d d)))
(*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d))))))
(*.f64 D (*.f64 D (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w))) (neg.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d)))))
(/.f64 (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 c0)) (*.f64 d d))
(/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 c0 (*.f64 d d))))
(*.f64 (/.f64 (*.f64 (*.f64 M M) h) (*.f64 c0 c0)) (/.f64 w (*.f64 d d)))
(*.f64 (/.f64 (*.f64 M M) (*.f64 c0 c0)) (/.f64 (*.f64 h w) (*.f64 d d)))
(*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))
(*.f64 (*.f64 M M) (/.f64 (*.f64 h w) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 c0)) (*.f64 d d))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 M M) h) w)) (neg.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d)))))
(/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 (*.f64 c0 (*.f64 d d))))
(*.f64 (*.f64 (*.f64 M M) h) w)
(*.f64 (*.f64 M M) (*.f64 h w))
(*.f64 (*.f64 M M) h)
(*.f64 M (*.f64 M h))
(*.f64 (pow.f64 M #s(literal 1 binary64)) (pow.f64 M #s(literal 1 binary64)))
(*.f64 (neg.f64 M) (neg.f64 M))
(*.f64 (fabs.f64 M) (fabs.f64 M))
(*.f64 M M)
(pow.f64 M #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 M) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 c0 c0) d) d)
(*.f64 (*.f64 c0 d) (*.f64 c0 d))
(*.f64 (*.f64 c0 c0) (*.f64 d d))
(*.f64 c0 (*.f64 c0 (*.f64 d d)))
(pow.f64 (*.f64 c0 d) #s(literal 2 binary64))
(*.f64 (pow.f64 c0 #s(literal 1 binary64)) (pow.f64 c0 #s(literal 1 binary64)))
(*.f64 (neg.f64 c0) (neg.f64 c0))
(*.f64 (fabs.f64 c0) (fabs.f64 c0))
(*.f64 c0 c0)
(pow.f64 c0 #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 c0) #s(literal 2 binary64)))
#s(literal -1/2 binary64)
(*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))
(*.f64 d (*.f64 (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64)))
(*.f64 (/.f64 d (*.f64 (*.f64 h w) D)) (/.f64 d D))
(*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 h w) D)) D)
(/.f64 (neg.f64 (*.f64 d d)) (neg.f64 (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))
(/.f64 (/.f64 d (*.f64 (*.f64 h w) D)) D)
(/.f64 (neg.f64 d) (neg.f64 (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 c0 (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 c0 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 c0 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))))))))))
#s(approx (/ c0 (* 2 w)) (*.f64 #s(literal 1/2 binary64) (/.f64 c0 w)))
#s(approx c0 c0)
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (fma.f64 c0 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (/ (* 2 (* d (* d c0))) (* (* (* h w) D) D)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (* 2 (* d (* d c0))) (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))))
#s(approx (* d (* d c0)) (*.f64 c0 (*.f64 d d)))
#s(approx (* d c0) (*.f64 c0 d))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 c0 (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 c0 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 c0 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 c0 (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 c0 (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 c0 (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (fma.f64 c0 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (/ (* 2 (* d (* d c0))) (* (* (* h w) D) D)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (* 2 (* d (* d c0))) (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))))
#s(approx (* d (* d c0)) (*.f64 c0 (*.f64 d d)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 c0 (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 c0 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 c0 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (fma.f64 c0 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (/ c0 (* w h)) (/.f64 c0 (*.f64 h w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 D #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))))))))))
#s(approx (* c0 (/ (* d d) (* (* (* h w) D) D))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w))) (*.f64 c0 (*.f64 d d))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 d d)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) c0))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 d d)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) (*.f64 c0 c0)))
#s(approx (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
#s(approx (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d))) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d))))))
#s(approx (* (* c0 c0) (* d d)) (*.f64 c0 (*.f64 c0 (*.f64 d d))))
#s(approx (* c0 c0) (*.f64 c0 c0))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (fma.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 c0 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 c0 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 c0 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (fma.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (-.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (+.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (+.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d))))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (fma.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 c0 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 c0 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 c0 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 c0 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 6 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 10 binary64)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (neg.f64 (*.f64 c0 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 d d)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 w w) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 w w) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64)))))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (+ w w) (+.f64 w w))
#s(approx w w)
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h)))) w))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64))))))) w))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))))))))) w))
#s(approx (* (* (* h w) D) D) (*.f64 (*.f64 (*.f64 D D) h) w))
#s(approx (* (* h w) D) (*.f64 D (*.f64 h w)))
#s(approx (* h w) (*.f64 h w))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 d d)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 w w) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 w w) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64)))))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 d d)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 (*.f64 D D) h))) w))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64))))))) w))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64)))))))))) w))
#s(approx (+ w w) (+.f64 w w))
#s(approx (* (* (* h w) D) D) (*.f64 (*.f64 (*.f64 D D) h) w))
#s(approx (* (* h w) D) (*.f64 D (*.f64 h w)))
#s(approx (* w D) (*.f64 D w))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 d d)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 w w) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 w w) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64)))))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h)))) w))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64))))))) w))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h)) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))))))))) w))
#s(approx (* w h) (*.f64 h w))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h))) w))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (*.f64 w w) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h))) w))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (*.f64 w w) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 w w) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h))) w))
#s(approx (* d (/ d (* (* (* h w) D) D))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h)))) w))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 (*.f64 D D) h))) w))
#s(approx (* (* (* M M) h) w) (*.f64 (*.f64 (*.f64 M M) h) w))
#s(approx (* (* d (/ d (* (* (* h w) D) D))) 2) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (* d (/ d (* (* (* h w) D) D))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (/ d (* (* (* h w) D) D)) (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))) w))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))) w))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))) w))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))) w))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 D #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (*.f64 w (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (*.f64 w (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 w (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 (*.f64 D D) h))) w)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))))) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h)))) w)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))) w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 w (sqrt.f64 #s(literal -1 binary64))))))))) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64)))))))) w))) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 w (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 (*.f64 D D) h))) w)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))))) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h)))) w)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))) w)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 w (sqrt.f64 #s(literal -1 binary64))))))))) w)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 d d) (*.f64 d d)))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64)))))) w))) w)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 w (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 (*.f64 D D) h))) w)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))))) w)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) h)))) w)) (*.f64 #s(literal 1/2 binary64) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))) w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 w (sqrt.f64 #s(literal -1 binary64))))))))) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) h))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64)))))))) w))) w)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (neg.f64 (*.f64 w (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 c0 (*.f64 d d))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (neg.f64 (*.f64 w (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (*.f64 h h))) (*.f64 d d)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w)))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 h h) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 d d)) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w)))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 h h) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 d d)) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 w w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64)))))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w)))) h))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w)))) h))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w)) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) w))))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64))))))) h))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w)) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64))))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))))))))) h))
#s(approx h h)
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (*.f64 h h))) (*.f64 d d)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w)))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 h h) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 d d)) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w)))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 h h) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 d d)) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 w w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64)))))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w)))) h))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 (*.f64 h h) w)) (*.f64 d d)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 (*.f64 D D) w))) h))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 d d)) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) w))))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64))))))) h))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w)) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 d d)) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64))))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64)))))))))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (*.f64 h h))) (*.f64 d d)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w)))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 h h) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 d d)) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w)))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 h h) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 d d)) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 w w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64)))))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w)))) h))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w)))) h))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w)) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) w))))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64))))))) h))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w)) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64))))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))))))))) h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w))) h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (*.f64 h h) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) w))))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w))) h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (*.f64 h h) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 h h) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64))))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w))) h))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w)))) h))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 (*.f64 D D) w))) h))
#s(approx (* (* M M) h) (*.f64 (*.f64 M M) h))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (*.f64 h (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) (*.f64 (*.f64 h h) w)))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (*.f64 h (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 (*.f64 D D) (*.f64 (*.f64 h h) w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 (*.f64 w w) w)) (sqrt.f64 #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))) h)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64)))))))) h))) h)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 (*.f64 w w) w)) (sqrt.f64 #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))) h)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) w))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 d d) (*.f64 d d)))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64)))))) h))) h)) (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 h h) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 (*.f64 w w) w)) (sqrt.f64 #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 w w))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))) h)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64)))))))) h))) h)) (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (neg.f64 (*.f64 h (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) (*.f64 (*.f64 h h) w))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (neg.f64 (*.f64 h (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 D D) (*.f64 (*.f64 h h) w))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w))) (*.f64 c0 (*.f64 c0 (*.f64 d d))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 h (*.f64 w w)))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 d d))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 h (*.f64 w w)))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64))))))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 h (*.f64 w w)))) (*.f64 D D)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 h w))) (*.f64 D D)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 h w)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))))))) (*.f64 D D)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 h w)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))))))))) (*.f64 D D)))
#s(approx D D)
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 h (*.f64 w w)))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 d d))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 h (*.f64 w w)))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64))))))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 h (*.f64 w w)))) (*.f64 D D)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 h w)))) (*.f64 D D)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 h w)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 d d)) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))))) (*.f64 D D)))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 h w)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64)))))))))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 h (*.f64 w w)))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 d d))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 h (*.f64 w w)))) (*.f64 D D)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) (/.f64 h (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64))))))))) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 h (*.f64 w w)))) (*.f64 D D)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 h w))) (*.f64 D D)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 h w)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))))))) (*.f64 D D)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 h w)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))))))))) (*.f64 D D)))
#s(approx (/ (* d d) (* D D)) (*.f64 d (/.f64 d (*.f64 D D))))
#s(approx (* D D) (*.f64 D D))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 h w))) (*.f64 D D)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 h w))) (*.f64 D D)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 h w))) (*.f64 D D)))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 h w))) (*.f64 D D)))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) (*.f64 h w))) (*.f64 D D)))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (*.f64 (*.f64 D D) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 h w))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (*.f64 (*.f64 D D) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 h w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w) (*.f64 (*.f64 d d) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w) (*.f64 (*.f64 d d) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 c0 c0) c0)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 d d) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 d d) (fma.f64 (*.f64 d d) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx d d)
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w) (*.f64 (*.f64 d d) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w) (*.f64 (*.f64 d d) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 c0 c0) c0)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 d d) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 d d) (fma.f64 (*.f64 d d) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) c0)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (* d d) (*.f64 d d))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w) (*.f64 (*.f64 d d) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w) (*.f64 (*.f64 d d) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 c0 c0) c0)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 d d) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 d d) (fma.f64 (*.f64 d d) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 c0 d) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 M (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (pow.f64 D #s(literal 12 binary64)) (*.f64 (pow.f64 M #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) c0) (*.f64 #s(literal 2 binary64) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w))))) (*.f64 d d)))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 c0)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w)))) (*.f64 d d)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) (*.f64 d d))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) (*.f64 d d))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64)))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) (*.f64 d d))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 12 binary64))))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 8 binary64)))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 8 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 12 binary64)))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) (*.f64 d d))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) (*.f64 d d))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64)))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) (*.f64 d d))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 12 binary64))))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) (*.f64 d d))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) (*.f64 d d))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 12 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) (*.f64 d d))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) (*.f64 d d))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64)))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 d d) (*.f64 d d))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 8 binary64)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 12 binary64))))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 8 binary64)))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 8 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 12 binary64)))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 8 binary64)))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 8 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 12 binary64)))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D D) h) w)))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 (*.f64 d d) (*.f64 d d)))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (*.f64 (*.f64 d d) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d)))) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (*.f64 M M) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 d d))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (*.f64 M M) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 d d))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w)))))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 #s(literal 2 binary64) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 #s(literal 2 binary64) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 5 binary64))))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (*.f64 M M) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 d d))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (*.f64 M M) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 d d))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w)))))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 d d)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 d d)) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 d d)) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64)))))))))))
#s(approx (* (sqrt -1) M) (*.f64 M (sqrt.f64 #s(literal -1 binary64))))
#s(approx M M)
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)) (*.f64 d d)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (*.f64 M M) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 d d))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (fma.f64 (*.f64 M M) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) (/.f64 h (*.f64 d d))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))) (*.f64 (*.f64 c0 c0) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 M M) (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w)))))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 #s(literal 2 binary64) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 #s(literal 2 binary64) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 5 binary64))))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)))) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (pow.f64 d #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (*.f64 (*.f64 M M) (pow.f64 (*.f64 h w) #s(literal 5 binary64))))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w))))
#s(approx (* M M) (*.f64 M M))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w))))))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (fma.f64 c0 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))) (fma.f64 c0 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))) (fma.f64 c0 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 M (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 M (-.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 D #s(literal 12 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))))))))
#s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) c0) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 d d))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w))))))
#s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (* d (/ d (* (* (* h w) D) D))) 2)) (*.f64 (*.f64 M M) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) h) w) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 h h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))))) M)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) M))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 h h))) (*.f64 (*.f64 (*.f64 w w) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))) M)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) M))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 h h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))))) M)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (+.f64 (neg.f64 (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))) (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) M)) (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 h h))) (*.f64 (*.f64 (*.f64 w w) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))) M)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) M)) (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 M (*.f64 c0 (sqrt.f64 #s(literal -1 binary64)))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h (*.f64 w w)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (neg.f64 (*.f64 M (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 h h) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))))))))) M)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))) M)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 c0 (sqrt.f64 #s(literal -1 binary64))) w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (neg.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) M))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 h h))) (*.f64 (*.f64 (*.f64 w w) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))) M)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) M))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 M (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 M (-.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 M (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (pow.f64 D #s(literal 12 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))))))))))))))

eval52.0ms (0.6%)

Memory
0.9MiB live, 101.6MiB allocated; 13ms collecting garbage
Compiler

Compiled 13 899 to 2 721 computations (80.4% saved)

prune45.0ms (0.5%)

Memory
10.7MiB live, 105.3MiB allocated; 3ms collecting garbage
Pruning

41 alts after pruning (39 fresh and 2 done)

PrunedKeptTotal
New43018448
Fresh62127
Picked415
Done011
Total44041481
Accuracy
62.2%
Counts
481 → 41
Alt Table
Click to see full alt table
StatusAccuracyProgram
25.9%
(fma.f64 (/.f64 c0 (+.f64 w w)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (/.f64 c0 (+.f64 w w)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))
25.6%
(/.f64 (fma.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0 (*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))) c0)) (+.f64 w w))
25.7%
(/.f64 (*.f64 c0 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))) (+.f64 w w))
3.2%
(/.f64 (*.f64 c0 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (neg.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))) (+.f64 w w))
0.0%
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))) (+.f64 w w))
37.7%
(/.f64 (*.f64 c0 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D)))) (+.f64 w w))
22.7%
(/.f64 (*.f64 c0 #s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w)))) h))) (+.f64 w w))
30.1%
(/.f64 (*.f64 c0 #s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))) (+.f64 w w))
3.6%
(/.f64 (*.f64 c0 #s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))) (+.f64 w w))
21.8%
(/.f64 #s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 d d)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 (*.f64 D D) h))) w)) (+.f64 w w))
24.4%
(/.f64 #s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) (+.f64 w w))
29.0%
(*.f64 (/.f64 c0 (+.f64 w w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
31.5%
(*.f64 (/.f64 c0 (+.f64 w w)) (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
32.5%
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 h (*.f64 w D)) D))))
37.9%
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
23.4%
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))) c0)))
29.1%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 (/.f64 c0 w) h) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
29.7%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 (/.f64 d (*.f64 (*.f64 h w) D)) (/.f64 d D))))))
29.7%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))))))
3.6%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
30.8%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (*.f64 (/.f64 d D) (/.f64 d D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
30.0%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (*.f64 d (/.f64 d (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
3.6%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))))
29.0%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (*.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
40.8%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h w) D)) D)))
36.0%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 h (*.f64 (*.f64 w D) D)))))
33.9%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) #s(approx (* (* (* h w) D) D) (*.f64 (*.f64 (*.f64 D D) h) w)))))
23.0%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 d (*.f64 (*.f64 h w) D)) (/.f64 d D)) #s(literal 2 binary64))) c0)))
28.1%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h w) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64) (*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))) c0)))
28.4%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 D (*.f64 D (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d))))))) #s(literal -1/2 binary64) (*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))) c0)))
36.9%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D))))
28.2%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 #s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) c0)))
15.9%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 #s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))) c0)))
3.8%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0))))
17.9%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w))) (*.f64 c0 (*.f64 d d))))))
19.2%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (*.f64 h (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) (*.f64 (*.f64 h h) w)))))))))
26.1%
(*.f64 c0 (/.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))) (+.f64 w w)))
2.9%
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
22.4%
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
17.7%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h h)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) (*.f64 D D))))) h))
3.4%
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) w) #s(literal -1/2 binary64)))
Compiler

Compiled 3 486 to 2 701 computations (22.5% saved)

series178.0ms (2.2%)

Memory
10.6MiB live, 343.3MiB allocated; 15ms collecting garbage
Counts
60 → 310
Calls
Call 1
Inputs
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h w) D)) D)))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
c0
(*.f64 #s(literal 2 binary64) w)
#s(literal 2 binary64)
w
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h w) D)) D))
(/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h w) D)) D)
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h w) D))
(*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0)))
(*.f64 d (*.f64 d c0))
d
(*.f64 d c0)
(*.f64 (*.f64 h w) D)
(*.f64 h w)
h
D
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
(*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
(*.f64 c0 c0)
(/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))
(*.f64 d d)
(*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))
(*.f64 (*.f64 D D) h)
(*.f64 D D)
(*.f64 w w)
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 h (*.f64 (*.f64 w D) D)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 h (*.f64 (*.f64 w D) D))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 h (*.f64 (*.f64 w D) D)))
(*.f64 h (*.f64 (*.f64 w D) D))
(*.f64 (*.f64 w D) D)
(*.f64 w D)
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))))))
(fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))))))
(/.f64 c0 (*.f64 w h))
(*.f64 w h)
(/.f64 (*.f64 d d) (*.f64 D D))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))))
(*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (*.f64 (*.f64 h w) D) D)
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
(*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d))))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))
#s(literal -1/2 binary64)
(/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w)
(*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(literal 0 binary64)
(/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))
(*.f64 (*.f64 (*.f64 D D) h) w)
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)))
#s(literal 1/4 binary64)
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))
(*.f64 (*.f64 M M) h)
(*.f64 M M)
M
(*.f64 c0 (*.f64 c0 (*.f64 d d)))
(*.f64 c0 (*.f64 d d))
Outputs
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (/ c0 (* 2 w)) #s(hole binary64 (* 1/2 (/ c0 w))))
#s(approx c0 #s(hole binary64 c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (/ (/ (* 2 (* d (* d c0))) (* (* h w) D)) D) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (/ (* 2 (* d (* d c0))) (* (* h w) D)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* D (* h w))))))
#s(approx (* 2 (* d (* d c0))) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* d (* d c0)) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (* d c0) #s(hole binary64 (* c0 d)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (* (* c0 c0) (/ (* d d) (* (* (* D D) h) (* w w)))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* c0 c0) #s(hole binary64 (pow c0 2)))
#s(approx (/ (* 2 (* d (* d c0))) (* h (* (* w D) D))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (/ c0 (* w h)) #s(hole binary64 (/ c0 (* h w))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow c0 2) (+ (* -1/8 (/ (pow d 8) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 2) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (* c0 (* d (/ d (* (* (* h w) D) D)))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) #s(hole binary64 (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d))))) #s(hole binary64 (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))
#s(approx (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))) #s(hole binary64 (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))
#s(approx (* c0 (* c0 (* d d))) #s(hole binary64 (* (pow c0 2) (pow d 2))))
#s(approx (* c0 (* d d)) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* 2 w) #s(hole binary64 (* 2 w)))
#s(approx w #s(hole binary64 w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (* h w) D) #s(hole binary64 (* D (* h w))))
#s(approx (* h w) #s(hole binary64 (* h w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* d d) (* (* (* D D) h) (* w w))) #s(hole binary64 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (* (* D D) h) (* w w)) #s(hole binary64 (* (pow D 2) (* h (pow w 2)))))
#s(approx (* w w) #s(hole binary64 (pow w 2)))
#s(approx (* h (* (* w D) D)) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (* w D) D) #s(hole binary64 (* (pow D 2) w)))
#s(approx (* w D) #s(hole binary64 (* D w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* w h) #s(hole binary64 (* h w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (* d (/ d (* (* (* h w) D) D))) #s(hole binary64 (/ (pow d 2) (* (pow D 2) (* h w)))))
#s(approx (/ d (* (* (* h w) D) D)) #s(hole binary64 (/ d (* (pow D 2) (* h w)))))
#s(approx (* (* (* h w) D) D) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w) #s(hole binary64 0))
#s(approx (* 0 (/ (* d d) (* (* (* D D) h) w))) #s(hole binary64 0))
#s(approx (/ (* d d) (* (* (* D D) h) w)) #s(hole binary64 (/ (pow d 2) (* (pow D 2) (* h w)))))
#s(approx (* (* (* D D) h) w) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx h #s(hole binary64 h))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (* D D) h) #s(hole binary64 (* (pow D 2) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (* 1/4 (* (* D D) (* (* M M) h))) #s(hole binary64 (* 1/4 (* (pow D 2) (* (pow M 2) h)))))
#s(approx (* (* D D) (* (* M M) h)) #s(hole binary64 (* (pow D 2) (* (pow M 2) h))))
#s(approx (* (* M M) h) #s(hole binary64 (* (pow M 2) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx D #s(hole binary64 D))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx (/ (* d d) (* D D)) #s(hole binary64 (/ (pow d 2) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx d #s(hole binary64 d))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow d 4) (+ (* -1/8 (/ (pow c0 4) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 6) (pow d 4)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* M M) #s(hole binary64 (pow M 2)))
#s(approx M #s(hole binary64 M))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))))
Calls

18 calls:

TimeVariablePointExpression
13.0ms
w
@inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (/ (* 2 (* d (* d c0))) (* (* h w) D)) D) (/ (* 2 (* d (* d c0))) (* (* h w) D)) (* 2 (* d (* d c0))) (* d (* d c0)) d (* d c0) (* (* h w) D) (* h w) h D (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (* (* c0 c0) (/ (* d d) (* (* (* D D) h) (* w w)))) (* c0 c0) (/ (* d d) (* (* (* D D) h) (* w w))) (* d d) (* (* (* D D) h) (* w w)) (* (* D D) h) (* D D) (* w w) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* d (* d c0))) (* h (* (* w D) D))) (* h (* (* w D) D)) (* (* w D) D) (* w D) (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ c0 (* w h)) (* w h) (/ (* d d) (* D D)) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (* c0 (* d (/ d (* (* (* h w) D) D)))) (* d (/ d (* (* (* h w) D) D))) (/ d (* (* (* h w) D) D)) (* (* (* h w) D) D) (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d))))) -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w) (* 0 (/ (* d d) (* (* (* D D) h) w))) 0 (/ (* d d) (* (* (* D D) h) w)) (* (* (* D D) h) w) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))) (* 1/4 (* (* D D) (* (* M M) h))) 1/4 (* (* D D) (* (* M M) h)) (* (* M M) h) (* M M) M (* c0 (* c0 (* d d))) (* c0 (* d d)))
12.0ms
d
@-inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (/ (* 2 (* d (* d c0))) (* (* h w) D)) D) (/ (* 2 (* d (* d c0))) (* (* h w) D)) (* 2 (* d (* d c0))) (* d (* d c0)) d (* d c0) (* (* h w) D) (* h w) h D (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (* (* c0 c0) (/ (* d d) (* (* (* D D) h) (* w w)))) (* c0 c0) (/ (* d d) (* (* (* D D) h) (* w w))) (* d d) (* (* (* D D) h) (* w w)) (* (* D D) h) (* D D) (* w w) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* d (* d c0))) (* h (* (* w D) D))) (* h (* (* w D) D)) (* (* w D) D) (* w D) (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ c0 (* w h)) (* w h) (/ (* d d) (* D D)) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (* c0 (* d (/ d (* (* (* h w) D) D)))) (* d (/ d (* (* (* h w) D) D))) (/ d (* (* (* h w) D) D)) (* (* (* h w) D) D) (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d))))) -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w) (* 0 (/ (* d d) (* (* (* D D) h) w))) 0 (/ (* d d) (* (* (* D D) h) w)) (* (* (* D D) h) w) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))) (* 1/4 (* (* D D) (* (* M M) h))) 1/4 (* (* D D) (* (* M M) h)) (* (* M M) h) (* M M) M (* c0 (* c0 (* d d))) (* c0 (* d d)))
11.0ms
d
@0
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (/ (* 2 (* d (* d c0))) (* (* h w) D)) D) (/ (* 2 (* d (* d c0))) (* (* h w) D)) (* 2 (* d (* d c0))) (* d (* d c0)) d (* d c0) (* (* h w) D) (* h w) h D (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (* (* c0 c0) (/ (* d d) (* (* (* D D) h) (* w w)))) (* c0 c0) (/ (* d d) (* (* (* D D) h) (* w w))) (* d d) (* (* (* D D) h) (* w w)) (* (* D D) h) (* D D) (* w w) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* d (* d c0))) (* h (* (* w D) D))) (* h (* (* w D) D)) (* (* w D) D) (* w D) (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ c0 (* w h)) (* w h) (/ (* d d) (* D D)) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (* c0 (* d (/ d (* (* (* h w) D) D)))) (* d (/ d (* (* (* h w) D) D))) (/ d (* (* (* h w) D) D)) (* (* (* h w) D) D) (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d))))) -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w) (* 0 (/ (* d d) (* (* (* D D) h) w))) 0 (/ (* d d) (* (* (* D D) h) w)) (* (* (* D D) h) w) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))) (* 1/4 (* (* D D) (* (* M M) h))) 1/4 (* (* D D) (* (* M M) h)) (* (* M M) h) (* M M) M (* c0 (* c0 (* d d))) (* c0 (* d d)))
11.0ms
h
@-inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (/ (* 2 (* d (* d c0))) (* (* h w) D)) D) (/ (* 2 (* d (* d c0))) (* (* h w) D)) (* 2 (* d (* d c0))) (* d (* d c0)) d (* d c0) (* (* h w) D) (* h w) h D (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (* (* c0 c0) (/ (* d d) (* (* (* D D) h) (* w w)))) (* c0 c0) (/ (* d d) (* (* (* D D) h) (* w w))) (* d d) (* (* (* D D) h) (* w w)) (* (* D D) h) (* D D) (* w w) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* d (* d c0))) (* h (* (* w D) D))) (* h (* (* w D) D)) (* (* w D) D) (* w D) (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ c0 (* w h)) (* w h) (/ (* d d) (* D D)) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (* c0 (* d (/ d (* (* (* h w) D) D)))) (* d (/ d (* (* (* h w) D) D))) (/ d (* (* (* h w) D) D)) (* (* (* h w) D) D) (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d))))) -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w) (* 0 (/ (* d d) (* (* (* D D) h) w))) 0 (/ (* d d) (* (* (* D D) h) w)) (* (* (* D D) h) w) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))) (* 1/4 (* (* D D) (* (* M M) h))) 1/4 (* (* D D) (* (* M M) h)) (* (* M M) h) (* M M) M (* c0 (* c0 (* d d))) (* c0 (* d d)))
10.0ms
h
@inf
((* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/ c0 (* 2 w)) c0 (* 2 w) 2 w (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (/ (* 2 (* d (* d c0))) (* (* h w) D)) D) (/ (* 2 (* d (* d c0))) (* (* h w) D)) (* 2 (* d (* d c0))) (* d (* d c0)) d (* d c0) (* (* h w) D) (* h w) h D (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (* (* c0 c0) (/ (* d d) (* (* (* D D) h) (* w w)))) (* c0 c0) (/ (* d d) (* (* (* D D) h) (* w w))) (* d d) (* (* (* D D) h) (* w w)) (* (* D D) h) (* D D) (* w w) (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ (* 2 (* d (* d c0))) (* h (* (* w D) D))) (* h (* (* w D) D)) (* (* w D) D) (* w D) (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/ c0 (* w h)) (* w h) (/ (* d d) (* D D)) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (* c0 (* d (/ d (* (* (* h w) D) D)))) (* d (/ d (* (* (* h w) D) D))) (/ d (* (* (* h w) D) D)) (* (* (* h w) D) D) (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d))))) -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w) (* 0 (/ (* d d) (* (* (* D D) h) w))) 0 (/ (* d d) (* (* (* D D) h) w)) (* (* (* D D) h) w) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))) (* 1/4 (* (* D D) (* (* M M) h))) 1/4 (* (* D D) (* (* M M) h)) (* (* M M) h) (* M M) M (* c0 (* c0 (* d d))) (* c0 (* d d)))

rewrite328.0ms (4%)

Memory
17.0MiB live, 427.4MiB allocated; 115ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0127028962
0135424863
1685524863
0850824153
Stop Event
iter-limit
node-limit
iter-limit
Counts
370 → 599
Calls
Call 1
Inputs
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h w) D)) D)))
(/.f64 c0 (*.f64 #s(literal 2 binary64) w))
c0
(*.f64 #s(literal 2 binary64) w)
#s(literal 2 binary64)
w
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h w) D)) D))
(/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h w) D)) D)
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h w) D))
(*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0)))
(*.f64 d (*.f64 d c0))
d
(*.f64 d c0)
(*.f64 (*.f64 h w) D)
(*.f64 h w)
h
D
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
(*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
(*.f64 c0 c0)
(/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))
(*.f64 d d)
(*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))
(*.f64 (*.f64 D D) h)
(*.f64 D D)
(*.f64 w w)
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 h (*.f64 (*.f64 w D) D)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 h (*.f64 (*.f64 w D) D))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 h (*.f64 (*.f64 w D) D)))
(*.f64 h (*.f64 (*.f64 w D) D))
(*.f64 (*.f64 w D) D)
(*.f64 w D)
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))))))
(fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))))))
(/.f64 c0 (*.f64 w h))
(*.f64 w h)
(/.f64 (*.f64 d d) (*.f64 D D))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))))
(*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))
(/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))
(*.f64 (*.f64 (*.f64 h w) D) D)
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
(*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d))))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))
#s(literal -1/2 binary64)
(/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w)
(*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))
#s(literal 0 binary64)
(/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))
(*.f64 (*.f64 (*.f64 D D) h) w)
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h)))
#s(literal 1/4 binary64)
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))
(*.f64 (*.f64 M M) h)
(*.f64 M M)
M
(*.f64 c0 (*.f64 c0 (*.f64 d d)))
(*.f64 c0 (*.f64 d d))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (/ c0 (* 2 w)) #s(hole binary64 (* 1/2 (/ c0 w))))
#s(approx c0 #s(hole binary64 c0))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (/ (/ (* 2 (* d (* d c0))) (* (* h w) D)) D) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (/ (* 2 (* d (* d c0))) (* (* h w) D)) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* D (* h w))))))
#s(approx (* 2 (* d (* d c0))) #s(hole binary64 (* 2 (* c0 (pow d 2)))))
#s(approx (* d (* d c0)) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (* d c0) #s(hole binary64 (* c0 d)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (* (* c0 c0) (/ (* d d) (* (* (* D D) h) (* w w)))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* c0 c0) #s(hole binary64 (pow c0 2)))
#s(approx (/ (* 2 (* d (* d c0))) (* h (* (* w D) D))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* 1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* 1/2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/4 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* c0 (+ (* 1/2 (/ (* M (sqrt -1)) w)) (* c0 (+ (* 1/2 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))) (* c0 (+ (* -1/16 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1)))))))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* 1/2 (/ (* c0 (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* c0 (+ (* c0 (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (/ c0 (* w h)) #s(hole binary64 (/ c0 (* h w))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (sqrt -1))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* -1/8 (/ (* (pow c0 2) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow c0 2) (+ (* 1/2 (/ (pow d 4) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow c0 2) (+ (* -1/8 (/ (pow d 8) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 2) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (* c0 (* d (/ d (* (* (* h w) D) D)))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) #s(hole binary64 (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d))))) #s(hole binary64 (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))
#s(approx (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))) #s(hole binary64 (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))
#s(approx (* c0 (* c0 (* d d))) #s(hole binary64 (* (pow c0 2) (pow d 2))))
#s(approx (* c0 (* d d)) #s(hole binary64 (* c0 (pow d 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (* 2 (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* (pow c0 2) (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow c0 2) (+ (* -1/2 (/ (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w)))) w)) (+ (* 1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 6) (pow d 10)))) (+ (* 1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 4) (pow d 6)))) (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow c0 2) (pow d 2))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* c0 (+ (* -1 (/ (pow d 2) (* (pow D 2) (* h w)))) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (/ (pow d 2) (* (pow D 2) (* h w)))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* c0 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* (pow c0 2) (pow d 2)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 4) (pow d 6)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 6) (pow d 10)))) (/ (pow d 2) (* (pow D 2) (* h w))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* 2 w) #s(hole binary64 (* 2 w)))
#s(approx w #s(hole binary64 w))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* (* h w) D) #s(hole binary64 (* D (* h w))))
#s(approx (* h w) #s(hole binary64 (* h w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (/ (* d d) (* (* (* D D) h) (* w w))) #s(hole binary64 (/ (pow d 2) (* (pow D 2) (* h (pow w 2))))))
#s(approx (* (* (* D D) h) (* w w)) #s(hole binary64 (* (pow D 2) (* h (pow w 2)))))
#s(approx (* w w) #s(hole binary64 (pow w 2)))
#s(approx (* h (* (* w D) D)) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (* w D) D) #s(hole binary64 (* (pow D 2) w)))
#s(approx (* w D) #s(hole binary64 (* D w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (* (pow w 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h))) (pow w 2))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h)))) w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6))))))) w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10))))))))) w)))
#s(approx (* w h) #s(hole binary64 (* h w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h (pow w 2)))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow w 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) h)) (* c0 (pow d 2)))) (* (pow w 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow h 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 2)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) h))) w)))
#s(approx (* d (/ d (* (* (* h w) D) D))) #s(hole binary64 (/ (pow d 2) (* (pow D 2) (* h w)))))
#s(approx (/ d (* (* (* h w) D) D)) #s(hole binary64 (/ d (* (pow D 2) (* h w)))))
#s(approx (* (* (* h w) D) D) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w) #s(hole binary64 0))
#s(approx (* 0 (/ (* d d) (* (* (* D D) h) w))) #s(hole binary64 0))
#s(approx (/ (* d d) (* (* (* D D) h) w)) #s(hole binary64 (/ (pow d 2) (* (pow D 2) (* h w)))))
#s(approx (* (* (* D D) h) w) #s(hole binary64 (* (pow D 2) (* h w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w)))))) w)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* 1/2 (* M (* c0 (sqrt -1)))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))))) w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (+ (* M (sqrt -1)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* M (sqrt -1)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* M (* c0 (sqrt -1)))) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h w))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1)))))) (* 1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3)))))))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) h)))) w)) (* -1/2 (* M (* c0 (sqrt -1))))) w))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* w (sqrt -1)))))))) w)) (* M (sqrt -1)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) h))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 2) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (sqrt -1))))))) w))) w)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx h #s(hole binary64 h))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (* D D) h) #s(hole binary64 (* (pow D 2) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) (pow h 2))) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (* (pow h 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) h)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w)))) h)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) h)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* (pow h 2) w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 2) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow h 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) w)) (* c0 (pow d 2)))) (* (pow h 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 2) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) w))) h)))
#s(approx (* 1/4 (* (* D D) (* (* M M) h))) #s(hole binary64 (* 1/4 (* (pow D 2) (* (pow M 2) h)))))
#s(approx (* (* D D) (* (* M M) h)) #s(hole binary64 (* (pow D 2) (* (pow M 2) h))))
#s(approx (* (* M M) h) #s(hole binary64 (* (pow M 2) h)))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2)))) (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 3) (sqrt -1)))))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow w 3) (sqrt -1))))))) h)) (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (pow w 2))))) h)) (* 1/2 (/ (* M (* c0 (sqrt -1))) w)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* h (* (pow w 2) (sqrt -1)))))))) h)) (* M (sqrt -1)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) w))) (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 3) (* (pow h 2) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow w 2) (sqrt -1))))))) h))) h)) (* M (sqrt -1)))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx D #s(hole binary64 D))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow D 4) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/4 (/ (* (pow M 2) h) (pow d 2))) (* (pow D 4) (+ (* -1/16 (/ (* (pow M 4) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* h (pow w 2)))) (pow D 2))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* h w)))) (pow D 2))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6))))))) (pow D 2))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (/ (+ (* 2 (/ (* c0 (pow d 2)) (* h w))) (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10))))))))) (pow D 2))))
#s(approx (/ (* d d) (* D D)) #s(hole binary64 (/ (pow d 2) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow D 4) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 4) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (/ (+ (* (pow D 4) (+ (* -1/2 (/ (* (pow M 2) (* h w)) (* c0 (pow d 2)))) (* (pow D 4) (+ (* -1/8 (/ (* (pow M 4) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 4) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* h w))) (pow D 2))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx d #s(hole binary64 d))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/4 (/ (* (pow c0 3) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* 1/2 (/ (* M (* c0 (sqrt -1))) w)) (* (pow d 2) (+ (* 1/2 (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))) (* (pow d 2) (+ (* -1/16 (/ (* (pow c0 5) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (pow c0 3) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 2) (+ (* (pow d 2) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* -1/8 (/ (* (pow c0 4) (pow d 4)) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* M (sqrt -1)) (* (pow d 4) (+ (* 1/2 (/ (pow c0 2) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (* (pow d 4) (+ (* -1/8 (/ (pow c0 4) (* (pow D 8) (* (pow M 3) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/16 (/ (* (pow c0 6) (pow d 4)) (* (pow D 12) (* (pow M 5) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* (pow d 2) (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 4))) (+ (* -1/16 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 8)))) (+ (* -1/32 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 12)))) (/ (pow c0 2) (* (pow D 2) (* h (pow w 2))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (* 2 (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (* 2 (/ c0 (* (pow D 2) (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (/ c0 (* (pow D 2) (* h w)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (/ c0 (* (pow D 2) (* h w))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* (pow d 2) (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 4)))) (+ (* -1/8 (/ (* (pow D 6) (* (pow M 4) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 8)))) (+ (* -1/16 (/ (* (pow D 10) (* (pow M 6) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 12)))) (/ c0 (* (pow D 2) (* h w)))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* -1/16 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 2)))) (* (pow c0 2) (pow d 6)))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/4 (/ (* (pow D 2) h) (pow d 2))) (* (pow M 2) (+ (* -1/16 (/ (* (pow D 6) (* (pow h 3) (pow w 2))) (* (pow c0 2) (pow d 6)))) (* -1/32 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 4)))) (* (pow c0 4) (pow d 10)))))))) (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (+ (* 2 (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* -1/2 (/ (* (pow D 2) (* (pow M 2) (* h w))) (* c0 (pow d 2)))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* -1/8 (/ (* (pow D 6) (* (pow M 2) (* (pow h 3) (pow w 3)))) (* (pow c0 3) (pow d 6)))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (+ (* (pow M 2) (+ (* -1/2 (/ (* (pow D 2) (* h w)) (* c0 (pow d 2)))) (* (pow M 2) (+ (* -1/8 (/ (* (pow D 6) (* (pow h 3) (pow w 3))) (* (pow c0 3) (pow d 6)))) (* -1/16 (/ (* (pow D 10) (* (pow M 2) (* (pow h 5) (pow w 5)))) (* (pow c0 5) (pow d 10)))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w))))))
#s(approx (* M M) #s(hole binary64 (pow M 2)))
#s(approx M #s(hole binary64 M))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* M (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (+ (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (+ (* 1/2 (/ (* c0 (sqrt -1)) w)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2))))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w)))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1/2 (/ (* M (* c0 (sqrt -1))) w))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* M (* h (pow w 2)))))) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 3) (sqrt -1))))))) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) #s(hole binary64 (* -1 (* M (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (* (pow c0 5) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 5) (pow (sqrt -1) 3))))))) (* 1/4 (/ (* (pow c0 3) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 3) (sqrt -1))))))) M)) (* 1/2 (/ (* (pow c0 2) (pow d 2)) (* (pow D 2) (* h (pow w 2)))))) M)) (* 1/2 (/ (* c0 (sqrt -1)) w)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (* c0 (pow d 2)) (* (pow D 2) (* M (* h w))))))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* M (* (pow h 2) (* (pow w 2) (sqrt -1))))))) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 2) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow h 2) (* (pow w 2) (sqrt -1))))))) M)) (/ (* c0 (pow d 2)) (* (pow D 2) (* h w)))) M)))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (sqrt -1)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1)))))))))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) #s(hole binary64 (* -1 (* M (+ (sqrt -1) (+ (* -1/8 (/ (* (pow c0 4) (pow d 8)) (* (pow D 8) (* (pow M 4) (* (pow h 4) (* (pow w 4) (pow (sqrt -1) 3))))))) (+ (* 1/16 (/ (* (pow c0 6) (pow d 12)) (* (pow D 12) (* (pow M 6) (* (pow h 6) (* (pow w 6) (pow (sqrt -1) 5))))))) (* 1/2 (/ (* (pow c0 2) (pow d 4)) (* (pow D 4) (* (pow M 2) (* (pow h 2) (* (pow w 2) (sqrt -1))))))))))))))
Outputs
(*.f64 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64))) (/.f64 c0 (+.f64 w w)))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64))))
(/.f64 (*.f64 c0 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64)))) (+.f64 w w))
(/.f64 (/.f64 c0 #s(literal 2 binary64)) w)
(/.f64 (neg.f64 c0) (neg.f64 (+.f64 w w)))
(/.f64 c0 (+.f64 w w))
c0
(*.f64 w #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) w)
(/.f64 (-.f64 (*.f64 w w) (*.f64 w w)) (-.f64 w w))
(/.f64 (fma.f64 (*.f64 w w) w (*.f64 (*.f64 w w) w)) (fma.f64 w w (-.f64 (*.f64 w w) (*.f64 w w))))
(+.f64 w w)
#s(literal 2 binary64)
w
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 2 binary64) h) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D w) D)))
(*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d)) h) (*.f64 (*.f64 D w) D))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d))) (neg.f64 (*.f64 (*.f64 (*.f64 D w) D) h)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D h) w)) #s(literal 2 binary64))) (neg.f64 D))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D h) w)) #s(literal 2 binary64)) D)
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D w) D) h))
(fma.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) (*.f64 h w)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
(fma.f64 (*.f64 d (/.f64 d (*.f64 D D))) (/.f64 c0 (*.f64 h w)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
(fma.f64 (/.f64 c0 (*.f64 h w)) (*.f64 d (/.f64 d (*.f64 D D))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
(fma.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
(fma.f64 (*.f64 d c0) (/.f64 d (*.f64 (*.f64 (*.f64 D w) D) h)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
(fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
(+.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 h w)) (/.f64 (*.f64 (*.f64 d d) c0) D))
(*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D h) w)) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D h) w)))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d))) (neg.f64 (*.f64 (*.f64 D h) w)))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d)) (*.f64 h w)) D)
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d)) (*.f64 (*.f64 D h) w))
(fma.f64 (/.f64 c0 D) (/.f64 (*.f64 d d) (*.f64 h w)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D h) w)))
(fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 D h) w)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D h) w)))
(+.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D h) w)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D h) w)))
(*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d))
(*.f64 (*.f64 #s(literal 2 binary64) d) (*.f64 d c0))
(*.f64 (*.f64 (*.f64 d d) c0) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0))
(fma.f64 (*.f64 d d) c0 (*.f64 (*.f64 d d) c0))
(fma.f64 (*.f64 d c0) d (*.f64 (*.f64 d d) c0))
(fma.f64 d (*.f64 d c0) (*.f64 (*.f64 d d) c0))
(fma.f64 c0 (*.f64 d d) (*.f64 (*.f64 d d) c0))
(+.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 d d) c0))
(*.f64 (*.f64 d d) c0)
(*.f64 (*.f64 d c0) d)
(*.f64 d (*.f64 d c0))
(*.f64 c0 (*.f64 d d))
d
(*.f64 d c0)
(*.f64 c0 d)
(*.f64 (*.f64 D h) w)
(*.f64 (*.f64 h w) D)
(*.f64 D (*.f64 h w))
(*.f64 h (*.f64 D w))
(*.f64 h w)
(*.f64 w h)
h
D
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
(*.f64 (/.f64 (*.f64 c0 c0) (*.f64 D D)) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) h)))
(*.f64 (*.f64 c0 c0) (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
(*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 c0 c0))
(*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 D D)) (*.f64 (*.f64 w w) h))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0)) (neg.f64 (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
(/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))
(*.f64 (pow.f64 c0 #s(literal 1 binary64)) (pow.f64 c0 #s(literal 1 binary64)))
(*.f64 (neg.f64 c0) (neg.f64 c0))
(*.f64 (fabs.f64 c0) (fabs.f64 c0))
(*.f64 c0 c0)
(pow.f64 c0 #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 c0) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 c0) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 c0) #s(literal 2 binary64))))
(*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d (*.f64 w w)))
(*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
(/.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 D D) h)) (*.f64 w w))
(/.f64 (neg.f64 (*.f64 d d)) (neg.f64 (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))
(/.f64 (*.f64 d (/.f64 d (*.f64 D D))) (*.f64 (*.f64 w w) h))
(/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))
(*.f64 (pow.f64 d #s(literal 1 binary64)) (pow.f64 d #s(literal 1 binary64)))
(*.f64 (neg.f64 d) (neg.f64 d))
(*.f64 (fabs.f64 d) (fabs.f64 d))
(*.f64 d d)
(pow.f64 d #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 d) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 d) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 d) #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))
(*.f64 (*.f64 (*.f64 (*.f64 D w) D) h) w)
(*.f64 (*.f64 (*.f64 w w) h) (*.f64 D D))
(*.f64 (*.f64 w w) (*.f64 (*.f64 D D) h))
(*.f64 (*.f64 D D) (*.f64 (*.f64 w w) h))
(*.f64 (*.f64 D D) h)
(*.f64 D (*.f64 D h))
(*.f64 h (*.f64 D D))
(*.f64 (pow.f64 D #s(literal 1 binary64)) (pow.f64 D #s(literal 1 binary64)))
(*.f64 (neg.f64 D) (neg.f64 D))
(*.f64 (fabs.f64 D) (fabs.f64 D))
(*.f64 D D)
(pow.f64 D #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 D) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 D) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 D) #s(literal 2 binary64))))
(*.f64 (pow.f64 w #s(literal 1 binary64)) (pow.f64 w #s(literal 1 binary64)))
(*.f64 (neg.f64 w) (neg.f64 w))
(*.f64 (fabs.f64 w) (fabs.f64 w))
(*.f64 w w)
(pow.f64 w #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 w) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 w) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 w) #s(literal 2 binary64))))
(*.f64 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64))) (/.f64 c0 (+.f64 w w)))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64))))
(/.f64 (*.f64 c0 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64)))) (+.f64 w w))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 2 binary64) h) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D w) D)))
(*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d)) h) (*.f64 (*.f64 D w) D))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d))) (neg.f64 (*.f64 (*.f64 (*.f64 D w) D) h)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D h) w)) #s(literal 2 binary64))) (neg.f64 D))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D h) w)) #s(literal 2 binary64)) D)
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D w) D) h))
(fma.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) (*.f64 h w)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
(fma.f64 (*.f64 d (/.f64 d (*.f64 D D))) (/.f64 c0 (*.f64 h w)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
(fma.f64 (/.f64 c0 (*.f64 h w)) (*.f64 d (/.f64 d (*.f64 D D))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
(fma.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
(fma.f64 (*.f64 d c0) (/.f64 d (*.f64 (*.f64 (*.f64 D w) D) h)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
(fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
(+.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
(*.f64 (*.f64 (*.f64 D w) D) h)
(*.f64 (*.f64 (*.f64 D D) h) w)
(*.f64 (*.f64 D D) (*.f64 h w))
(*.f64 (*.f64 h w) (*.f64 D D))
(*.f64 (*.f64 (*.f64 D h) w) D)
(*.f64 D (*.f64 (*.f64 D h) w))
(*.f64 h (*.f64 (*.f64 D w) D))
(*.f64 w (*.f64 (*.f64 D D) h))
(*.f64 (*.f64 D w) D)
(*.f64 (*.f64 D D) w)
(*.f64 D (*.f64 D w))
(*.f64 w (*.f64 D D))
(*.f64 D w)
(*.f64 w D)
(*.f64 (fma.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))) (/.f64 c0 (+.f64 w w)))
(*.f64 (/.f64 c0 (+.f64 w w)) (fma.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))))
(/.f64 (*.f64 c0 (fma.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)))) (+.f64 w w))
(fma.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) (/.f64 c0 (+.f64 w w)) (*.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)) (/.f64 c0 (+.f64 w w))))
(fma.f64 (/.f64 c0 (+.f64 w w)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) (*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))))
(+.f64 (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) (/.f64 c0 (+.f64 w w))) (*.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)) (/.f64 c0 (+.f64 w w))))
(+.f64 (*.f64 (/.f64 c0 (+.f64 w w)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)) (*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64)) (*.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)))) (-.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 3 binary64)) (pow.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64)) (-.f64 (*.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))))))
(fma.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) (*.f64 h w)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)))
(fma.f64 (*.f64 d (/.f64 d (*.f64 D D))) (/.f64 c0 (*.f64 h w)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)))
(fma.f64 (/.f64 c0 (*.f64 h w)) (*.f64 d (/.f64 d (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)))
(fma.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)))
(fma.f64 (*.f64 d c0) (/.f64 d (*.f64 (*.f64 (*.f64 D w) D) h)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)))
(fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)))
(+.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)))
(+.f64 #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
(/.f64 (/.f64 c0 h) w)
(/.f64 (neg.f64 c0) (neg.f64 (*.f64 h w)))
(/.f64 (/.f64 c0 w) h)
(/.f64 c0 (*.f64 h w))
(*.f64 h w)
(*.f64 w h)
(*.f64 (/.f64 d D) (/.f64 d D))
(*.f64 d (/.f64 d (*.f64 D D)))
(/.f64 (/.f64 (*.f64 d d) D) D)
(/.f64 (neg.f64 (*.f64 d d)) (neg.f64 (*.f64 D D)))
(/.f64 (*.f64 d d) (*.f64 D D))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
(*.f64 (/.f64 c0 (*.f64 D D)) (/.f64 (*.f64 d d) (*.f64 h w)))
(*.f64 (*.f64 d (/.f64 d (*.f64 D D))) (/.f64 c0 (*.f64 h w)))
(*.f64 (/.f64 c0 (*.f64 h w)) (*.f64 d (/.f64 d (*.f64 D D))))
(*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)
(*.f64 (*.f64 d c0) (/.f64 d (*.f64 (*.f64 (*.f64 D w) D) h)))
(*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)))
(/.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 D D)) (*.f64 h w))
(/.f64 (*.f64 c0 (*.f64 d (/.f64 d (*.f64 D D)))) (*.f64 h w))
(/.f64 (*.f64 (/.f64 c0 (*.f64 h w)) (*.f64 d d)) (*.f64 D D))
(/.f64 (neg.f64 (*.f64 (*.f64 d d) c0)) (neg.f64 (*.f64 (*.f64 (*.f64 D w) D) h)))
(/.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 h w)) (*.f64 D D))
(/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D w) D) h))
(*.f64 (/.f64 d (*.f64 (*.f64 D h) w)) (/.f64 d D))
(*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))
(*.f64 (/.f64 d (*.f64 (*.f64 (*.f64 D w) D) h)) d)
(*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D w) D) h)))
(/.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 D D) h)) w)
(/.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 D h) w)) D)
(/.f64 (neg.f64 (*.f64 d d)) (neg.f64 (*.f64 (*.f64 (*.f64 D w) D) h)))
(/.f64 (*.f64 d (/.f64 d (*.f64 D D))) (*.f64 h w))
(/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))
(/.f64 (/.f64 d (*.f64 D D)) (*.f64 h w))
(/.f64 (/.f64 d (*.f64 (*.f64 D h) w)) D)
(/.f64 (neg.f64 d) (neg.f64 (*.f64 (*.f64 (*.f64 D w) D) h)))
(/.f64 d (*.f64 (*.f64 (*.f64 D w) D) h))
(*.f64 (*.f64 (*.f64 D w) D) h)
(*.f64 (*.f64 (*.f64 D D) h) w)
(*.f64 (*.f64 D D) (*.f64 h w))
(*.f64 (*.f64 h w) (*.f64 D D))
(*.f64 (*.f64 (*.f64 D h) w) D)
(*.f64 D (*.f64 (*.f64 D h) w))
(*.f64 h (*.f64 (*.f64 D w) D))
(*.f64 w (*.f64 (*.f64 D D) h))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal 1/4 binary64) (/.f64 #s(literal 0 binary64) w)) (*.f64 c0 c0)))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal 1/4 binary64) (/.f64 #s(literal 0 binary64) w)) (*.f64 c0 c0))
(*.f64 (*.f64 c0 c0) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal 1/4 binary64) (/.f64 #s(literal 0 binary64) w)))
(*.f64 c0 (*.f64 c0 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal 1/4 binary64) (/.f64 #s(literal 0 binary64) w))))
(fma.f64 (/.f64 #s(literal 0 binary64) w) (*.f64 c0 c0) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) (*.f64 c0 c0)))
(fma.f64 (*.f64 c0 c0) (/.f64 #s(literal 0 binary64) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0))))
(+.f64 (*.f64 (/.f64 #s(literal 0 binary64) w) (*.f64 c0 c0)) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) (*.f64 c0 c0)))
(+.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0))))
(/.f64 (-.f64 (*.f64 (/.f64 #s(literal 0 binary64) w) (/.f64 #s(literal 0 binary64) w)) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0)))) (-.f64 (/.f64 #s(literal 0 binary64) w) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0))))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 0 binary64) w) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal 3 binary64))) (fma.f64 (/.f64 #s(literal 0 binary64) w) (/.f64 #s(literal 0 binary64) w) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0))) (*.f64 (/.f64 #s(literal 0 binary64) w) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0))))))
(fma.f64 (/.f64 #s(literal 1/4 binary64) c0) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) (/.f64 #s(literal 0 binary64) w))
(fma.f64 (/.f64 #s(literal 0 binary64) w) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0)))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal 1/4 binary64) (/.f64 #s(literal 0 binary64) w))
(fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) (/.f64 #s(literal 0 binary64) w))
(fma.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) w) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0)))
(fma.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 0 binary64) w) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0)))
(-.f64 (/.f64 #s(literal 0 binary64) w) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/4 binary64)))
(+.f64 (/.f64 #s(literal 0 binary64) w) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0)))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) (/.f64 #s(literal 0 binary64) w))
#s(literal -1/2 binary64)
(*.f64 (/.f64 #s(literal 0 binary64) w) #s(literal -1/2 binary64))
(*.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) w))
(*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 0 binary64) w))
(/.f64 #s(literal 0 binary64) (neg.f64 w))
(/.f64 #s(literal 0 binary64) w)
(+.f64 (/.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))) w) (/.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) w))
#s(literal 0 binary64)
#s(literal 0 binary64)
(*.f64 (/.f64 d (*.f64 (*.f64 D h) w)) (/.f64 d D))
(*.f64 (/.f64 d (*.f64 (*.f64 D D) h)) (/.f64 d w))
(*.f64 (/.f64 d (*.f64 (*.f64 (*.f64 D w) D) h)) d)
(*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D w) D) h)))
(/.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 D D) h)) w)
(/.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 D h) w)) D)
(/.f64 (neg.f64 (*.f64 d d)) (neg.f64 (*.f64 (*.f64 (*.f64 D w) D) h)))
(/.f64 (*.f64 d (/.f64 d (*.f64 D D))) (*.f64 h w))
(/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))
(*.f64 (*.f64 (*.f64 D w) D) h)
(*.f64 (*.f64 (*.f64 D D) h) w)
(*.f64 (*.f64 D D) (*.f64 h w))
(*.f64 (*.f64 h w) (*.f64 D D))
(*.f64 (*.f64 (*.f64 D h) w) D)
(*.f64 D (*.f64 (*.f64 D h) w))
(*.f64 h (*.f64 (*.f64 D w) D))
(*.f64 w (*.f64 (*.f64 D D) h))
(*.f64 (/.f64 #s(literal 1/4 binary64) c0) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) c0)))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) c0) (*.f64 (*.f64 d d) c0))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h))) (neg.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h))
(*.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)))
#s(literal 1/4 binary64)
(*.f64 (*.f64 (*.f64 M M) (*.f64 D D)) h)
(*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D))
(*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))
(*.f64 D (*.f64 D (*.f64 (*.f64 M M) h)))
(*.f64 (*.f64 M M) h)
(*.f64 M (*.f64 M h))
(*.f64 h (*.f64 M M))
(*.f64 (pow.f64 M #s(literal 1 binary64)) (pow.f64 M #s(literal 1 binary64)))
(*.f64 (neg.f64 M) (neg.f64 M))
(*.f64 (fabs.f64 M) (fabs.f64 M))
(*.f64 M M)
(pow.f64 M #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 M) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 M) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 M) #s(literal 2 binary64))))
M
(*.f64 (pow.f64 (*.f64 d c0) #s(literal 1 binary64)) (pow.f64 (*.f64 d c0) #s(literal 1 binary64)))
(*.f64 (*.f64 c0 c0) (*.f64 d d))
(*.f64 (*.f64 (*.f64 d d) c0) c0)
(*.f64 (*.f64 d d) (*.f64 c0 c0))
(*.f64 c0 (*.f64 (*.f64 d d) c0))
(pow.f64 (*.f64 d c0) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 d c0)) #s(literal 2 binary64)))
(*.f64 (*.f64 d d) c0)
(*.f64 (*.f64 d c0) d)
(*.f64 d (*.f64 d c0))
(*.f64 c0 (*.f64 d d))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) c0))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (fma.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/4 binary64))) c0 (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/4 binary64))) c0 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) c0 (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (/ c0 (* 2 w)) (*.f64 (/.f64 c0 w) #s(literal 1/2 binary64)))
#s(approx c0 c0)
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 c0 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64))) c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))) c0 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* 2 (* d (* d c0))) (* h (* (* w D) D))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64)))
#s(approx (/ (* 2 (* d (* d c0))) (* (* h w) D)) (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D h) w)) #s(literal 2 binary64)))
#s(approx (* 2 (* d (* d c0))) (*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d)))
#s(approx (* d (* d c0)) (*.f64 (*.f64 d d) c0))
#s(approx (* d c0) (*.f64 d c0))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) c0))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (fma.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/4 binary64))) c0 (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/4 binary64))) c0 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) c0 (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (* (* c0 c0) (/ (* d d) (* (* (* D D) h) (* w w)))) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (* c0 c0) (*.f64 c0 c0))
#s(approx (/ (* 2 (* d (* d c0))) (* h (* (* w D) D))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) c0))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (fma.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/4 binary64))) c0 (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/4 binary64))) c0 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) c0 (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M) w) #s(literal 1/2 binary64))) c0))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 c0 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64))) c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))) c0 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ c0 (* w h)) (/.f64 c0 (*.f64 h w)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64))) (*.f64 c0 c0) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 c0 c0) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h))) (pow.f64 M #s(literal 5 binary64))) (pow.f64 D #s(literal 12 binary64))))) #s(literal 1/16 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 c0 c0) (*.f64 (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64))) (*.f64 c0 c0) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (* c0 (* d (/ d (* (* (* h w) D) D)))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
#s(approx (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d)))
#s(approx (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0)))
#s(approx (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0)))
#s(approx (* c0 (* c0 (* d d))) (*.f64 (*.f64 (*.f64 d d) c0) c0))
#s(approx (* d (* d c0)) (*.f64 (*.f64 d d) c0))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/4 binary64))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/16 binary64) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)))) (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))) (*.f64 c0 c0)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) #s(literal 2 binary64))) c0))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) #s(literal 2 binary64)))) c0))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/8 binary64) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) #s(literal 2 binary64))))) c0))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/4 binary64))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/16 binary64) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)))) (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/4 binary64))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/16 binary64) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)))) (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))) (*.f64 c0 c0)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) #s(literal 2 binary64))) c0))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) #s(literal 2 binary64)))) c0))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/8 binary64) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) #s(literal 2 binary64))))) c0))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))) c0))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)))) c0))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (fma.f64 (/.f64 d (*.f64 (*.f64 (*.f64 D w) D) h)) d (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64)))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0))))))) c0))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal 1/4 binary64) (/.f64 #s(literal 0 binary64) w)) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (+.f64 (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0))) (/.f64 #s(literal 0 binary64) w)) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (+.f64 (fma.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0)))) (/.f64 #s(literal 0 binary64) w)) (*.f64 c0 c0)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 #s(literal 0 binary64) c0)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)))) c0)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))))) c0)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (fma.f64 (/.f64 d (*.f64 (*.f64 (*.f64 D w) D) h)) d (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64)))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)))))))) c0)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal 1/4 binary64) (/.f64 #s(literal 0 binary64) w)) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (+.f64 (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0))) (/.f64 #s(literal 0 binary64) w)) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (+.f64 (fma.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0)))) (/.f64 #s(literal 0 binary64) w)) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal 1/4 binary64) (/.f64 #s(literal 0 binary64) w)) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (+.f64 (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0))) (/.f64 #s(literal 0 binary64) w)) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (+.f64 (fma.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 (*.f64 (*.f64 d d) c0) c0)))) (/.f64 #s(literal 0 binary64) w)) (*.f64 c0 c0)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 #s(literal 0 binary64) c0)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)))) c0)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))))) c0)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (fma.f64 (/.f64 d (*.f64 (*.f64 (*.f64 D w) D) h)) d (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64)))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)))))))) c0)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))) c0)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)))) c0)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) c0) c0)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) (fma.f64 (/.f64 d (*.f64 (*.f64 (*.f64 D w) D) h)) d (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64)))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0))))))) c0)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/32 binary64) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))))) (*.f64 w w) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (* 2 w) (+.f64 w w))
#s(approx w w)
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h)) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w)) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) w))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 w w) (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h)) #s(literal 2 binary64))) w))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) #s(literal -1/8 binary64))) (*.f64 w w) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 w w) (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h)) #s(literal 2 binary64))) w))
#s(approx (* (* h w) D) (*.f64 (*.f64 D h) w))
#s(approx (* h w) (*.f64 h w))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/32 binary64) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))))) (*.f64 w w) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (/ (* d d) (* (* (* D D) h) (* w w))) (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (* (* (* D D) h) (* w w)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))
#s(approx (* w w) (*.f64 w w))
#s(approx (* (* (* h w) D) D) (*.f64 (*.f64 (*.f64 D w) D) h))
#s(approx (* (* w D) D) (*.f64 (*.f64 D w) D))
#s(approx (* w D) (*.f64 D w))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/32 binary64) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))))) (*.f64 w w) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 w w) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 D D) h))) (*.f64 w w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h)) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w)) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) w))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 w w) (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h)) #s(literal 2 binary64))) w))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) #s(literal -1/8 binary64))) (*.f64 w w) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 w w) (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h)) #s(literal 2 binary64))) w))
#s(approx (* h w) (*.f64 h w))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w)) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h))) w))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 D D) h)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 w w))) w))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 w w)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) #s(literal -1/8 binary64))) (*.f64 w w) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 w w) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h))) w))
#s(approx (/ (* d d) (* (* (* D D) h) w)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)))
#s(approx (/ d (* (* (* h w) D) D)) (/.f64 d (*.f64 (*.f64 (*.f64 D w) D) h)))
#s(approx (* (* (* h w) D) D) (*.f64 (*.f64 (*.f64 D w) D) h))
#s(approx (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w) #s(literal 0 binary64))
#s(approx (* 0 (/ (* d d) (* (* (* D D) h) w))) #s(literal 0 binary64))
#s(approx (/ (* d d) (* (* (* D D) h) w)) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)))
#s(approx (* (* (* h w) D) D) (*.f64 (*.f64 (*.f64 D w) D) h))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))))) w))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)))))) w))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) #s(literal -1/16 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))))))) w))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))))) w))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)))))) w))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) #s(literal -1/16 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))))))) w))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))))) w))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)))))) w))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) #s(literal -1/16 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))))))) w))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (/.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) #s(literal -1/8 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (/.f64 (pow.f64 d #s(literal 12 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h))) (pow.f64 M #s(literal 5 binary64))) (pow.f64 D #s(literal 12 binary64))))) #s(literal 1/16 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) M) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 d d) c0) c0)) (*.f64 (*.f64 D D) h))) w))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) M) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 D D) h)) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 d d) (*.f64 d d)))) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 D D) (*.f64 D D))))) w))) w))) w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h)))) w))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/2 binary64))) w)) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h)))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) M) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 d d) c0) c0)) (*.f64 (*.f64 D D) h))) w))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) M) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 D D) h)) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 d d) (*.f64 d d)))) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 D D) (*.f64 D D))))) w))) w))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 M c0) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h))))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) M) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 d d) c0) c0)) (*.f64 (*.f64 D D) h))) w))) w)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) M) (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 D D) h)) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 d d) (*.f64 d d)))) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 D D) (*.f64 D D))))) w))) w))) w)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) w)) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h)))) w))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/2 binary64))) w)) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h)))) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h h)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) (*.f64 D D)))) h))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) (*.f64 D D))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 h h))) h))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (*.f64 w w)) (*.f64 h h)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 w w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64))) (*.f64 h h) (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 h h) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) (*.f64 D D)))) h))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D w) D)) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) w) (*.f64 M M)) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) h))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 h h)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) w) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 h h) (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D w) D)) #s(literal 2 binary64))) h))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) #s(literal -1/8 binary64))) (*.f64 h h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) w) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 h h) (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D w) D)) #s(literal 2 binary64))) h))
#s(approx h h)
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h h)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) (*.f64 D D)))) h))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) (*.f64 D D))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 h h))) h))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (*.f64 w w)) (*.f64 h h)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 w w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64))) (*.f64 h h) (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 h h) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) (*.f64 D D)))) h))
#s(approx (* (* D D) h) (*.f64 (*.f64 D D) h))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h h)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) (*.f64 D D)))) h))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) (*.f64 D D))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 h h))) h))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (*.f64 w w)) (*.f64 h h)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)))) #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 w w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64))) (*.f64 h h) (*.f64 (/.f64 (*.f64 (*.f64 M M) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64))) (*.f64 h h) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) (*.f64 D D)))) h))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D w) D)) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) w) (*.f64 M M)) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) h))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 h h)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) w) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 h h) (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D w) D)) #s(literal 2 binary64))) h))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) #s(literal -1/8 binary64))) (*.f64 h h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) w) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 h h) (*.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D w) D)) #s(literal 2 binary64))) h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) w) (*.f64 M M)) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D w) D))) h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 D w) D)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (*.f64 h h)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) w) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 h h))) h))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64)))) #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) #s(literal -1/8 binary64))) (*.f64 h h) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) w) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 h h) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D w) D))) h))
#s(approx (* 1/4 (* (* D D) (* (* M M) h))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)))
#s(approx (* (* D D) (* (* M M) h)) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)))
#s(approx (* (* M M) h) (*.f64 (*.f64 M M) h))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 M (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 h (*.f64 (*.f64 w w) w)) (sqrt.f64 #s(literal -1 binary64))) M) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) (*.f64 D D))) #s(literal -1/2 binary64))) h))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) (*.f64 D D))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 (*.f64 w w) w)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/16 binary64))) h))) h))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D w) D)))) h))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 w w) (*.f64 w w)) (*.f64 h h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/2 binary64))) h)) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D w) D)))) h))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 h (*.f64 (*.f64 w w) w)) (sqrt.f64 #s(literal -1 binary64))) M) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) (*.f64 D D))) #s(literal -1/2 binary64))) h))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) (*.f64 D D))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 (*.f64 w w) w)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/16 binary64))) h))) h))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 h (*.f64 (*.f64 w w) w)) (sqrt.f64 #s(literal -1 binary64))) M) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) (*.f64 D D))) #s(literal -1/2 binary64))) h))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) (*.f64 D D))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 (*.f64 w w) w)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (pow.f64 w #s(literal 5 binary64)) (*.f64 h h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/16 binary64))) h))) h))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M h) (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D w) D)))) h))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (sqrt.f64 #s(literal -1 binary64)) M (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 w w) (*.f64 w w)) (*.f64 h h)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 w w)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/2 binary64))) h)) (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D w) D)))) h))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 D D) (*.f64 D D))) (*.f64 d d)) #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) h))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 D D) (*.f64 D D))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) h))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0))))) #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) h))) (*.f64 D D)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 h w)) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 D D) (*.f64 D D))) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 D D)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 D D) (*.f64 D D))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) c0))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d)) (*.f64 h w))) (*.f64 D D)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (/.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0)))) #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))) #s(literal -1/16 binary64))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) c0))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d)) (*.f64 h w))) (*.f64 D D)))
#s(approx D D)
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 D D) (*.f64 D D))) (*.f64 d d)) #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) h))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 D D) (*.f64 D D))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) h))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0))))) #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) h))) (*.f64 D D)))
#s(approx (* D D) (*.f64 D D))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 D D) (*.f64 D D))) (*.f64 d d)) #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) h))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 D D) (*.f64 D D))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) h))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0))))) #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 M M) h)) (*.f64 d d))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 w w) h))) (*.f64 D D)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 h w)) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 D D) (*.f64 D D))) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 D D)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 D D) (*.f64 D D))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) c0))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d)) (*.f64 h w))) (*.f64 D D)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (/.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0)))) #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))) #s(literal -1/16 binary64))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) c0))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d)) (*.f64 h w))) (*.f64 D D)))
#s(approx (/ (* d d) (* D D)) (*.f64 d (/.f64 d (*.f64 D D))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 D D) (*.f64 D D))) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 h w))) (*.f64 D D)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (*.f64 (*.f64 D D) (*.f64 D D))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) c0))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 h w))) (*.f64 D D)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 M M)) (/.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0)))) #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))) #s(literal -1/16 binary64))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 M M) h) w)) (*.f64 (*.f64 d d) c0))) (*.f64 (*.f64 D D) (*.f64 D D)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 h w))) (*.f64 D D)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/4 binary64))) (*.f64 d d) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (fma.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/2 binary64) (/.f64 c0 (*.f64 (*.f64 (*.f64 D w) D) h))) (*.f64 d d) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 d c0) #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 D w) D) h))) (*.f64 d d) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx d d)
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/4 binary64))) (*.f64 d d) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (* d d) (*.f64 d d))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/4 binary64))) (*.f64 d d) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 c0 c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (fma.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/2 binary64) (/.f64 c0 (*.f64 (*.f64 (*.f64 D w) D) h))) (*.f64 d d) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 d c0) #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 d d) (/.f64 c0 (*.f64 (*.f64 (*.f64 D w) D) h))) (*.f64 d d) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (fma.f64 (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 d c0) #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (fma.f64 (fma.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h))) (pow.f64 M #s(literal 5 binary64))) (pow.f64 D #s(literal 12 binary64))))) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/8 binary64))) (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) (*.f64 d d))) #s(literal -1/4 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) (*.f64 d d))) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 c0 c0))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) (*.f64 d d))) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 c0 c0))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 12 binary64))))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))) (*.f64 d d)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0)) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D w) D) h))) (*.f64 d d)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 c0 c0) c0))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D w) D) h)))) (*.f64 d d)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 c0 c0) c0))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 12 binary64)))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D w) D) h))))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) (*.f64 d d))) #s(literal -1/4 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) (*.f64 d d))) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 c0 c0))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) (*.f64 d d))) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 c0 c0))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 12 binary64))))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) (*.f64 d d))) #s(literal -1/4 binary64) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) (*.f64 d d))) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 c0 c0))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 (*.f64 d d) (*.f64 d d))) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 (*.f64 M M) (*.f64 M M))) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 c0 c0))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 D #s(literal 10 binary64)) (/.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 12 binary64))))) (/.f64 (*.f64 c0 c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))) (*.f64 d d)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0)) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D w) D) h))) (*.f64 d d)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 c0 c0) c0))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D w) D) h)))) (*.f64 d d)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 c0 c0) c0))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 12 binary64)))) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 D w) D) h))))) (*.f64 d d)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0)) #s(literal -1/2 binary64) (/.f64 c0 (*.f64 (*.f64 (*.f64 D w) D) h))) (*.f64 d d)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (*.f64 d d) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0)) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 c0 c0) c0))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D w) D) h))))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0)) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 w w) w)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 8 binary64)) (*.f64 (*.f64 c0 c0) c0))) #s(literal -1/8 binary64) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 10 binary64))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 12 binary64)))) (/.f64 c0 (*.f64 (*.f64 (*.f64 D w) D) h))))) (*.f64 d d)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 M M)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d))) (*.f64 M M) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 M M)) (pow.f64 D #s(literal 10 binary64)))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0))))) (*.f64 M M) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d))) (*.f64 M M) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 d d) c0))) #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)) (*.f64 M M)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 D w) D) h) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 M M))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0)))) #s(literal -1/8 binary64) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 M M)) (pow.f64 D #s(literal 10 binary64)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))) (*.f64 M M) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 D w) D) h) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 M M) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 M M)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d))) (*.f64 M M) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 M M)) (pow.f64 D #s(literal 10 binary64)))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0))))) (*.f64 M M) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d))) (*.f64 M M) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w)) (*.f64 M M)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d))) (*.f64 M M) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 w w))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 c0 c0))) #s(literal -1/16 binary64) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 M M)) (pow.f64 D #s(literal 10 binary64)))) (*.f64 (pow.f64 d #s(literal 10 binary64)) (*.f64 (*.f64 c0 c0) (*.f64 c0 c0))))) (*.f64 M M) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 D D) h)) (*.f64 d d))) (*.f64 M M) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 d d) c0))) #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)) (*.f64 M M)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 D w) D) h) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 M M))))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0)))) #s(literal -1/8 binary64) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 M M)) (pow.f64 D #s(literal 10 binary64)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))) (*.f64 M M) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 D w) D) h) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 M M) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 d d) c0))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)) (*.f64 M M)) (pow.f64 D #s(literal 6 binary64))) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 D w) D) h) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 M M))))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (pow.f64 D #s(literal 6 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 w w) w)) (*.f64 (pow.f64 d #s(literal 6 binary64)) (*.f64 (*.f64 c0 c0) c0)))) #s(literal -1/8 binary64) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (pow.f64 (*.f64 h w) #s(literal 5 binary64)) (*.f64 M M)) (pow.f64 D #s(literal 10 binary64)))) (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 10 binary64))))) (*.f64 M M) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 D w) D) h) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) (*.f64 M M) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)))
#s(approx (* M M) (*.f64 M M))
#s(approx M M)
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))))) M))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64))) M))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64)))) M))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))))) M))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64))) M))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64)))) M))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))))) M))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64))) M))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 c0 (/.f64 (sqrt.f64 #s(literal -1 binary64)) w) (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h)))) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/4 binary64)))) M))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (+.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w))))) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 12 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 12 binary64)))))) (sqrt.f64 #s(literal -1 binary64))) M))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal -1/2 binary64)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) #s(literal 1/2 binary64))) M)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 d d) c0) c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) M))) M)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/16 binary64))) M))) M))) M)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)) M)) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0 (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 h h))) (*.f64 (*.f64 (*.f64 w w) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))) (pow.f64 D #s(literal 8 binary64)))) #s(literal -1/8 binary64))) M))) M)) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal -1/2 binary64)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) #s(literal 1/2 binary64))) M)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 d d) c0) c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) M))) M)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/16 binary64))) M))) M))) M)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) M) w) #s(literal -1/2 binary64)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 (*.f64 w w) h))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) #s(literal 1/2 binary64))) M)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 M (*.f64 h h)) (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal -1/4 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 d d) c0) c0)) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) M))) M)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) c0) w) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))) #s(literal 1/2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) (*.f64 D D)) (*.f64 (*.f64 (*.f64 (*.f64 w w) w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 c0 #s(literal 5 binary64)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 M M)) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (pow.f64 w #s(literal 5 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/16 binary64))) M))) M))) M)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) M) (*.f64 h w)))) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) M) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0)) M)) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0 (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 (*.f64 d d) (*.f64 d d)) (*.f64 (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) (*.f64 (*.f64 D D) (*.f64 D D))))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 h h) (*.f64 h h))) (*.f64 (*.f64 (*.f64 w w) (*.f64 w w)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))) (pow.f64 D #s(literal 8 binary64)))) #s(literal -1/8 binary64))) M))) M)) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64))) M)))
#s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 c0 c0) (*.f64 c0 c0)) (pow.f64 d #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 D #s(literal 8 binary64)) (*.f64 (*.f64 M M) (*.f64 M M))) (*.f64 (*.f64 (*.f64 (*.f64 h h) (*.f64 h h)) (*.f64 (*.f64 w w) (*.f64 w w))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 (*.f64 d d) (*.f64 d d))) (*.f64 (*.f64 (*.f64 M M) (*.f64 (*.f64 (*.f64 w w) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 (*.f64 D D) (*.f64 D D)))) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (*.f64 (*.f64 c0 c0) c0) (*.f64 (*.f64 c0 c0) c0)) (pow.f64 d #s(literal 12 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) (*.f64 (*.f64 (*.f64 w w) w) (*.f64 (*.f64 w w) w))) (*.f64 (*.f64 (*.f64 h h) h) (*.f64 (*.f64 h h) h))) (*.f64 (*.f64 (*.f64 M M) M) (*.f64 (*.f64 M M) M))) (pow.f64 D #s(literal 12 binary64)))))) (sqrt.f64 #s(literal -1 binary64))) M)))

eval52.0ms (0.6%)

Memory
24.6MiB live, 120.2MiB allocated; 14ms collecting garbage
Compiler

Compiled 11 064 to 2 779 computations (74.9% saved)

prune68.0ms (0.8%)

Memory
-29.1MiB live, 210.7MiB allocated; 11ms collecting garbage
Pruning

35 alts after pruning (34 fresh and 1 done)

PrunedKeptTotal
New49726523
Fresh26834
Picked505
Done112
Total52935564
Accuracy
79.0%
Counts
564 → 35
Alt Table
Click to see full alt table
StatusAccuracyProgram
25.6%
(/.f64 (fma.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0 (*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))) c0)) (+.f64 w w))
25.7%
(/.f64 (*.f64 c0 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))) (+.f64 w w))
37.7%
(/.f64 (*.f64 c0 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D)))) (+.f64 w w))
30.1%
(/.f64 (*.f64 c0 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64)))) (+.f64 w w))
22.7%
(/.f64 (*.f64 c0 #s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w)))) h))) (+.f64 w w))
30.1%
(/.f64 (*.f64 c0 #s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))) (+.f64 w w))
24.4%
(/.f64 #s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) (+.f64 w w))
29.7%
(*.f64 (/.f64 c0 (+.f64 w w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))))))
40.8%
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h w) D)) D)))
37.9%
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
29.7%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 (/.f64 c0 w) h) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))))))
38.0%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (*.f64 (/.f64 d D) (/.f64 d D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))))))
36.1%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (*.f64 d (/.f64 d (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))))))
28.9%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 h w)) (*.f64 d (/.f64 d (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))))
33.7%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (/.f64 c0 D) (/.f64 (*.f64 d d) (*.f64 h w)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D h) w))) D)))
34.2%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 D h) w)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D h) w))) D)))
37.7%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d)) (*.f64 h w)) D) D)))
32.8%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d)) h) (*.f64 (*.f64 D w) D))))
37.2%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 D h) w) D))))
32.9%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (/.f64 #s(literal 2 binary64) h) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D w) D)))))
28.2%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 #s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) c0)))
23.6%
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 #s(literal 0 binary64) c0))))
26.1%
(*.f64 c0 (/.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))) (+.f64 w w)))
26.9%
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
20.7%
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
3.4%
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 M M) (*.f64 D D)) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
3.3%
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 M (*.f64 M h)))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
16.2%
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) #s(approx (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w) #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
28.7%
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d (/.f64 d (*.f64 D D))) (*.f64 (*.f64 w w) h))))
26.2%
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 (*.f64 D w) D) h) w))))
23.2%
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w w) h) (*.f64 D D)))))
22.5%
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 D (*.f64 D h)) (*.f64 w w)))))
28.6%
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
26.0%
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
36.8%
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(approx (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d))))
Compiler

Compiled 3 220 to 1 629 computations (49.4% saved)

regimes260.0ms (3.2%)

Memory
30.2MiB live, 458.8MiB allocated; 59ms collecting garbage
Counts
91 → 2
Calls
Call 1
Inputs
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 #s(literal 0 binary64) c0))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))) (+.f64 w w))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(approx (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 D (*.f64 D h)) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w w) h) (*.f64 D D)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 (*.f64 D w) D) h) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d (/.f64 d (*.f64 D D))) (*.f64 (*.f64 w w) h))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
(/.f64 (*.f64 c0 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64)))) (+.f64 w w))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 h (*.f64 w D)) D))))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))
(/.f64 #s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) (+.f64 w w))
(/.f64 #s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) (+.f64 w w))
(/.f64 (*.f64 c0 #s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))) (+.f64 w w))
(/.f64 (*.f64 c0 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D)))) (+.f64 w w))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))) (+.f64 w w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) w) #s(literal -1/2 binary64)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 #s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) c0)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) #s(approx (* (* (* h w) D) D) (*.f64 (*.f64 (*.f64 D D) h) w)))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 h (*.f64 (*.f64 w D) D)))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 D h) w) D))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 h (*.f64 w D)) D))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h w) D)) D)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (/.f64 #s(literal 2 binary64) h) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D w) D)))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 h w) D)) (/.f64 (*.f64 (*.f64 d d) c0) D))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h w) D)) D)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d)) h) (*.f64 (*.f64 D w) D))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 h w) D)) D)))
(/.f64 (*.f64 c0 #s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (neg.f64 (*.f64 c0 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))) (+.f64 w w))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 d d)) (*.f64 h w)) D) D)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) w))) (*.f64 c0 (*.f64 d d))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) #s(approx (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w) #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 #s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))) c0)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 D h) w)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D h) w))) D)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (/.f64 c0 D) (/.f64 (*.f64 d d) (*.f64 h w)) (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D h) w))) D)))
(*.f64 (/.f64 c0 (+.f64 w w)) (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w h) D) D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(*.f64 (/.f64 c0 (+.f64 w w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))))))
(*.f64 (/.f64 c0 (+.f64 w w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 h w)) (*.f64 d (/.f64 d (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (*.f64 d (/.f64 d (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (*.f64 d (/.f64 d (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(/.f64 (*.f64 c0 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(approx (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))) (neg.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))))) (+.f64 w w))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (*.f64 (/.f64 d D) (/.f64 d D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (*.f64 (/.f64 d D) (/.f64 d D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 (/.f64 d (*.f64 (*.f64 h w) D)) (/.f64 d D))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 (/.f64 c0 w) h) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D)))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 (/.f64 c0 w) h) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (*.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 w h)) (/.f64 (*.f64 d d) (*.f64 D D)) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) #s(approx (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))) (neg.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 M M) (*.f64 h h)) (*.f64 D D)) (*.f64 d d)) #s(literal -1/4 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 w w) (*.f64 D D))))) h))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) w) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 M M) h) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal 1/4 binary64))) (*.f64 c0 c0)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 M (*.f64 M h)))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) h))) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))) w) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 M M) (*.f64 D D)) h)) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))))
(/.f64 #s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 d d)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 (*.f64 D D) h))) w)) (+.f64 w w))
(/.f64 #s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w))) (*.f64 d d)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 c0 (*.f64 d d)))) (*.f64 (*.f64 D D) h))) w)) (+.f64 w w))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))) c0)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 D (*.f64 D (*.f64 (*.f64 (*.f64 M M) h) (/.f64 w (*.f64 c0 (*.f64 c0 (*.f64 d d))))))) #s(literal -1/2 binary64) (*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))) c0)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) (/.f64 (*.f64 h w) (*.f64 c0 (*.f64 c0 (*.f64 d d)))))) #s(literal -1/2 binary64) (*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))) c0)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64))) c0)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) #s(literal 2 binary64))) c0)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) #s(approx (* (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) c0) (*.f64 h (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 D D) (*.f64 (*.f64 M M) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) (*.f64 (*.f64 h h) w)))))))))
(/.f64 (*.f64 c0 #s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 D D) (*.f64 M M)) (*.f64 (*.f64 h h) w)) (*.f64 c0 (*.f64 d d))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 D D) w)))) h))) (+.f64 w w))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (*.f64 (*.f64 D D) (/.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 (*.f64 c0 c0) (*.f64 d d)))) #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 d (*.f64 (*.f64 h w) D)) (/.f64 d D)) #s(literal 2 binary64))) c0)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) h)) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) (*.f64 w w)) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) w)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 D D) w)) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) w) (*.f64 M M)) (*.f64 D D)) (*.f64 (*.f64 d d) c0)) #s(literal -1/2 binary64))) h)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 M M) h) w) (*.f64 D D)) (*.f64 (*.f64 (*.f64 d d) (*.f64 d d)) c0)) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) c0) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 d d))))
(*.f64 c0 (/.f64 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))) (+.f64 w w)))
(/.f64 (*.f64 c0 (fma.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))))) (+.f64 w w))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (fma.f64 (/.f64 c0 (*.f64 h w)) (/.f64 (*.f64 d d) (*.f64 D D)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))
(/.f64 (fma.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) c0 (*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M))) c0)) (+.f64 w w))
(*.f64 (/.f64 c0 (+.f64 w w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 (*.f64 D D) h) w)) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 (*.f64 c0 d) d) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
(fma.f64 (/.f64 c0 (+.f64 w w)) (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) (*.f64 (/.f64 c0 (+.f64 w w)) (sqrt.f64 (-.f64 (pow.f64 (*.f64 c0 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D))) #s(literal 2 binary64)) (*.f64 M M)))))
Outputs
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 h w) D)) D)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(approx (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d))))
Calls

10 calls:

52.0ms
c0
25.0ms
d
24.0ms
M
24.0ms
w
23.0ms
h
Results
AccuracySegmentsBranch
51.2%5(*.f64 M M)
47.4%3(*.f64 D D)
40.8%1(*.f64 d d)
58.7%2(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
44.1%3c0
46.2%2w
43.9%2h
50.9%5D
44.4%3d
53.5%6M
Compiler

Compiled 45 to 78 computations (-73.3% saved)

regimes10.0ms (0.1%)

Memory
-29.0MiB live, 21.5MiB allocated; 2ms collecting garbage
Counts
31 → 2
Calls
Call 1
Inputs
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 #s(literal 0 binary64) c0))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))) (+.f64 w w))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(approx (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 D (*.f64 D h)) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w w) h) (*.f64 D D)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 (*.f64 D w) D) h) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d (/.f64 d (*.f64 D D))) (*.f64 (*.f64 w w) h))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
(/.f64 (*.f64 c0 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64)))) (+.f64 w w))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 h (*.f64 w D)) D))))
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 (*.f64 h w) D) D))))
(/.f64 #s(approx (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) (+.f64 w w))
(/.f64 #s(approx (* c0 (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w))))) (+.f64 w w))
(/.f64 (*.f64 c0 #s(approx (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 c0 (*.f64 d d))) (*.f64 (*.f64 (*.f64 D D) h) w)))) (+.f64 w w))
(/.f64 (*.f64 c0 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D)))) (+.f64 w w))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 d d)) c0) (*.f64 (*.f64 (*.f64 h w) D) D)))) (+.f64 w w))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 h w) D) D)))) w) #s(literal -1/2 binary64)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 #s(approx (+ (* (* (* D D) (/ (* (* (* M M) h) w) (* (* c0 c0) (* d d)))) -1/2) (* (/ (* d d) (* (* (* h w) D) D)) 2)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) w)))) c0)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) #s(approx (* (* (* h w) D) D) (*.f64 (*.f64 (*.f64 D D) h) w)))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 h (*.f64 (*.f64 w D) D)))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 D h) w) D))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 h (*.f64 w D)) D))))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 d d) c0)) (*.f64 (*.f64 (*.f64 h w) D) D))))
Outputs
(*.f64 (/.f64 c0 (+.f64 w w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 d (*.f64 d c0))) (*.f64 (*.f64 (*.f64 h w) D) D))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(approx (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d))))
Calls

1 calls:

8.0ms
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Results
AccuracySegmentsBranch
58.7%2(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Compiler

Compiled 33 to 21 computations (36.4% saved)

regimes5.0ms (0.1%)

Memory
11.9MiB live, 11.9MiB allocated; 0ms collecting garbage
Counts
15 → 2
Calls
Call 1
Inputs
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 #s(literal 0 binary64) c0))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))) (+.f64 w w))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(approx (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 D (*.f64 D h)) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w w) h) (*.f64 D D)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 (*.f64 D w) D) h) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d (/.f64 d (*.f64 D D))) (*.f64 (*.f64 w w) h))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
(/.f64 (*.f64 c0 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64)))) (+.f64 w w))
Outputs
(/.f64 (*.f64 c0 #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (*.f64 (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D w) D) h)) c0) #s(literal 2 binary64)))) (+.f64 w w))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(approx (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d))))
Calls

1 calls:

4.0ms
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Results
AccuracySegmentsBranch
53.9%2(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Compiler

Compiled 33 to 21 computations (36.4% saved)

regimes4.0ms (0.1%)

Memory
10.5MiB live, 10.5MiB allocated; 0ms collecting garbage
Counts
14 → 2
Calls
Call 1
Inputs
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 #s(literal 0 binary64) c0))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))) (+.f64 w w))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(approx (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 D (*.f64 D h)) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w w) h) (*.f64 D D)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 (*.f64 D w) D) h) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d (/.f64 d (*.f64 D D))) (*.f64 (*.f64 w w) h))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
Outputs
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 d d) c0) c0) (*.f64 D D)) (*.f64 (*.f64 w w) h)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(approx (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d))))
Calls

1 calls:

3.0ms
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Results
AccuracySegmentsBranch
52.2%2(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Compiler

Compiled 33 to 21 computations (36.4% saved)

regimes4.0ms (0.1%)

Memory
9.9MiB live, 9.9MiB allocated; 0ms collecting garbage
Counts
13 → 2
Calls
Call 1
Inputs
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 #s(literal 0 binary64) c0))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))) (+.f64 w w))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(approx (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 D (*.f64 D h)) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w w) h) (*.f64 D D)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 (*.f64 D w) D) h) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d (/.f64 d (*.f64 D D))) (*.f64 (*.f64 w w) h))))
Outputs
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 (*.f64 D w) D) h) w))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(approx (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d))))
Calls

1 calls:

3.0ms
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Results
AccuracySegmentsBranch
51.3%2(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Compiler

Compiled 33 to 21 computations (36.4% saved)

regimes4.0ms (0.1%)

Memory
-38.3MiB live, 9.1MiB allocated; 1ms collecting garbage
Counts
11 → 2
Calls
Call 1
Inputs
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 #s(literal 0 binary64) c0))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))) (+.f64 w w))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(approx (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (*.f64 d (/.f64 d (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w))))))
#s(approx (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 D (*.f64 D h)) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (*.f64 c0 c0) (/.f64 (*.f64 d d) (*.f64 (*.f64 (*.f64 w w) h) (*.f64 D D)))))
Outputs
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 c0 (/.f64 (*.f64 (*.f64 d d) c0) (*.f64 (*.f64 (*.f64 D D) h) (*.f64 w w)))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(approx (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d))))
Calls

1 calls:

3.0ms
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Results
AccuracySegmentsBranch
51.1%2(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Compiler

Compiled 33 to 21 computations (36.4% saved)

regimes21.0ms (0.3%)

Memory
3.2MiB live, 50.7MiB allocated; 1ms collecting garbage
Counts
5 → 2
Calls
Call 1
Inputs
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 #s(literal 0 binary64) c0))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))) (+.f64 w w))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(approx (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d))))
Outputs
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) #s(approx (* (* c0 c0) (+ (* -1/2 (/ (* 0 (/ (* d d) (* (* (* D D) h) w))) w)) (/ (* 1/4 (* (* D D) (* (* M M) h))) (* c0 (* c0 (* d d)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 D D)) (*.f64 (*.f64 M M) h)) (*.f64 d d))))
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
Calls

10 calls:

3.0ms
d
2.0ms
h
2.0ms
M
2.0ms
D
2.0ms
c0
Results
AccuracySegmentsBranch
36.8%1(*.f64 d d)
36.8%1c0
36.8%1d
36.8%1h
38.5%2(*.f64 D D)
38.5%2D
36.8%1w
36.8%1(*.f64 M M)
36.8%1M
36.8%1(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Compiler

Compiled 45 to 78 computations (-73.3% saved)

regimes20.0ms (0.2%)

Memory
8.1MiB live, 51.8MiB allocated; 2ms collecting garbage
Counts
4 → 1
Calls
Call 1
Inputs
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 #s(literal 0 binary64) c0))))
(/.f64 (*.f64 c0 #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M))) (+.f64 w w))
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) M)))
Outputs
(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) #s(approx (+ (* (/ c0 (* w h)) (/ (* d d) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M)))) (neg.f64 (*.f64 #s(literal 0 binary64) c0))))
Calls

10 calls:

4.0ms
h
2.0ms
D
2.0ms
d
2.0ms
M
2.0ms
w
Results
AccuracySegmentsBranch
23.6%1w
23.6%1c0
23.6%1h
23.6%1(*.f64 d d)
23.6%1d
23.6%1(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
23.6%1(*.f64 M M)
23.6%1M
23.6%1(*.f64 D D)
23.6%1D
Compiler

Compiled 45 to 78 computations (-73.3% saved)

regimes21.0ms (0.3%)

Memory
-5.7MiB live, 37.8MiB allocated; 12ms collecting garbage
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
Outputs
#s(approx (/ (* c0 (+ (* c0 (/ (* d d) (* (* (* h w) D) D))) (sqrt (- (pow (* c0 (/ (* d d) (* (* (* h w) D) D))) 2) (* M M))))) (+ w w)) (*.f64 (/.f64 (*.f64 (*.f64 c0 c0) #s(literal 0 binary64)) w) #s(literal -1/2 binary64)))
Calls

10 calls:

11.0ms
w
1.0ms
d
1.0ms
c0
1.0ms
D
1.0ms
h
Results
AccuracySegmentsBranch
20.7%1w
20.7%1(*.f64 d d)
20.7%1c0
20.7%1d
20.7%1(*.f64 D D)
20.7%1D
20.7%1(*.f64 M M)
20.7%1h
20.7%1M
20.7%1(*.f64 (/.f64 c0 (*.f64 #s(literal 2 binary64) w)) (+.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (sqrt.f64 (-.f64 (*.f64 (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D))) (/.f64 (*.f64 c0 (*.f64 d d)) (*.f64 (*.f64 w h) (*.f64 D D)))) (*.f64 M M)))))
Compiler

Compiled 45 to 78 computations (-73.3% saved)

bsearch2.0ms (0%)

Memory
4.3MiB live, 4.3MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
Compiler

Compiled 36 to 30 computations (16.7% saved)

bsearch1.0ms (0%)

Memory
1.7MiB live, 1.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
Compiler

Compiled 36 to 30 computations (16.7% saved)

bsearch0.0ms (0%)

Memory
1.3MiB live, 1.3MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
Compiler

Compiled 36 to 30 computations (16.7% saved)

bsearch0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
Compiler

Compiled 36 to 30 computations (16.7% saved)

bsearch0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
Compiler

Compiled 36 to 30 computations (16.7% saved)

bsearch0.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
Compiler

Compiled 36 to 30 computations (16.7% saved)

bsearch870.0ms (10.6%)

Memory
-158.8MiB live, 135.4MiB allocated; 1.2s collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
865.0ms
6.2796112030756946e+147
1.1245453238718057e+149
Samples
745.0ms22×2valid
44.0ms106×0invalid
5.0ms56×0valid
4.0ms14×3valid
3.0ms20×1valid
Compiler

Compiled 713 to 590 computations (17.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 779.0ms
ival-mult!: 769.0ms (98.7% of total)
adjust: 3.0ms (0.4% of total)
ival-sqrt: 3.0ms (0.4% of total)
ival-div!: 3.0ms (0.4% of total)
ival-sub!: 1.0ms (0.1% of total)
ival-add!: 1.0ms (0.1% of total)

derivations331.0ms (4%)

Memory
24.1MiB live, 309.5MiB allocated; 48ms collecting garbage
Stop Event
fuel
Compiler

Compiled 308 to 135 computations (56.2% saved)

preprocess108.0ms (1.3%)

Memory
-12.6MiB live, 223.3MiB allocated; 11ms collecting garbage
Remove

(abs M)

(abs d)

(abs D)

Compiler

Compiled 5 861 to 3 780 computations (35.5% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated; 0ms collecting garbage

Profiling

Loading profile data...