| 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)))))))))))))) |