Beckmann Distribution sample, tan2theta, alphax != alphay, u1 <= 0.5

Time bar (total: 5.6s)

start0.0ms (0%)

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

analyze326.0ms (5.8%)

Memory
11.7MiB live, 439.9MiB allocated; 33ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%0%100%0%0%0%0
0%0%0%100%0%0%0%1
0%0%0%100%0%0%0%2
0%0%0%100%0%0%0%3
0%0%0%100%0%0%0%4
0%0%0%100%0%0%0%5
0%0%0%100%0%0%0%6
0%0%0%100%0%0%0%7
0%0%0%100%0%0%0%8
21.1%0%0%100%0%0%0%9
24.6%0%0%100%0%0%0%10
26.4%0%0%100%0%0%0%11
30.8%0%0%100%0%0%0%12
Compiler

Compiled 53 to 36 computations (32.1% saved)

sample1.3s (22.5%)

Memory
25.7MiB live, 1 572.0MiB allocated; 202ms collecting garbage
Samples
504.0ms5 856×0valid
461.0ms2 399×1valid
0.0ms2valid
Precisions
Click to see histograms. Total time spent on operations: 626.0ms
ival-log: 171.0ms (27.3% of total)
ival-div!: 152.0ms (24.3% of total)
ival-mult!: 86.0ms (13.7% of total)
adjust: 67.0ms (10.7% of total)
ival-neg: 49.0ms (7.8% of total)
ival-sub!: 40.0ms (6.4% of total)
ival-<=: 22.0ms (3.5% of total)
ival-add!: 21.0ms (3.4% of total)
ival-and: 16.0ms (2.6% of total)
ival-assert: 2.0ms (0.3% of total)
Bogosity

preprocess40.0ms (0.7%)

Memory
-9.3MiB live, 44.8MiB allocated; 8ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
090366
1349356
22540356
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
63.7%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
Symmetry

(abs alphax)

(abs alphay)

Compiler

Compiled 30 to 30 computations (0% saved)

series34.0ms (0.6%)

Memory
0.4MiB live, 47.5MiB allocated; 3ms collecting garbage
Counts
15 → 89
Calls
Call 1
Inputs
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
(log.f32 (-.f32 #s(literal 1 binary32) u0))
(-.f32 #s(literal 1 binary32) u0)
#s(literal 1 binary32)
u0
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
(/.f32 cos2phi (*.f32 alphax alphax))
cos2phi
(*.f32 alphax alphax)
alphax
(/.f32 sin2phi (*.f32 alphay alphay))
sin2phi
(*.f32 alphay alphay)
alphay
Outputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (/ (* (pow alphax 2) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (* (pow alphax 2) (+ (* -1 (/ (* (pow alphax 2) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* sin2phi (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (* (pow alphax 2) (+ (* (pow alphax 2) (+ (* -1 (/ (* (pow sin2phi 2) (log (- 1 u0))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 2) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))) (/ (* sin2phi (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (/ cos2phi (* alphax alphax)) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (* alphax alphax) #s(hole binary32 (pow alphax 2)))
#s(approx alphax #s(hole binary32 alphax))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (+ (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2))) (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (/ (* (pow alphay 2) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (* (pow alphay 2) (+ (* -1 (/ (* (pow alphay 2) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* cos2phi (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (* (pow alphay 2) (+ (* (pow alphay 2) (+ (* -1 (/ (* (pow cos2phi 2) (log (- 1 u0))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 2) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))) (/ (* cos2phi (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (/ sin2phi (* alphay alphay)) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (* alphay alphay) #s(hole binary32 (pow alphay 2)))
#s(approx alphay #s(hole binary32 alphay))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (+ (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2))) (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 u0))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* 1/3 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))))))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* -1 u0)))
#s(approx (log (- 1 u0)) #s(hole binary32 (* u0 (- (* -1/2 u0) 1))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* u0 (- (* u0 (- (* u0 (- (* -1/4 u0) 1/3)) 1/2)) 1))))
#s(approx (- 1 u0) #s(hole binary32 1))
#s(approx (- 1 u0) #s(hole binary32 (+ 1 (* -1 u0))))
#s(approx u0 #s(hole binary32 u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/3 (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* -1 (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (/ 1 u0) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (/ 1 u0)) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (+ (/ 1 u0) (* 1/3 (/ 1 (pow u0 3))))) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (log -1) (* -1 (log (/ 1 u0))))))
#s(approx (log (- 1 u0)) #s(hole binary32 (- (+ (log -1) (* -1 (log (/ 1 u0)))) (/ 1 u0))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (log -1) (+ (* -1 (log (/ 1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0))))))
#s(approx (log (- 1 u0)) #s(hole binary32 (- (+ (log -1) (+ (* -1 (log (/ 1 u0))) (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) (pow u0 2))))) (/ 1 u0))))
#s(approx (- 1 u0) #s(hole binary32 (* -1 u0)))
#s(approx (- 1 u0) #s(hole binary32 (* u0 (- (/ 1 u0) 1))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (- (* -1 (/ (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) u0)) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (log (/ -1 u0))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (/ 1 u0) (* -1 (log (/ -1 u0))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (/ 1 u0)) (* -1 (log (/ -1 u0))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (* -1 (/ (- (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) u0)) 1) u0)) (* -1 (log (/ -1 u0))))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* -1 (log (/ -1 u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (- (* -1 (log (/ -1 u0))) (/ 1 u0))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (* -1 (log (/ -1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (* -1 (log (/ -1 u0))) (* -1 (/ (+ 1 (+ (/ 1/3 (pow u0 2)) (* 1/2 (/ 1 u0)))) u0)))))
#s(approx (- 1 u0) #s(hole binary32 (* -1 (* u0 (- 1 (/ 1 u0))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (* cos2phi (+ (* -1 (/ (* (pow alphay 6) (* cos2phi (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (* cos2phi (+ (* cos2phi (+ (* -1 (/ (* (pow alphay 6) (log (- 1 u0))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 8) (* cos2phi (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))) (/ (* (pow alphay 4) (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx cos2phi #s(hole binary32 cos2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 2)))) (+ (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi)) (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 3)))))) cos2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi))) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) cos2phi))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (pow alphay 2))) cos2phi)) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) cos2phi))) (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (pow alphay 4))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (pow alphay 2))) cos2phi)) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (* sin2phi (+ (* -1 (/ (* (pow alphax 6) (* sin2phi (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (* sin2phi (+ (* sin2phi (+ (* -1 (/ (* (pow alphax 6) (log (- 1 u0))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 8) (* sin2phi (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))) (/ (* (pow alphax 4) (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx sin2phi #s(hole binary32 sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 2)))) (+ (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi)) (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 3)))))) sin2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi))) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) sin2phi))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (pow alphax 2))) sin2phi)) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) sin2phi))) (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (pow alphax 4))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (pow alphax 2))) sin2phi)) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
Calls

15 calls:

TimeVariablePointExpression
5.0ms
alphay
@-inf
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (log (- 1 u0)) (- 1 u0) 1 u0 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ cos2phi (* alphax alphax)) cos2phi (* alphax alphax) alphax (/ sin2phi (* alphay alphay)) sin2phi (* alphay alphay) alphay)
3.0ms
alphax
@inf
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (log (- 1 u0)) (- 1 u0) 1 u0 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ cos2phi (* alphax alphax)) cos2phi (* alphax alphax) alphax (/ sin2phi (* alphay alphay)) sin2phi (* alphay alphay) alphay)
3.0ms
alphax
@0
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (log (- 1 u0)) (- 1 u0) 1 u0 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ cos2phi (* alphax alphax)) cos2phi (* alphax alphax) alphax (/ sin2phi (* alphay alphay)) sin2phi (* alphay alphay) alphay)
2.0ms
u0
@0
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (log (- 1 u0)) (- 1 u0) 1 u0 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ cos2phi (* alphax alphax)) cos2phi (* alphax alphax) alphax (/ sin2phi (* alphay alphay)) sin2phi (* alphay alphay) alphay)
2.0ms
alphay
@inf
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (log (- 1 u0)) (- 1 u0) 1 u0 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ cos2phi (* alphax alphax)) cos2phi (* alphax alphax) alphax (/ sin2phi (* alphay alphay)) sin2phi (* alphay alphay) alphay)

rewrite184.0ms (3.3%)

Memory
-3.8MiB live, 187.4MiB allocated; 23ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05143653
05273489
132413425
092453361
Stop Event
iter-limit
node-limit
iter-limit
Counts
104 → 159
Calls
Call 1
Inputs
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
(log.f32 (-.f32 #s(literal 1 binary32) u0))
(-.f32 #s(literal 1 binary32) u0)
#s(literal 1 binary32)
u0
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
(/.f32 cos2phi (*.f32 alphax alphax))
cos2phi
(*.f32 alphax alphax)
alphax
(/.f32 sin2phi (*.f32 alphay alphay))
sin2phi
(*.f32 alphay alphay)
alphay
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (/ (* (pow alphax 2) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (* (pow alphax 2) (+ (* -1 (/ (* (pow alphax 2) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* sin2phi (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (* (pow alphax 2) (+ (* (pow alphax 2) (+ (* -1 (/ (* (pow sin2phi 2) (log (- 1 u0))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 2) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))) (/ (* sin2phi (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (/ cos2phi (* alphax alphax)) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (* alphax alphax) #s(hole binary32 (pow alphax 2)))
#s(approx alphax #s(hole binary32 alphax))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (+ (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2))) (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (/ (* (pow alphay 2) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (* (pow alphay 2) (+ (* -1 (/ (* (pow alphay 2) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* cos2phi (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (* (pow alphay 2) (+ (* (pow alphay 2) (+ (* -1 (/ (* (pow cos2phi 2) (log (- 1 u0))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 2) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))) (/ (* cos2phi (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (/ sin2phi (* alphay alphay)) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (* alphay alphay) #s(hole binary32 (pow alphay 2)))
#s(approx alphay #s(hole binary32 alphay))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (+ (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2))) (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 u0))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* 1/3 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))))))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* -1 u0)))
#s(approx (log (- 1 u0)) #s(hole binary32 (* u0 (- (* -1/2 u0) 1))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* u0 (- (* u0 (- (* u0 (- (* -1/4 u0) 1/3)) 1/2)) 1))))
#s(approx (- 1 u0) #s(hole binary32 1))
#s(approx (- 1 u0) #s(hole binary32 (+ 1 (* -1 u0))))
#s(approx u0 #s(hole binary32 u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/3 (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* -1 (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (/ 1 u0) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (/ 1 u0)) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (+ (/ 1 u0) (* 1/3 (/ 1 (pow u0 3))))) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (log -1) (* -1 (log (/ 1 u0))))))
#s(approx (log (- 1 u0)) #s(hole binary32 (- (+ (log -1) (* -1 (log (/ 1 u0)))) (/ 1 u0))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (log -1) (+ (* -1 (log (/ 1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0))))))
#s(approx (log (- 1 u0)) #s(hole binary32 (- (+ (log -1) (+ (* -1 (log (/ 1 u0))) (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) (pow u0 2))))) (/ 1 u0))))
#s(approx (- 1 u0) #s(hole binary32 (* -1 u0)))
#s(approx (- 1 u0) #s(hole binary32 (* u0 (- (/ 1 u0) 1))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (- (* -1 (/ (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) u0)) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (log (/ -1 u0))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (/ 1 u0) (* -1 (log (/ -1 u0))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (/ 1 u0)) (* -1 (log (/ -1 u0))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (* -1 (/ (- (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) u0)) 1) u0)) (* -1 (log (/ -1 u0))))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* -1 (log (/ -1 u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (- (* -1 (log (/ -1 u0))) (/ 1 u0))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (* -1 (log (/ -1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (* -1 (log (/ -1 u0))) (* -1 (/ (+ 1 (+ (/ 1/3 (pow u0 2)) (* 1/2 (/ 1 u0)))) u0)))))
#s(approx (- 1 u0) #s(hole binary32 (* -1 (* u0 (- 1 (/ 1 u0))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (* cos2phi (+ (* -1 (/ (* (pow alphay 6) (* cos2phi (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (* cos2phi (+ (* cos2phi (+ (* -1 (/ (* (pow alphay 6) (log (- 1 u0))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 8) (* cos2phi (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))) (/ (* (pow alphay 4) (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx cos2phi #s(hole binary32 cos2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 2)))) (+ (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi)) (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 3)))))) cos2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi))) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) cos2phi))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (pow alphay 2))) cos2phi)) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) cos2phi))) (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (pow alphay 4))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (pow alphay 2))) cos2phi)) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (* sin2phi (+ (* -1 (/ (* (pow alphax 6) (* sin2phi (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (* sin2phi (+ (* sin2phi (+ (* -1 (/ (* (pow alphax 6) (log (- 1 u0))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 8) (* sin2phi (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))) (/ (* (pow alphax 4) (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx sin2phi #s(hole binary32 sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 2)))) (+ (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi)) (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 3)))))) sin2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi))) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) sin2phi))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (pow alphax 2))) sin2phi)) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) sin2phi))) (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (pow alphax 4))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (pow alphax 2))) sin2phi)) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
Outputs
(/.f32 (neg.f32 (neg.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))))) (neg.f32 (neg.f32 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))))
(/.f32 (neg.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (neg.f32 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))
(neg.f32 (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
(log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0)))
(*.f32 #s(literal -1 binary32) (log.f32 (-.f32 #s(literal 1 binary32) u0)))
(-.f32 #s(literal 0 binary32) (log.f32 (-.f32 #s(literal 1 binary32) u0)))
(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
(log.f32 (-.f32 #s(literal 1 binary32) u0))
(-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))
(-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0))) (log.f32 (+.f32 #s(literal 1 binary32) (fma.f32 u0 u0 (*.f32 #s(literal 1 binary32) u0)))))
(/.f32 (neg.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (neg.f32 (+.f32 #s(literal 1 binary32) u0)))
(/.f32 (neg.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0))) (neg.f32 (+.f32 #s(literal 1 binary32) (fma.f32 u0 u0 (*.f32 #s(literal 1 binary32) u0)))))
(/.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)) (+.f32 #s(literal 1 binary32) u0))
(/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0)) (+.f32 #s(literal 1 binary32) (fma.f32 u0 u0 (*.f32 #s(literal 1 binary32) u0))))
(-.f32 #s(literal 1 binary32) u0)
#s(literal 1 binary32)
u0
(/.f32 (neg.f32 (-.f32 (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))))) (neg.f32 (-.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
(/.f32 (neg.f32 (+.f32 (pow.f32 (/.f32 cos2phi (*.f32 alphax alphax)) #s(literal 3 binary32)) (pow.f32 (/.f32 sin2phi (*.f32 alphay alphay)) #s(literal 3 binary32)))) (neg.f32 (+.f32 (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (-.f32 (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (/.f32 (*.f32 cos2phi sin2phi) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)))))))
(/.f32 (neg.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))) (neg.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.f32 (-.f32 (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)))) (-.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (+.f32 (pow.f32 (/.f32 cos2phi (*.f32 alphax alphax)) #s(literal 3 binary32)) (pow.f32 (/.f32 sin2phi (*.f32 alphay alphay)) #s(literal 3 binary32))) (+.f32 (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (-.f32 (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (/.f32 (*.f32 cos2phi sin2phi) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))))
(/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)))
(+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
(/.f32 (neg.f32 (/.f32 cos2phi alphax)) (neg.f32 alphax))
(/.f32 (neg.f32 (neg.f32 cos2phi)) (neg.f32 (neg.f32 (*.f32 alphax alphax))))
(/.f32 (/.f32 cos2phi alphax) alphax)
(/.f32 (neg.f32 cos2phi) (neg.f32 (*.f32 alphax alphax)))
(/.f32 cos2phi (*.f32 alphax alphax))
cos2phi
(*.f32 (fabs.f32 (fabs.f32 alphax)) (fabs.f32 (fabs.f32 alphax)))
(*.f32 (neg.f32 (fabs.f32 alphax)) (neg.f32 (fabs.f32 alphax)))
(*.f32 (neg.f32 (neg.f32 alphax)) (neg.f32 (neg.f32 alphax)))
(*.f32 (exp.f32 (log.f32 alphax)) (exp.f32 (log.f32 alphax)))
(*.f32 (fabs.f32 alphax) (fabs.f32 alphax))
(*.f32 (neg.f32 alphax) (neg.f32 alphax))
(*.f32 alphax alphax)
(pow.f32 (exp.f32 (log.f32 alphax)) #s(literal 2 binary32))
(pow.f32 (fabs.f32 alphax) #s(literal 2 binary32))
(pow.f32 (neg.f32 alphax) #s(literal 2 binary32))
(pow.f32 (*.f32 alphax alphax) #s(literal 1 binary32))
(pow.f32 alphax #s(literal 2 binary32))
(+.f32 (cosh.f32 (*.f32 (log.f32 alphax) #s(literal 2 binary32))) (sinh.f32 (*.f32 (log.f32 alphax) #s(literal 2 binary32))))
(fabs.f32 (*.f32 alphax alphax))
(exp.f32 (*.f32 (log.f32 alphax) #s(literal 2 binary32)))
alphax
(/.f32 (neg.f32 (/.f32 sin2phi alphay)) (neg.f32 alphay))
(/.f32 (neg.f32 (neg.f32 sin2phi)) (neg.f32 (neg.f32 (*.f32 alphay alphay))))
(/.f32 (/.f32 sin2phi alphay) alphay)
(/.f32 (neg.f32 sin2phi) (neg.f32 (*.f32 alphay alphay)))
(/.f32 sin2phi (*.f32 alphay alphay))
sin2phi
(*.f32 (fabs.f32 (fabs.f32 alphay)) (fabs.f32 (fabs.f32 alphay)))
(*.f32 (neg.f32 (fabs.f32 alphay)) (neg.f32 (fabs.f32 alphay)))
(*.f32 (neg.f32 (neg.f32 alphay)) (neg.f32 (neg.f32 alphay)))
(*.f32 (exp.f32 (log.f32 alphay)) (exp.f32 (log.f32 alphay)))
(*.f32 (fabs.f32 alphay) (fabs.f32 alphay))
(*.f32 (neg.f32 alphay) (neg.f32 alphay))
(*.f32 alphay alphay)
(pow.f32 (exp.f32 (log.f32 alphay)) #s(literal 2 binary32))
(pow.f32 (fabs.f32 alphay) #s(literal 2 binary32))
(pow.f32 (neg.f32 alphay) #s(literal 2 binary32))
(pow.f32 (*.f32 alphay alphay) #s(literal 1 binary32))
(pow.f32 alphay #s(literal 2 binary32))
(+.f32 (cosh.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))) (sinh.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))
(fabs.f32 (*.f32 alphay alphay))
(exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32)))
alphay
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (*.f32 alphax alphax) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (*.f32 (*.f32 alphay cos2phi) (*.f32 alphay cos2phi))) (/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi)) (*.f32 alphax alphax)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 sin2phi (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) (*.f32 (*.f32 alphay cos2phi) (*.f32 alphay cos2phi))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))))))) (*.f32 alphax alphax) (/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi)) (*.f32 alphax alphax)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 (*.f32 alphax alphax) (/.f32 (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 (*.f32 alphay alphay) alphay) (*.f32 (*.f32 alphay alphay) alphay)))) (neg.f32 (/.f32 (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)))))) (*.f32 alphax alphax) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (*.f32 (*.f32 alphay cos2phi) (*.f32 alphay cos2phi)))) (*.f32 alphax alphax) (/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi)) (*.f32 alphax alphax)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)))
#s(approx (/ cos2phi (* alphax alphax)) (/.f32 cos2phi (*.f32 alphax alphax)))
#s(approx (* alphax alphax) (*.f32 alphax alphax))
#s(approx alphax alphax)
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi) (*.f32 (*.f32 alphax sin2phi) (*.f32 alphax sin2phi))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+.f32 (fma.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi) (*.f32 (*.f32 alphax sin2phi) (*.f32 alphax sin2phi))) (neg.f32 (/.f32 (*.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphay alphay) alphay) (*.f32 (*.f32 alphay alphay) alphay)) (*.f32 cos2phi cos2phi)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+.f32 (+.f32 (fma.f32 (exp.f32 (-.f32 (*.f32 (log.f32 alphay) #s(literal 8 binary32)) (*.f32 (log.f32 alphax) #s(literal 6 binary32)))) (/.f32 (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphax sin2phi) (*.f32 alphax sin2phi)))) (neg.f32 (/.f32 (*.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphay alphay) alphay) (*.f32 (*.f32 alphay alphay) alphay)) (*.f32 cos2phi cos2phi)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi)))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi) (*.f32 (*.f32 alphax sin2phi) (*.f32 alphax sin2phi))) (/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)) (*.f32 alphay alphay)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 cos2phi (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) (*.f32 (*.f32 alphax sin2phi) (*.f32 alphax sin2phi))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) (*.f32 alphay alphay) (/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)) (*.f32 alphay alphay)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 (*.f32 alphax alphax) alphax) (*.f32 (*.f32 alphax alphax) alphax)))) (neg.f32 (/.f32 (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (*.f32 alphay alphay) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi) (*.f32 (*.f32 alphax sin2phi) (*.f32 alphax sin2phi)))) (*.f32 alphay alphay) (/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)) (*.f32 alphay alphay)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)))
#s(approx (/ sin2phi (* alphay alphay)) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (* alphay alphay) (*.f32 alphay alphay))
#s(approx alphay alphay)
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (*.f32 (*.f32 alphay cos2phi) (*.f32 alphay cos2phi))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+.f32 (fma.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (*.f32 (*.f32 alphay cos2phi) (*.f32 alphay cos2phi))) (neg.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphax alphax) alphax) (*.f32 (*.f32 alphax alphax) alphax)) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))))))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+.f32 (+.f32 (fma.f32 (exp.f32 (-.f32 (*.f32 (log.f32 alphax) #s(literal 8 binary32)) (*.f32 (log.f32 alphay) #s(literal 6 binary32)))) (/.f32 (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (*.f32 (*.f32 alphay cos2phi) (*.f32 alphay cos2phi))))) (neg.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphax alphax) alphax) (*.f32 (*.f32 alphax alphax) alphax)) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))))))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 #s(literal 1/3 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
#s(approx (neg (log (- 1 u0))) u0)
#s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0))
#s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(literal 1/3 binary32) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0))
#s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0))
#s(approx (log (- 1 u0)) (neg.f32 u0))
#s(approx (log (- 1 u0)) (*.f32 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)) u0))
#s(approx (log (- 1 u0)) (*.f32 (-.f32 (*.f32 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32)) u0) #s(literal 1 binary32)) u0))
#s(approx (log (- 1 u0)) (*.f32 (-.f32 (*.f32 (-.f32 (*.f32 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32)) u0) #s(literal 1/2 binary32)) u0) #s(literal 1 binary32)) u0))
#s(approx (- 1 u0) #s(literal 1 binary32))
#s(approx (- 1 u0) (+.f32 (neg.f32 u0) #s(literal 1 binary32)))
#s(approx u0 u0)
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (neg.f32 (log.f32 (neg.f32 u0))) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))) u0)) (/.f32 (neg.f32 (log.f32 (neg.f32 u0))) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+.f32 (+.f32 (/.f32 (neg.f32 (log.f32 (neg.f32 u0))) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))) (/.f32 #s(literal 1 binary32) (*.f32 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))) u0))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))) u0)) (/.f32 (neg.f32 (log.f32 (neg.f32 u0))) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))))))
#s(approx (neg (log (- 1 u0))) (neg.f32 (log.f32 (neg.f32 u0))))
#s(approx (neg (log (- 1 u0))) (-.f32 (/.f32 #s(literal 1 binary32) u0) (log.f32 (neg.f32 u0))))
#s(approx (neg (log (- 1 u0))) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (/.f32 #s(literal 1 binary32) u0)) (log.f32 (neg.f32 u0))))
#s(approx (neg (log (- 1 u0))) (-.f32 (+.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (/.f32 #s(literal 1 binary32) u0)) (/.f32 #s(literal 1/3 binary32) (*.f32 (*.f32 u0 u0) u0))) (log.f32 (neg.f32 u0))))
#s(approx (log (- 1 u0)) (log.f32 (neg.f32 u0)))
#s(approx (log (- 1 u0)) (-.f32 (log.f32 (neg.f32 u0)) (/.f32 #s(literal 1 binary32) u0)))
#s(approx (log (- 1 u0)) (+.f32 (log.f32 (neg.f32 u0)) (neg.f32 (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) u0) #s(literal 1 binary32)) u0))))
#s(approx (log (- 1 u0)) (-.f32 (+.f32 (log.f32 (neg.f32 u0)) (neg.f32 (/.f32 (+.f32 (/.f32 #s(literal 1/3 binary32) u0) #s(literal 1/2 binary32)) (*.f32 u0 u0)))) (/.f32 #s(literal 1 binary32) u0)))
#s(approx (- 1 u0) (neg.f32 u0))
#s(approx (- 1 u0) (*.f32 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32)) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (neg.f32 (log.f32 (neg.f32 u0))) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))) u0)) (/.f32 (neg.f32 (log.f32 (neg.f32 u0))) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+.f32 (+.f32 (/.f32 (neg.f32 (log.f32 (neg.f32 u0))) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))) (/.f32 #s(literal 1 binary32) (*.f32 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))) u0))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+.f32 (neg.f32 (/.f32 (-.f32 (neg.f32 (/.f32 (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))) u0)) (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0)) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0)) (/.f32 (neg.f32 (log.f32 (neg.f32 u0))) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))))
#s(approx (neg (log (- 1 u0))) (neg.f32 (log.f32 (neg.f32 u0))))
#s(approx (neg (log (- 1 u0))) (-.f32 (/.f32 #s(literal 1 binary32) u0) (neg.f32 (neg.f32 (log.f32 (neg.f32 u0))))))
#s(approx (neg (log (- 1 u0))) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (/.f32 #s(literal 1 binary32) u0)) (neg.f32 (neg.f32 (log.f32 (neg.f32 u0))))))
#s(approx (neg (log (- 1 u0))) (-.f32 (neg.f32 (/.f32 (-.f32 (neg.f32 (/.f32 (+.f32 (/.f32 #s(literal 1/3 binary32) u0) #s(literal 1/2 binary32)) u0)) #s(literal 1 binary32)) u0)) (neg.f32 (neg.f32 (log.f32 (neg.f32 u0))))))
#s(approx (log (- 1 u0)) (neg.f32 (neg.f32 (log.f32 (neg.f32 u0)))))
#s(approx (log (- 1 u0)) (-.f32 (neg.f32 (neg.f32 (log.f32 (neg.f32 u0)))) (/.f32 #s(literal 1 binary32) u0)))
#s(approx (log (- 1 u0)) (+.f32 (neg.f32 (neg.f32 (log.f32 (neg.f32 u0)))) (neg.f32 (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) u0) #s(literal 1 binary32)) u0))))
#s(approx (log (- 1 u0)) (+.f32 (neg.f32 (/.f32 (+.f32 (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1/3 binary32) (*.f32 u0 u0))) (/.f32 #s(literal 1/2 binary32) u0)) u0)) (neg.f32 (neg.f32 (log.f32 (neg.f32 u0))))))
#s(approx (- 1 u0) (neg.f32 (*.f32 (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) u0)) u0)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 (fma.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) (*.f32 (*.f32 alphax sin2phi) (*.f32 alphax sin2phi))) (neg.f32 (/.f32 (*.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphay alphay) alphay) (*.f32 (*.f32 alphay alphay) alphay)) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) cos2phi (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 (fma.f32 (fma.f32 (exp.f32 (-.f32 (*.f32 (log.f32 alphay) #s(literal 8 binary32)) (*.f32 (log.f32 alphax) #s(literal 6 binary32)))) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi))) (neg.f32 (/.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphay alphay) alphay) (*.f32 (*.f32 alphay alphay) alphay)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) cos2phi (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphax sin2phi) (*.f32 alphax sin2phi)))) cos2phi (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi)))))
#s(approx cos2phi cos2phi)
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)) (neg.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))))) cos2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (+.f32 (fma.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)) (neg.f32 (/.f32 (*.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphax alphax) alphax) (*.f32 (*.f32 alphax alphax) alphax)) (*.f32 sin2phi sin2phi)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi cos2phi))))) (neg.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))))) cos2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (+.f32 (+.f32 (fma.f32 (exp.f32 (-.f32 (*.f32 (log.f32 alphax) #s(literal 8 binary32)) (*.f32 (log.f32 alphay) #s(literal 6 binary32)))) (/.f32 (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (/.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphay alphay) cos2phi))) (neg.f32 (/.f32 (*.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphax alphax) alphax) (*.f32 (*.f32 alphax alphax) alphax)) (*.f32 sin2phi sin2phi)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi cos2phi))))) (neg.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))))) cos2phi))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 (+.f32 (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))) cos2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (/.f32 (fma.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0)) (neg.f32 (/.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphay alphay) cos2phi)))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (/.f32 (fma.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0)) (neg.f32 (/.f32 (fma.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (*.f32 alphay alphay)) (neg.f32 (/.f32 (*.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphax alphax) alphax) (*.f32 (*.f32 alphax alphax) alphax)) (*.f32 sin2phi sin2phi)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi)))) cos2phi))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (/.f32 (fma.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0)) (neg.f32 (/.f32 (fma.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (*.f32 alphay alphay)) (neg.f32 (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 alphax alphax) alphax) (*.f32 (*.f32 alphax alphax) alphax)) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (neg.f32 (*.f32 (exp.f32 (-.f32 (*.f32 (log.f32 alphax) #s(literal 8 binary32)) (*.f32 (log.f32 alphay) #s(literal 6 binary32)))) (/.f32 (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi)))) cos2phi))) cos2phi))) cos2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 (fma.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) (*.f32 (*.f32 alphay cos2phi) (*.f32 alphay cos2phi))) (neg.f32 (/.f32 (*.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphax alphax) alphax) (*.f32 (*.f32 alphax alphax) alphax)) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)))))) sin2phi (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 (fma.f32 (fma.f32 (exp.f32 (-.f32 (*.f32 (log.f32 alphax) #s(literal 8 binary32)) (*.f32 (log.f32 alphay) #s(literal 6 binary32)))) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi))) (neg.f32 (/.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphax alphax) alphax) (*.f32 (*.f32 alphax alphax) alphax)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)))))) sin2phi (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphay cos2phi) (*.f32 alphay cos2phi)))) sin2phi (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi)))))
#s(approx sin2phi sin2phi)
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)) (neg.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))))) sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (+.f32 (fma.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)) (neg.f32 (/.f32 (*.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphay alphay) alphay) (*.f32 (*.f32 alphay alphay) alphay)) (*.f32 cos2phi cos2phi)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi sin2phi))))) (neg.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))))) sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (+.f32 (+.f32 (fma.f32 (exp.f32 (-.f32 (*.f32 (log.f32 alphay) #s(literal 8 binary32)) (*.f32 (log.f32 alphax) #s(literal 6 binary32)))) (/.f32 (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (/.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphax alphax) sin2phi))) (neg.f32 (/.f32 (*.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphay alphay) alphay) (*.f32 (*.f32 alphay alphay) alphay)) (*.f32 cos2phi cos2phi)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi sin2phi))))) (neg.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))))) sin2phi))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 (+.f32 (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay))) sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (/.f32 (fma.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0)) (neg.f32 (/.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphax alphax) sin2phi)))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (/.f32 (fma.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0)) (neg.f32 (/.f32 (fma.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi) (*.f32 alphax alphax)) (neg.f32 (/.f32 (*.f32 (*.f32 (*.f32 (*.f32 (*.f32 alphay alphay) alphay) (*.f32 (*.f32 alphay alphay) alphay)) (*.f32 cos2phi cos2phi)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi)))) sin2phi))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (/.f32 (fma.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0)) (neg.f32 (/.f32 (fma.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (/.f32 (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi) (*.f32 alphax alphax)) (neg.f32 (/.f32 (fma.f32 (*.f32 (*.f32 (*.f32 alphay alphay) alphay) (*.f32 (*.f32 alphay alphay) alphay)) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (neg.f32 (*.f32 (exp.f32 (-.f32 (*.f32 (log.f32 alphay) #s(literal 8 binary32)) (*.f32 (log.f32 alphax) #s(literal 6 binary32)))) (/.f32 (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))) sin2phi))) sin2phi))) sin2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (neg.f32 (*.f32 (-.f32 (neg.f32 (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay))) sin2phi)))

eval14.0ms (0.3%)

Memory
-20.9MiB live, 25.2MiB allocated; 3ms collecting garbage
Compiler

Compiled 2 476 to 805 computations (67.5% saved)

prune15.0ms (0.3%)

Memory
29.0MiB live, 29.0MiB allocated; 0ms collecting garbage
Pruning

24 alts after pruning (23 fresh and 1 done)

PrunedKeptTotal
New11823141
Fresh000
Picked011
Done000
Total11824142
Accuracy
99.2%
Counts
142 → 24
Alt Table
Click to see full alt table
StatusAccuracyProgram
61.1%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0))) (log.f32 (+.f32 #s(literal 1 binary32) (fma.f32 u0 u0 (*.f32 #s(literal 1 binary32) u0)))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
60.7%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
61.0%
(/.f32 (neg.f32 (log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0)) (+.f32 #s(literal 1 binary32) (fma.f32 u0 u0 (*.f32 #s(literal 1 binary32) u0)))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
61.0%
(/.f32 (neg.f32 (log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)) (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
63.7%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
38.1%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (+.f32 (cosh.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))) (sinh.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32)))))))
63.7%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
63.6%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))))
63.7%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
63.7%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
50.8%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
20.6%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
63.0%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 (+.f32 (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay))) sin2phi)))
62.5%
(/.f32 (neg.f32 (log.f32 #s(approx (- 1 u0) (*.f32 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32)) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
61.2%
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
93.7%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
91.7%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(literal 1/3 binary32) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
87.5%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
75.3%
(/.f32 #s(approx (neg (log (- 1 u0))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
93.7%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
91.8%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 #s(literal 1/3 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
87.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
51.3%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
20.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
Compiler

Compiled 1 057 to 989 computations (6.4% saved)

series246.0ms (4.4%)

Memory
8.4MiB live, 341.7MiB allocated; 30ms collecting garbage
Counts
47 → 566
Calls
Call 1
Inputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
(*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0)
(fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
(fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
(fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
#s(literal 1/4 binary32)
(/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))
u0
(+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))
(/.f32 sin2phi (*.f32 alphay alphay))
sin2phi
(*.f32 alphay alphay)
alphay
(/.f32 cos2phi (*.f32 alphax alphax))
cos2phi
(*.f32 alphax alphax)
alphax
(/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))
#s(literal 1/3 binary32)
(/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))
#s(literal 1/2 binary32)
(/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))
#s(literal 1 binary32)
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
(neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi)))
(*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))
(/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi)
(log.f32 (-.f32 #s(literal 1 binary32) u0))
(-.f32 #s(literal 1 binary32) u0)
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0))
(*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)
(fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32))
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)))
(/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))
(fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi)
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0))))
(-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))
(log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))
(-.f32 #s(literal 1 binary32) (*.f32 u0 u0))
(*.f32 u0 u0)
(log.f32 (+.f32 #s(literal 1 binary32) u0))
(+.f32 #s(literal 1 binary32) u0)
Outputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (/ (* (pow alphax 2) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (* (pow alphax 2) (+ (* -1 (/ (* (pow alphax 2) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* sin2phi (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (* (pow alphax 2) (+ (* (pow alphax 2) (+ (* -1 (/ (* (pow sin2phi 2) (log (- 1 u0))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 2) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))) (/ (* sin2phi (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))) (* (pow alphax 2) (* u0 (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))) (* (pow alphax 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (* (pow alphax 2) (* u0 (- (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))) (* (pow alphax 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (* (pow alphax 2) (+ (* u0 (- (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))) (* (pow alphax 2) (* u0 (- (* u0 (+ (* -1/2 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow sin2phi 3) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4))))))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (+ (* (pow alphax 2) (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (+ (* (pow alphax 2) (- (+ (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (* (pow alphax 2) (- (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (+ (* (pow alphax 2) (- (+ (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (* (pow alphax 2) (- (+ (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* (pow alphax 2) (- (* u0 (+ (* -1/2 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow sin2phi 3) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* 1/2 (/ 1 cos2phi)) (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* (pow alphax 2) (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* 1/2 (/ 1 cos2phi)) (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* (pow alphax 2) (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (+ (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))) (* (pow alphax 2) (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3))))))))))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* 1/2 (/ 1 cos2phi)) (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* (pow alphax 2) (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (+ (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))) (* (pow alphax 2) (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (+ (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))) (* (pow alphax 2) (+ (* -1/2 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow sin2phi 3) u0) (* (pow alphay 6) (pow cos2phi 4)))))))))))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* 1/4 (/ u0 cos2phi)) (+ (* 1/3 (/ 1 cos2phi)) (* (pow alphax 2) (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* 1/4 (/ u0 cos2phi)) (+ (* 1/3 (/ 1 cos2phi)) (* (pow alphax 2) (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (+ (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))) (* (pow alphax 2) (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3))))))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* 1/4 (/ u0 cos2phi)) (+ (* 1/3 (/ 1 cos2phi)) (* (pow alphax 2) (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (+ (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))) (* (pow alphax 2) (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (+ (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* (pow alphax 2) (+ (* -1/3 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow sin2phi 3) u0) (* (pow alphay 6) (pow cos2phi 4)))))))))))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (* (pow alphax 2) u0) cos2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (* (pow alphax 2) (* sin2phi u0)) (* (pow alphay 2) (pow cos2phi 2)))) (/ u0 cos2phi)))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* (pow alphax 2) (- (/ (* (pow alphax 2) (* (pow sin2phi 2) u0)) (* (pow alphay 4) (pow cos2phi 3))) (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2))))) (/ u0 cos2phi)))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* (pow alphax 2) (- (* (pow alphax 2) (- (* -1 (/ (* (pow alphax 2) (* (pow sin2phi 3) u0)) (* (pow alphay 6) (pow cos2phi 4)))) (* -1 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))))) (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2))))) (/ u0 cos2phi)))))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (/ cos2phi (* alphax alphax)) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (* alphax alphax) #s(hole binary32 (pow alphax 2)))
#s(approx alphax #s(hole binary32 alphax))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* 1/3 (/ (pow alphax 2) cos2phi))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1/3 (/ (* (pow alphax 2) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (* 1/3 (/ 1 cos2phi))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* (pow alphax 2) (- (* 1/3 (/ (* (pow alphax 2) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))))) (* 1/3 (/ 1 cos2phi))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* (pow alphax 2) (- (* (pow alphax 2) (- (* -1/3 (/ (* (pow alphax 2) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))) (* 1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))))) (* 1/3 (/ 1 cos2phi))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* 1/2 (/ (pow alphax 2) cos2phi))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1/2 (/ (* (pow alphax 2) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (* 1/2 (/ 1 cos2phi))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* (pow alphax 2) (- (* 1/2 (/ (* (pow alphax 2) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))))) (* 1/2 (/ 1 cos2phi))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* (pow alphax 2) (- (* (pow alphax 2) (- (* -1/2 (/ (* (pow alphax 2) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))) (* 1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))))) (* 1/2 (/ 1 cos2phi))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (pow alphax 2) cos2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (* (pow alphax 2) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (/ 1 cos2phi)))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* (pow alphax 2) (- (/ (* (pow alphax 2) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi)))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* (pow alphax 2) (- (* (pow alphax 2) (- (* -1 (/ (* (pow alphax 2) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4)))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) #s(hole binary32 (/ (* (pow alphay 2) cos2phi) (pow alphax 2))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) #s(hole binary32 (/ (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)) (pow alphax 2))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (- (+ (* -1 (/ (* (pow alphax 2) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) (pow cos2phi 2)))) (/ (log (+ 1 u0)) cos2phi)) (/ (log (- 1 (pow u0 2))) cos2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (- (+ (* (pow alphax 2) (- (/ (* (pow alphax 2) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 3))) (/ (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 2) (pow cos2phi 2))))) (/ (log (+ 1 u0)) cos2phi)) (/ (log (- 1 (pow u0 2))) cos2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (- (+ (* (pow alphax 2) (- (* (pow alphax 2) (- (* -1 (/ (* (pow alphax 2) (* (pow sin2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) (pow cos2phi 4)))) (* -1 (/ (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 4) (pow cos2phi 3)))))) (/ (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 2) (pow cos2phi 2))))) (/ (log (+ 1 u0)) cos2phi)) (/ (log (- 1 (pow u0 2))) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (+ (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2))) (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2)))) (pow alphax 2)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2)))) (pow alphax 2)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))) (pow alphax 4))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2)))) (pow alphax 2)) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow sin2phi 4))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4)))) (pow alphax 6)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))) (pow alphax 4)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (pow alphax 2)) (/ (pow alphay 2) sin2phi))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (pow alphax 2)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (pow alphax 4)) (/ (pow alphay 2) sin2phi)))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (pow alphax 2)) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow sin2phi 4))))))) (pow alphax 6)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (pow alphax 4)) (/ (pow alphay 2) sin2phi))))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (+ (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2))) (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (+ (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))) (/ (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))) (pow alphax 2)))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (+ (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))) (pow alphax 2)) (/ (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))) (pow alphax 4)))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4)))) (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (+ (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))) (pow alphax 2)) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow sin2phi 4))))) (pow alphax 6)) (/ (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))) (pow alphax 4)))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (* (pow alphax 4) (pow sin2phi 3)))) (+ (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 2) sin2phi)))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4)))) (+ (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (* (pow alphax 6) (pow sin2phi 4)))) (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (* (pow alphax 4) (pow sin2phi 3)))) (+ (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 2) sin2phi)))))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (* (pow alphay 2) u0) sin2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) (pow sin2phi 2)))) (/ (* (pow alphay 2) u0) sin2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (/ (* (pow alphay 2) u0) sin2phi) (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (* (pow alphax 6) (pow sin2phi 4)))) (/ (* (pow alphay 2) u0) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* 1/3 (/ (pow alphay 2) sin2phi))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (* 1/3 (/ (pow alphay 2) sin2phi)))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 2) sin2phi))) (* 1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4)))) (* 1/3 (/ (pow alphay 2) sin2phi))) (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* 1/2 (/ (pow alphay 2) sin2phi))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (* 1/2 (/ (pow alphay 2) sin2phi)))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/2 (/ (pow alphay 2) sin2phi))) (* 1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4)))) (* 1/2 (/ (pow alphay 2) sin2phi))) (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (pow alphay 2) sin2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (/ (pow alphay 2) sin2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3))) (/ (pow alphay 2) sin2phi)) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4)))) (/ (pow alphay 2) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) #s(hole binary32 sin2phi))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) #s(hole binary32 (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) (pow sin2phi 2)))) (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi) (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) (pow sin2phi 4)))) (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (/ (* (pow alphay 2) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (* (pow alphay 2) (+ (* -1 (/ (* (pow alphay 2) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* cos2phi (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (* (pow alphay 2) (+ (* (pow alphay 2) (+ (* -1 (/ (* (pow cos2phi 2) (log (- 1 u0))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 2) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))) (/ (* cos2phi (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (* (pow alphay 2) (* u0 (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (* (pow alphay 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (* (pow alphay 2) (* u0 (- (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (* (pow alphay 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (* (pow alphay 2) (+ (* u0 (- (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))) (* (pow alphay 2) (* u0 (- (* u0 (+ (* -1/2 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow cos2phi 3) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4))))))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (+ (* (pow alphay 2) (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (+ (* (pow alphay 2) (- (+ (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (* (pow alphay 2) (- (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (+ (* (pow alphay 2) (- (+ (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (* (pow alphay 2) (- (+ (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* (pow alphay 2) (- (* u0 (+ (* -1/2 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow cos2phi 3) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* 1/2 (/ 1 sin2phi)) (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* (pow alphay 2) (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* 1/2 (/ 1 sin2phi)) (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* (pow alphay 2) (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (+ (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))) (* (pow alphay 2) (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3))))))))))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* 1/2 (/ 1 sin2phi)) (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* (pow alphay 2) (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (+ (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))) (* (pow alphay 2) (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (+ (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))) (* (pow alphay 2) (+ (* -1/2 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow cos2phi 3) u0) (* (pow alphax 6) (pow sin2phi 4)))))))))))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* 1/4 (/ u0 sin2phi)) (+ (* 1/3 (/ 1 sin2phi)) (* (pow alphay 2) (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* 1/4 (/ u0 sin2phi)) (+ (* 1/3 (/ 1 sin2phi)) (* (pow alphay 2) (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (+ (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))) (* (pow alphay 2) (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3))))))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* 1/4 (/ u0 sin2phi)) (+ (* 1/3 (/ 1 sin2phi)) (* (pow alphay 2) (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (+ (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))) (* (pow alphay 2) (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (+ (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* (pow alphay 2) (+ (* -1/3 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow cos2phi 3) u0) (* (pow alphax 6) (pow sin2phi 4)))))))))))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (* (pow alphay 2) (* cos2phi u0)) (* (pow alphax 2) (pow sin2phi 2)))) (/ u0 sin2phi)))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* (pow alphay 2) (- (/ (* (pow alphay 2) (* (pow cos2phi 2) u0)) (* (pow alphax 4) (pow sin2phi 3))) (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2))))) (/ u0 sin2phi)))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* (pow alphay 2) (- (* (pow alphay 2) (- (* -1 (/ (* (pow alphay 2) (* (pow cos2phi 3) u0)) (* (pow alphax 6) (pow sin2phi 4)))) (* -1 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))))) (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2))))) (/ u0 sin2phi)))))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (/ sin2phi (* alphay alphay)) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (* alphay alphay) #s(hole binary32 (pow alphay 2)))
#s(approx alphay #s(hole binary32 alphay))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1/3 (/ (* (pow alphay 2) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (* 1/3 (/ 1 sin2phi))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* (pow alphay 2) (- (* 1/3 (/ (* (pow alphay 2) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))))) (* 1/3 (/ 1 sin2phi))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* (pow alphay 2) (- (* (pow alphay 2) (- (* -1/3 (/ (* (pow alphay 2) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))) (* 1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))))) (* 1/3 (/ 1 sin2phi))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1/2 (/ (* (pow alphay 2) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (* 1/2 (/ 1 sin2phi))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* (pow alphay 2) (- (* 1/2 (/ (* (pow alphay 2) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))))) (* 1/2 (/ 1 sin2phi))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* (pow alphay 2) (- (* (pow alphay 2) (- (* -1/2 (/ (* (pow alphay 2) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))) (* 1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))))) (* 1/2 (/ 1 sin2phi))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (* (pow alphay 2) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (/ 1 sin2phi)))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* (pow alphay 2) (- (/ (* (pow alphay 2) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi)))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* (pow alphay 2) (- (* (pow alphay 2) (- (* -1 (/ (* (pow alphay 2) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4)))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi)))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (- (+ (* -1 (/ (* (pow alphay 2) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) (pow sin2phi 2)))) (/ (log (+ 1 u0)) sin2phi)) (/ (log (- 1 (pow u0 2))) sin2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (- (+ (* (pow alphay 2) (- (/ (* (pow alphay 2) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 3))) (/ (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 2) (pow sin2phi 2))))) (/ (log (+ 1 u0)) sin2phi)) (/ (log (- 1 (pow u0 2))) sin2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (- (+ (* (pow alphay 2) (- (* (pow alphay 2) (- (* -1 (/ (* (pow alphay 2) (* (pow cos2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) (pow sin2phi 4)))) (* -1 (/ (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 4) (pow sin2phi 3)))))) (/ (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 2) (pow sin2phi 2))))) (/ (log (+ 1 u0)) sin2phi)) (/ (log (- 1 (pow u0 2))) sin2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (+ (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2))) (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2)))) (pow alphay 2)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2)))) (pow alphay 2)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))) (pow alphay 4))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2)))) (pow alphay 2)) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow cos2phi 4))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4)))) (pow alphay 6)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))) (pow alphay 4)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (pow alphay 2)) (/ (pow alphax 2) cos2phi))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (pow alphay 2)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (pow alphay 4)) (/ (pow alphax 2) cos2phi)))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (pow alphay 2)) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow cos2phi 4))))))) (pow alphay 6)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (pow alphay 4)) (/ (pow alphax 2) cos2phi))))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (+ (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2))) (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (+ (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))) (/ (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))) (pow alphay 2)))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (+ (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))) (pow alphay 2)) (/ (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))) (pow alphay 4)))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4)))) (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (+ (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))) (pow alphay 2)) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow cos2phi 4))))) (pow alphay 6)) (/ (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))) (pow alphay 4)))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (* (pow alphay 4) (pow cos2phi 3)))) (+ (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 2) cos2phi)))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4)))) (+ (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (* (pow alphay 6) (pow cos2phi 4)))) (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (* (pow alphay 4) (pow cos2phi 3)))) (+ (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 2) cos2phi)))))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) (pow cos2phi 2)))) (/ (* (pow alphax 2) u0) cos2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (/ (* (pow alphax 2) u0) cos2phi) (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (* (pow alphay 6) (pow cos2phi 4)))) (/ (* (pow alphax 2) u0) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (* 1/3 (/ (pow alphax 2) cos2phi)))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 2) cos2phi))) (* 1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4)))) (* 1/3 (/ (pow alphax 2) cos2phi))) (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (* 1/2 (/ (pow alphax 2) cos2phi)))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/2 (/ (pow alphax 2) cos2phi))) (* 1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4)))) (* 1/2 (/ (pow alphax 2) cos2phi))) (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (/ (pow alphax 2) cos2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3))) (/ (pow alphax 2) cos2phi)) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4)))) (/ (pow alphax 2) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) #s(hole binary32 (* (pow alphay 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) (pow cos2phi 2)))) (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi) (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) (pow cos2phi 4)))) (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ 1/2 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ 1/3 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx u0 #s(hole binary32 u0))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (/ (* (pow alphax 2) u0) cos2phi)))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* u0 (- (* 1/2 (/ (* (pow alphax 2) u0) cos2phi)) (* -1 (/ (pow alphax 2) cos2phi))))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* u0 (- (* u0 (- (* 1/3 (/ (* (pow alphax 2) u0) cos2phi)) (* -1/2 (/ (pow alphax 2) cos2phi)))) (* -1 (/ (pow alphax 2) cos2phi))))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* u0 (- (* u0 (- (* u0 (- (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* -1/3 (/ (pow alphax 2) cos2phi)))) (* -1/2 (/ (pow alphax 2) cos2phi)))) (* -1 (/ (pow alphax 2) cos2phi))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* -1 (/ (* (pow alphax 2) u0) cos2phi))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* u0 (+ (* -1 (/ (pow alphax 2) cos2phi)) (* -1/2 (/ (* (pow alphax 2) u0) cos2phi))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* u0 (+ (* -1 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* -1/2 (/ (pow alphax 2) cos2phi)) (* -1/3 (/ (* (pow alphax 2) u0) cos2phi))))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* u0 (+ (* -1 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* -1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* -1/3 (/ (pow alphax 2) cos2phi)) (* -1/4 (/ (* (pow alphax 2) u0) cos2phi))))))))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* -1 (/ u0 cos2phi))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* u0 (- (* u0 (- (* -1/3 (/ u0 cos2phi)) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* u0 (- (* u0 (- (* u0 (- (* -1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* -1 u0)))
#s(approx (log (- 1 u0)) #s(hole binary32 (* u0 (- (* -1/2 u0) 1))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* u0 (- (* u0 (- (* u0 (- (* -1/4 u0) 1/3)) 1/2)) 1))))
#s(approx (- 1 u0) #s(hole binary32 1))
#s(approx (- 1 u0) #s(hole binary32 (+ 1 (* -1 u0))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 u0))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* 1/3 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))))))))
#s(approx (* (+ (* 1/2 u0) 1) u0) #s(hole binary32 u0))
#s(approx (* (+ (* 1/2 u0) 1) u0) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (+ (* 1/2 u0) 1) #s(hole binary32 1))
#s(approx (+ (* 1/2 u0) 1) #s(hole binary32 (+ 1 (* 1/2 u0))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 u0))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* 1/3 u0)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (* -1 u0)))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (* u0 (- (* -1/2 u0) 1))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (* u0 (- (* u0 (- (* u0 (- (* -1/4 u0) 1/3)) 1/2)) 1))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (* -1 (pow u0 2))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (* (pow u0 2) (- (* -1/2 (pow u0 2)) 1))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (* (pow u0 2) (- (* (pow u0 2) (- (* -1/3 (pow u0 2)) 1/2)) 1))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (* (pow u0 2) (- (* (pow u0 2) (- (* (pow u0 2) (- (* -1/4 (pow u0 2)) 1/3)) 1/2)) 1))))
#s(approx (- 1 (* u0 u0)) #s(hole binary32 1))
#s(approx (- 1 (* u0 u0)) #s(hole binary32 (+ 1 (* -1 (pow u0 2)))))
#s(approx (* u0 u0) #s(hole binary32 (pow u0 2)))
#s(approx (log (+ 1 u0)) #s(hole binary32 u0))
#s(approx (log (+ 1 u0)) #s(hole binary32 (* u0 (+ 1 (* -1/2 u0)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (* u0 (+ 1 (* u0 (- (* 1/3 u0) 1/2))))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (* u0 (+ 1 (* u0 (- (* u0 (+ 1/3 (* -1/4 u0))) 1/2))))))
#s(approx (+ 1 u0) #s(hole binary32 1))
#s(approx (+ 1 u0) #s(hole binary32 (+ 1 u0)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/3 (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* 1/4 (/ (pow u0 4) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (+ (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* 1/4 (/ (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (+ (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* 1/4 (/ (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 2) (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 2) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* u0 (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (/ (pow alphax 2) (* cos2phi u0)) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (* 1/2 (/ (pow alphax 2) (* cos2phi (pow u0 2)))) (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (* 1/3 (/ (pow alphax 2) (* cos2phi (pow u0 3)))) (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (+ (* -1/2 (/ (pow alphax 2) (* cos2phi (pow u0 2)))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi)))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (+ (* -1/2 (/ (pow alphax 2) (* cos2phi (pow u0 2)))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (+ (* -1/2 (/ (pow alphax 2) (* cos2phi (pow u0 2)))) (+ (* -1/3 (/ (pow alphax 2) (* cos2phi (pow u0 3)))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) cos2phi)))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) cos2phi)) (/ (log -1) cos2phi)) (/ 1 (* cos2phi u0)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (+ (* -1 (/ (log (/ 1 u0)) cos2phi)) (+ (* -1 (/ (+ (/ 1 cos2phi) (* 1/2 (/ 1 (* cos2phi u0)))) u0)) (/ (log -1) cos2phi)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) cos2phi)) (+ (* -1 (/ (+ (* 1/2 (/ 1 cos2phi)) (* 1/3 (/ 1 (* cos2phi u0)))) (pow u0 2))) (/ (log -1) cos2phi))) (/ 1 (* cos2phi u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (log -1) (* -1 (log (/ 1 u0))))))
#s(approx (log (- 1 u0)) #s(hole binary32 (- (+ (log -1) (* -1 (log (/ 1 u0)))) (/ 1 u0))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (log -1) (+ (* -1 (log (/ 1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0))))))
#s(approx (log (- 1 u0)) #s(hole binary32 (- (+ (log -1) (+ (* -1 (log (/ 1 u0))) (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) (pow u0 2))))) (/ 1 u0))))
#s(approx (- 1 u0) #s(hole binary32 (* -1 u0)))
#s(approx (- 1 u0) #s(hole binary32 (* u0 (- (/ 1 u0) 1))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* -1 (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (/ 1 u0) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (/ 1 u0)) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (+ (/ 1 u0) (* 1/3 (/ 1 (pow u0 3))))) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (* (+ (* 1/2 u0) 1) u0) #s(hole binary32 (* 1/2 (pow u0 2))))
#s(approx (* (+ (* 1/2 u0) 1) u0) #s(hole binary32 (* (pow u0 2) (+ 1/2 (/ 1 u0)))))
#s(approx (+ (* 1/2 u0) 1) #s(hole binary32 (* 1/2 u0)))
#s(approx (+ (* 1/2 u0) 1) #s(hole binary32 (* u0 (+ 1/2 (/ 1 u0)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (* -1 (log (/ 1 u0))) (+ (log -1) (* -2 (log (/ 1 u0))))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (+ (* -2 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log -1) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (+ (* -2 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log -1) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/3 (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))) (+ (* -2 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log -1) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (* -1 (log (/ 1 u0))) (+ (log -1) (* -2 (log (/ 1 u0)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (/ 1 u0)) (+ (log -1) (* -2 (log (/ 1 u0)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (+ (/ 1/2 (pow u0 2)) (/ 1 u0))) (+ (log -1) (* -2 (log (/ 1 u0)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (+ (/ 1/2 (pow u0 2)) (+ (/ 1 u0) (* 1/3 (/ 1 (pow u0 3)))))) (+ (log -1) (* -2 (log (/ 1 u0)))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (log -1) (* -2 (log (/ 1 u0)))) (* -1 (log (/ 1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (log -1) (* -2 (log (/ 1 u0)))) (+ (* -1 (log (/ 1 u0))) (/ 1 u0)))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (log -1) (+ (* -2 (log (/ 1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0)))) (* -1 (log (/ 1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (log -1) (+ (* -2 (log (/ 1 u0))) (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) (pow u0 2))))) (+ (* -1 (log (/ 1 u0))) (/ 1 u0)))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (+ (log -1) (* -2 (log (/ 1 u0))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (- (+ (log -1) (* -2 (log (/ 1 u0)))) (/ 1 (pow u0 2)))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (+ (log -1) (+ (* -2 (log (/ 1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 (pow u0 2)))) (pow u0 2)))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (- (+ (log -1) (+ (* -2 (log (/ 1 u0))) (* -1 (/ (+ 1/2 (* 1/3 (/ 1 (pow u0 2)))) (pow u0 4))))) (/ 1 (pow u0 2)))))
#s(approx (- 1 (* u0 u0)) #s(hole binary32 (* -1 (pow u0 2))))
#s(approx (- 1 (* u0 u0)) #s(hole binary32 (* (pow u0 2) (- (/ 1 (pow u0 2)) 1))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (* -1 (log (/ 1 u0)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (* -1 (log (/ 1 u0))) (/ 1 u0))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (/ 1 u0)) (/ 1/2 (pow u0 2)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (+ (/ 1 u0) (* 1/3 (/ 1 (pow u0 3))))) (/ 1/2 (pow u0 2)))))
#s(approx (+ 1 u0) #s(hole binary32 u0))
#s(approx (+ 1 u0) #s(hole binary32 (* u0 (+ 1 (/ 1 u0)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (- (* -1 (/ (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) u0)) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (* -1 (/ (- (* -1 (/ (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ (* 1/2 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ (/ 1/2 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) u0)) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* u0 (+ (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (/ (pow alphax 2) (* cos2phi u0)) (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (* -1 (/ (- (* -1/2 (/ (pow alphax 2) (* cos2phi u0))) (/ (pow alphax 2) cos2phi)) u0)) (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (* -1 (/ (- (* -1 (/ (- (* 1/3 (/ (pow alphax 2) (* cos2phi u0))) (* -1/2 (/ (pow alphax 2) cos2phi))) u0)) (/ (pow alphax 2) cos2phi)) u0)) (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)) (* -1 (/ (pow alphax 2) (* cos2phi u0))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)) (* -1 (/ (+ (* 1/2 (/ (pow alphax 2) (* cos2phi u0))) (/ (pow alphax 2) cos2phi)) u0)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (pow alphax 2) cos2phi)) (* -1/3 (/ (pow alphax 2) (* cos2phi u0)))) u0)) (/ (pow alphax 2) cos2phi)) u0)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* -1 (/ (log (/ -1 u0)) cos2phi))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (- (* -1 (/ (log (/ -1 u0)) cos2phi)) (/ 1 (* cos2phi u0)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (+ (* -1 (/ (log (/ -1 u0)) cos2phi)) (* -1 (/ (+ (/ 1 cos2phi) (* 1/2 (/ 1 (* cos2phi u0)))) u0)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (+ (* -1 (/ (log (/ -1 u0)) cos2phi)) (* -1 (/ (+ (/ 1/3 (* cos2phi (pow u0 2))) (+ (/ 1/2 (* cos2phi u0)) (/ 1 cos2phi))) u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* -1 (log (/ -1 u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (- (* -1 (log (/ -1 u0))) (/ 1 u0))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (* -1 (log (/ -1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (* -1 (log (/ -1 u0))) (* -1 (/ (+ 1 (+ (/ 1/3 (pow u0 2)) (* 1/2 (/ 1 u0)))) u0)))))
#s(approx (- 1 u0) #s(hole binary32 (* -1 (* u0 (- 1 (/ 1 u0))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (log (/ -1 u0))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (/ 1 u0) (* -1 (log (/ -1 u0))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (/ 1 u0)) (* -1 (log (/ -1 u0))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (* -1 (/ (- (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) u0)) 1) u0)) (* -1 (log (/ -1 u0))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (* -1 (log (/ -1 u0))) (* -2 (log (/ -1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* -2 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* -2 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* -1 (/ (- (* -1 (/ (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) u0))) (* -2 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (* -1 (log (/ -1 u0))) (* -2 (log (/ -1 u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ -1 u0))) (/ 1 u0)) (* -2 (log (/ -1 u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ -1 u0))) (+ (/ 1/2 (pow u0 2)) (/ 1 u0))) (* -2 (log (/ -1 u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ -1 u0))) (* -1 (/ (- (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) u0)) 1) u0))) (* -2 (log (/ -1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (* -2 (log (/ -1 u0))) (* -1 (log (/ -1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (* -2 (log (/ -1 u0))) (+ (* -1 (log (/ -1 u0))) (/ 1 u0)))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (* -2 (log (/ -1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0))) (* -1 (log (/ -1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (* -2 (log (/ -1 u0))) (* -1 (/ (+ 1 (+ (/ 1/3 (pow u0 2)) (* 1/2 (/ 1 u0)))) u0))) (* -1 (log (/ -1 u0))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (+ (log -1) (* -2 (log (/ -1 u0))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (- (+ (log -1) (* -2 (log (/ -1 u0)))) (/ 1 (pow u0 2)))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (+ (log -1) (+ (* -2 (log (/ -1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 (pow u0 2)))) (pow u0 2)))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (- (+ (log -1) (+ (* -2 (log (/ -1 u0))) (* -1 (/ (+ 1/2 (* 1/3 (/ 1 (pow u0 2)))) (pow u0 4))))) (/ 1 (pow u0 2)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (log -1) (* -1 (log (/ -1 u0))))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (log -1) (+ (* -1 (log (/ -1 u0))) (/ 1 u0)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (log -1) (+ (* -1 (log (/ -1 u0))) (* -1 (/ (- (* 1/2 (/ 1 u0)) 1) u0))))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (log -1) (+ (* -1 (log (/ -1 u0))) (* -1 (/ (- (* -1 (/ (- (* 1/3 (/ 1 u0)) 1/2) u0)) 1) u0))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (* cos2phi (+ (* -1 (/ (* (pow alphay 6) (* cos2phi (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (* cos2phi (+ (* cos2phi (+ (* -1 (/ (* (pow alphay 6) (log (- 1 u0))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 8) (* cos2phi (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))) (/ (* (pow alphay 4) (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* cos2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* cos2phi (+ (* cos2phi (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* cos2phi (+ (* cos2phi (+ (* cos2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow alphay 8) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))))) (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* cos2phi (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* cos2phi (- (+ (* cos2phi (- (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* cos2phi (- (+ (* cos2phi (- (+ (* cos2phi (- (* u0 (+ (* -1/2 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow alphay 8) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4))))) (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3))))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (+ (* cos2phi (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (+ (* cos2phi (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* cos2phi (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))))))) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (+ (* cos2phi (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* cos2phi (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (+ (* cos2phi (+ (* -1/2 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow alphay 8) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3))))))))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))))))) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (+ (* 1/3 (/ (pow alphay 2) sin2phi)) (* cos2phi (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (+ (* 1/3 (/ (pow alphay 2) sin2phi)) (* cos2phi (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))) (* cos2phi (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (+ (* 1/3 (/ (pow alphay 2) sin2phi)) (* cos2phi (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))) (* cos2phi (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (+ (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* cos2phi (+ (* -1/3 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow alphay 8) u0) (* (pow alphax 6) (pow sin2phi 4))))))))))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* cos2phi (- (/ (* (pow alphay 6) (* cos2phi u0)) (* (pow alphax 4) (pow sin2phi 3))) (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))) (/ (* (pow alphay 2) u0) sin2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* cos2phi (- (* cos2phi (- (* -1 (/ (* (pow alphay 8) (* cos2phi u0)) (* (pow alphax 6) (pow sin2phi 4)))) (* -1 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))))) (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))) (/ (* (pow alphay 2) u0) sin2phi))))
#s(approx cos2phi #s(hole binary32 cos2phi))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* 1/3 (/ (pow alphay 2) sin2phi)) (* cos2phi (- (* 1/3 (/ (* (pow alphay 6) cos2phi) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* 1/3 (/ (pow alphay 2) sin2phi)) (* cos2phi (- (* cos2phi (- (* -1/3 (/ (* (pow alphay 8) cos2phi) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))) (* 1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* cos2phi (- (* 1/2 (/ (* (pow alphay 6) cos2phi) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* cos2phi (- (* cos2phi (- (* -1/2 (/ (* (pow alphay 8) cos2phi) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))) (* 1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* cos2phi (- (/ (* (pow alphay 6) cos2phi) (* (pow alphax 4) (pow sin2phi 3))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (/ (pow alphay 2) sin2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* cos2phi (- (* cos2phi (- (* -1 (/ (* (pow alphay 8) cos2phi) (* (pow alphax 6) (pow sin2phi 4)))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (/ (pow alphay 2) sin2phi))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (/ (log (- 1 u0)) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* cos2phi (- (/ (* (pow alphay 6) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 3))) (/ (* (pow alphay 4) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 2) (pow sin2phi 2))))) (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* cos2phi (- (* cos2phi (- (* -1 (/ (* (pow alphay 8) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) (pow sin2phi 4)))) (* -1 (/ (* (pow alphay 6) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 4) (pow sin2phi 3)))))) (/ (* (pow alphay 4) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 2) (pow sin2phi 2))))) (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 2)))) (+ (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi)) (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 3)))))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) (pow cos2phi 2)))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6)))) (pow cos2phi 3)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) (pow cos2phi 2))))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2)) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi) (pow alphax 2))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (pow cos2phi 2)) (pow alphax 2)))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (pow cos2phi 3)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (pow cos2phi 2)) (pow alphax 2))))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (+ (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)) (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 3)))))) cos2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2))))) cos2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) (+ (* 1/2 (pow alphax 2)) (+ (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))) (/ (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))) cos2phi)))) cos2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (+ (* 1/2 (pow alphax 2)) (+ (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))) cos2phi) (/ (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) (pow cos2phi 2))))))) cos2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 3)))) (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (+ (* 1/2 (pow alphax 2)) (+ (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))) cos2phi) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))) (pow cos2phi 3)) (/ (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) (pow cos2phi 2))))))))) cos2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2))) cos2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) (+ (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) cos2phi))) (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2))))) cos2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) (+ (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) cos2phi))) (+ (* 1/4 (* (pow alphax 2) u0)) (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (* (pow alphay 4) (pow cos2phi 2)))) (+ (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (* 1/3 (pow alphax 2))))))) cos2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 3)))) (+ (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) cos2phi))) (+ (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (* (pow alphay 6) (pow cos2phi 3)))) (+ (* 1/4 (* (pow alphax 2) u0)) (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (* (pow alphay 4) (pow cos2phi 2)))) (+ (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (* 1/3 (pow alphax 2))))))))) cos2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (+ (* -1 (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) cos2phi))) (* (pow alphax 2) u0)) cos2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* (pow alphax 2) u0) (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (* (pow alphay 6) (pow cos2phi 3)))) (* (pow alphax 2) u0)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) (* 1/3 (pow alphax 2))) cos2phi)))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (* 1/3 (pow alphax 2))) (* 1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 3)))) (* 1/3 (pow alphax 2))) (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (* 1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))))) cos2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) (* 1/2 (pow alphax 2))) cos2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (* 1/2 (pow alphax 2))) (* 1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 3)))) (* 1/2 (pow alphax 2))) (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (* 1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))))) cos2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (+ (* -1 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) (pow alphax 2)) cos2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2))) (pow alphax 2)) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 3)))) (pow alphax 2)) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) #s(hole binary32 (* cos2phi (+ (/ sin2phi cos2phi) (/ (pow alphay 2) (pow alphax 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) cos2phi))) (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (+ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) (pow cos2phi 3)))) (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi))) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) cos2phi))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (pow alphay 2))) cos2phi)) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) cos2phi))) (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (pow alphay 4))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (pow alphay 2))) cos2phi)) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4)))) cos2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))))) cos2phi)) (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6)))) cos2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) cos2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))))) cos2phi)) (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) cos2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2)))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) cos2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4)))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) cos2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2)))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))) cos2phi))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2)))))) cos2phi)) (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))) cos2phi))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4)))))) cos2phi)) (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi)) (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))) cos2phi))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6)))))) cos2phi)) (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) cos2phi)) (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi)) (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))) cos2phi))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))) cos2phi))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2)))) cos2phi)) (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))) cos2phi))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4)))) cos2phi)) (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))) cos2phi)) (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))) cos2phi))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6)))) cos2phi)) (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))) cos2phi)) (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))) cos2phi)) (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))) cos2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphax 2) u0)) (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) cos2phi))) cos2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphax 2) u0)) (* -1 (/ (- (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (* (pow alphay 4) cos2phi)) (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))) cos2phi))) cos2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphax 2) u0)) (* -1 (/ (- (* -1 (/ (- (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (* (pow alphay 6) cos2phi)) (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))) cos2phi))) cos2phi))))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1/3 (pow alphax 2)) (* 1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)))) cos2phi))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) cos2phi))) (* 1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) (* -1/3 (pow alphax 2))) cos2phi))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (* 1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) cos2phi))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4)))) cos2phi)) (* 1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) (* -1/3 (pow alphax 2))) cos2phi))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (pow alphax 2)) (* 1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)))) cos2phi))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) cos2phi))) (* 1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) (* -1/2 (pow alphax 2))) cos2phi))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (* 1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) cos2phi))) (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4)))) cos2phi)) (* 1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) (* -1/2 (pow alphax 2))) cos2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (pow alphax 2)) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) cos2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) cos2phi)) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (* -1 (pow alphax 2))) cos2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) cos2phi)) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) cos2phi)) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (* -1 (pow alphax 2))) cos2phi))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) #s(hole binary32 (* -1 (* cos2phi (+ (* -1 (/ sin2phi cos2phi)) (* -1 (/ (pow alphay 2) (pow alphax 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) cos2phi))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* -1 (/ (- (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphay 2))) cos2phi))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* -1 (/ (- (* -1 (/ (- (/ (* (pow alphax 8) (* (pow sin2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) cos2phi)) (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphay 4))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphay 2))) cos2phi))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (* sin2phi (+ (* -1 (/ (* (pow alphax 6) (* sin2phi (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (* sin2phi (+ (* sin2phi (+ (* -1 (/ (* (pow alphax 6) (log (- 1 u0))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 8) (* sin2phi (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))) (/ (* (pow alphax 4) (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* sin2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* sin2phi (+ (* sin2phi (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* sin2phi (+ (* sin2phi (+ (* sin2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow alphax 8) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))))) (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* sin2phi (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* sin2phi (- (+ (* sin2phi (- (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* sin2phi (- (+ (* sin2phi (- (+ (* sin2phi (- (* u0 (+ (* -1/2 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow alphax 8) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4))))) (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3))))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (+ (* sin2phi (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (+ (* sin2phi (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* sin2phi (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))))))) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (+ (* sin2phi (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* sin2phi (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (+ (* sin2phi (+ (* -1/2 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow alphax 8) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3))))))))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))))))) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (+ (* 1/3 (/ (pow alphax 2) cos2phi)) (* sin2phi (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (+ (* 1/3 (/ (pow alphax 2) cos2phi)) (* sin2phi (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))) (* sin2phi (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (+ (* 1/3 (/ (pow alphax 2) cos2phi)) (* sin2phi (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))) (* sin2phi (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (+ (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* sin2phi (+ (* -1/3 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow alphax 8) u0) (* (pow alphay 6) (pow cos2phi 4))))))))))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* sin2phi (- (/ (* (pow alphax 6) (* sin2phi u0)) (* (pow alphay 4) (pow cos2phi 3))) (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))) (/ (* (pow alphax 2) u0) cos2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* sin2phi (- (* sin2phi (- (* -1 (/ (* (pow alphax 8) (* sin2phi u0)) (* (pow alphay 6) (pow cos2phi 4)))) (* -1 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))))) (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))) (/ (* (pow alphax 2) u0) cos2phi))))
#s(approx sin2phi #s(hole binary32 sin2phi))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* 1/3 (/ (pow alphax 2) cos2phi)) (* sin2phi (- (* 1/3 (/ (* (pow alphax 6) sin2phi) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* 1/3 (/ (pow alphax 2) cos2phi)) (* sin2phi (- (* sin2phi (- (* -1/3 (/ (* (pow alphax 8) sin2phi) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))) (* 1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* sin2phi (- (* 1/2 (/ (* (pow alphax 6) sin2phi) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* sin2phi (- (* sin2phi (- (* -1/2 (/ (* (pow alphax 8) sin2phi) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))) (* 1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* sin2phi (- (/ (* (pow alphax 6) sin2phi) (* (pow alphay 4) (pow cos2phi 3))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (/ (pow alphax 2) cos2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* sin2phi (- (* sin2phi (- (* -1 (/ (* (pow alphax 8) sin2phi) (* (pow alphay 6) (pow cos2phi 4)))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (/ (pow alphax 2) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* sin2phi (- (/ (* (pow alphax 6) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 3))) (/ (* (pow alphax 4) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 2) (pow cos2phi 2))))) (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* sin2phi (- (* sin2phi (- (* -1 (/ (* (pow alphax 8) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) (pow cos2phi 4)))) (* -1 (/ (* (pow alphax 6) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 4) (pow cos2phi 3)))))) (/ (* (pow alphax 4) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 2) (pow cos2phi 2))))) (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 2)))) (+ (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi)) (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 3)))))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) (pow sin2phi 2)))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6)))) (pow sin2phi 3)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) (pow sin2phi 2))))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2)) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi) (pow alphay 2))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (pow sin2phi 2)) (pow alphay 2)))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (pow sin2phi 3)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (pow sin2phi 2)) (pow alphay 2))))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (+ (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)) (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 3)))))) sin2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2))))) sin2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) (+ (* 1/2 (pow alphay 2)) (+ (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))) (/ (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))) sin2phi)))) sin2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (+ (* 1/2 (pow alphay 2)) (+ (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))) sin2phi) (/ (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) (pow sin2phi 2))))))) sin2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 3)))) (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (+ (* 1/2 (pow alphay 2)) (+ (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))) sin2phi) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))) (pow sin2phi 3)) (/ (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) (pow sin2phi 2))))))))) sin2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2))) sin2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) (+ (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) sin2phi))) (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2))))) sin2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) (+ (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) sin2phi))) (+ (* 1/4 (* (pow alphay 2) u0)) (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (* (pow alphax 4) (pow sin2phi 2)))) (+ (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (* 1/3 (pow alphay 2))))))) sin2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 3)))) (+ (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) sin2phi))) (+ (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (* (pow alphax 6) (pow sin2phi 3)))) (+ (* 1/4 (* (pow alphay 2) u0)) (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (* (pow alphax 4) (pow sin2phi 2)))) (+ (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (* 1/3 (pow alphay 2))))))))) sin2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (+ (* -1 (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) sin2phi))) (* (pow alphay 2) u0)) sin2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* (pow alphay 2) u0) (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (* (pow alphax 6) (pow sin2phi 3)))) (* (pow alphay 2) u0)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) (* 1/3 (pow alphay 2))) sin2phi)))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (* 1/3 (pow alphay 2))) (* 1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 3)))) (* 1/3 (pow alphay 2))) (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (* 1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))))) sin2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) (* 1/2 (pow alphay 2))) sin2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (* 1/2 (pow alphay 2))) (* 1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 3)))) (* 1/2 (pow alphay 2))) (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (* 1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))))) sin2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (+ (* -1 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) (pow alphay 2)) sin2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2))) (pow alphay 2)) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 3)))) (pow alphay 2)) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) #s(hole binary32 (* sin2phi (+ 1 (/ (* (pow alphay 2) cos2phi) (* (pow alphax 2) sin2phi))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) sin2phi))) (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (+ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) (pow sin2phi 3)))) (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi))) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) sin2phi))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (pow alphax 2))) sin2phi)) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) sin2phi))) (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (pow alphax 4))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (pow alphax 2))) sin2phi)) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4)))) sin2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))))) sin2phi)) (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6)))) sin2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) sin2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))))) sin2phi)) (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) sin2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2)))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) sin2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4)))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) sin2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2)))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))) sin2phi))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2)))))) sin2phi)) (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))) sin2phi))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4)))))) sin2phi)) (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi)) (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))) sin2phi))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6)))))) sin2phi)) (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) sin2phi)) (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi)) (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))) sin2phi))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))) sin2phi))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2)))) sin2phi)) (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))) sin2phi))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4)))) sin2phi)) (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))) sin2phi)) (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))) sin2phi))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6)))) sin2phi)) (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))) sin2phi)) (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))) sin2phi)) (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))) sin2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphay 2) u0)) (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) sin2phi))) sin2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphay 2) u0)) (* -1 (/ (- (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (* (pow alphax 4) sin2phi)) (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))) sin2phi))) sin2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphay 2) u0)) (* -1 (/ (- (* -1 (/ (- (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (* (pow alphax 6) sin2phi)) (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))) sin2phi))) sin2phi))))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1/3 (pow alphay 2)) (* 1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)))) sin2phi))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) sin2phi))) (* 1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) (* -1/3 (pow alphay 2))) sin2phi))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (* 1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) sin2phi))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4)))) sin2phi)) (* 1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) (* -1/3 (pow alphay 2))) sin2phi))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (pow alphay 2)) (* 1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)))) sin2phi))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) sin2phi))) (* 1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) (* -1/2 (pow alphay 2))) sin2phi))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (* 1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) sin2phi))) (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4)))) sin2phi)) (* 1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) (* -1/2 (pow alphay 2))) sin2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (pow alphay 2)) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) sin2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) sin2phi)) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (* -1 (pow alphay 2))) sin2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) sin2phi)) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) sin2phi)) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (* -1 (pow alphay 2))) sin2phi))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ (* (pow alphay 2) cos2phi) (* (pow alphax 2) sin2phi))) 1)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) sin2phi))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* -1 (/ (- (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphax 2))) sin2phi))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* -1 (/ (- (* -1 (/ (- (/ (* (pow alphay 8) (* (pow cos2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) sin2phi)) (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphax 4))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphax 2))) sin2phi))) sin2phi))))
Calls

15 calls:

TimeVariablePointExpression
45.0ms
alphax
@0
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (/ sin2phi (* alphay alphay)) sin2phi (* alphay alphay) alphay (/ cos2phi (* alphax alphax)) cos2phi (* alphax alphax) alphax (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) 1/3 (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) 1/2 (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) 1 (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/ (log (- 1 u0)) cos2phi) (log (- 1 u0)) (- 1 u0) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* 1/2 u0) 1) u0) (+ (* 1/2 u0) 1) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (log (- 1 (* u0 u0))) (- 1 (* u0 u0)) (* u0 u0) (log (+ 1 u0)) (+ 1 u0))
25.0ms
cos2phi
@inf
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (/ sin2phi (* alphay alphay)) sin2phi (* alphay alphay) alphay (/ cos2phi (* alphax alphax)) cos2phi (* alphax alphax) alphax (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) 1/3 (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) 1/2 (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) 1 (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/ (log (- 1 u0)) cos2phi) (log (- 1 u0)) (- 1 u0) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* 1/2 u0) 1) u0) (+ (* 1/2 u0) 1) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (log (- 1 (* u0 u0))) (- 1 (* u0 u0)) (* u0 u0) (log (+ 1 u0)) (+ 1 u0))
23.0ms
cos2phi
@-inf
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (/ sin2phi (* alphay alphay)) sin2phi (* alphay alphay) alphay (/ cos2phi (* alphax alphax)) cos2phi (* alphax alphax) alphax (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) 1/3 (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) 1/2 (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) 1 (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/ (log (- 1 u0)) cos2phi) (log (- 1 u0)) (- 1 u0) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* 1/2 u0) 1) u0) (+ (* 1/2 u0) 1) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (log (- 1 (* u0 u0))) (- 1 (* u0 u0)) (* u0 u0) (log (+ 1 u0)) (+ 1 u0))
21.0ms
alphax
@inf
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (/ sin2phi (* alphay alphay)) sin2phi (* alphay alphay) alphay (/ cos2phi (* alphax alphax)) cos2phi (* alphax alphax) alphax (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) 1/3 (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) 1/2 (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) 1 (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/ (log (- 1 u0)) cos2phi) (log (- 1 u0)) (- 1 u0) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* 1/2 u0) 1) u0) (+ (* 1/2 u0) 1) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (log (- 1 (* u0 u0))) (- 1 (* u0 u0)) (* u0 u0) (log (+ 1 u0)) (+ 1 u0))
14.0ms
cos2phi
@0
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (/ sin2phi (* alphay alphay)) sin2phi (* alphay alphay) alphay (/ cos2phi (* alphax alphax)) cos2phi (* alphax alphax) alphax (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) 1/3 (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) 1/2 (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) 1 (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/ (log (- 1 u0)) cos2phi) (log (- 1 u0)) (- 1 u0) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* 1/2 u0) 1) u0) (+ (* 1/2 u0) 1) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (log (- 1 (* u0 u0))) (- 1 (* u0 u0)) (* u0 u0) (log (+ 1 u0)) (+ 1 u0))

rewrite384.0ms (6.9%)

Memory
-5.7MiB live, 460.8MiB allocated; 48ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0336644542
0344243723
01374042245
Stop Event
iter-limit
node-limit
iter-limit
Counts
613 → 659
Calls
Call 1
Inputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
(*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0)
(fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
(fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
(fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
#s(literal 1/4 binary32)
(/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))
u0
(+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))
(/.f32 sin2phi (*.f32 alphay alphay))
sin2phi
(*.f32 alphay alphay)
alphay
(/.f32 cos2phi (*.f32 alphax alphax))
cos2phi
(*.f32 alphax alphax)
alphax
(/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))
#s(literal 1/3 binary32)
(/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))
#s(literal 1/2 binary32)
(/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))
#s(literal 1 binary32)
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
(neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi)))
(*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))
(/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi)
(log.f32 (-.f32 #s(literal 1 binary32) u0))
(-.f32 #s(literal 1 binary32) u0)
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0))
(*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)
(fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32))
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)))
(/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))
(fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi)
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0))))
(-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))
(log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))
(-.f32 #s(literal 1 binary32) (*.f32 u0 u0))
(*.f32 u0 u0)
(log.f32 (+.f32 #s(literal 1 binary32) u0))
(+.f32 #s(literal 1 binary32) u0)
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (/ (* (pow alphax 2) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (* (pow alphax 2) (+ (* -1 (/ (* (pow alphax 2) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* sin2phi (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (* (pow alphax 2) (+ (* (pow alphax 2) (+ (* -1 (/ (* (pow sin2phi 2) (log (- 1 u0))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 2) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))) (/ (* sin2phi (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))) (* (pow alphax 2) (* u0 (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))) (* (pow alphax 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (* (pow alphax 2) (* u0 (- (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))) (* (pow alphax 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (* (pow alphax 2) (+ (* u0 (- (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))) (* (pow alphax 2) (* u0 (- (* u0 (+ (* -1/2 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow sin2phi 3) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4))))))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (+ (* (pow alphax 2) (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (+ (* (pow alphax 2) (- (+ (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (* (pow alphax 2) (- (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (+ (* (pow alphax 2) (- (+ (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (* (pow alphax 2) (- (+ (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* (pow alphax 2) (- (* u0 (+ (* -1/2 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow sin2phi 3) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* 1/2 (/ 1 cos2phi)) (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* (pow alphax 2) (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* 1/2 (/ 1 cos2phi)) (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* (pow alphax 2) (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (+ (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))) (* (pow alphax 2) (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3))))))))))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* 1/2 (/ 1 cos2phi)) (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* (pow alphax 2) (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (+ (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))) (* (pow alphax 2) (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (+ (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))) (* (pow alphax 2) (+ (* -1/2 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow sin2phi 3) u0) (* (pow alphay 6) (pow cos2phi 4)))))))))))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* 1/4 (/ u0 cos2phi)) (+ (* 1/3 (/ 1 cos2phi)) (* (pow alphax 2) (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* 1/4 (/ u0 cos2phi)) (+ (* 1/3 (/ 1 cos2phi)) (* (pow alphax 2) (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (+ (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))) (* (pow alphax 2) (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3))))))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* 1/4 (/ u0 cos2phi)) (+ (* 1/3 (/ 1 cos2phi)) (* (pow alphax 2) (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (+ (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))) (* (pow alphax 2) (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (+ (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* (pow alphax 2) (+ (* -1/3 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow sin2phi 3) u0) (* (pow alphay 6) (pow cos2phi 4)))))))))))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (* (pow alphax 2) u0) cos2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (* (pow alphax 2) (* sin2phi u0)) (* (pow alphay 2) (pow cos2phi 2)))) (/ u0 cos2phi)))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* (pow alphax 2) (- (/ (* (pow alphax 2) (* (pow sin2phi 2) u0)) (* (pow alphay 4) (pow cos2phi 3))) (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2))))) (/ u0 cos2phi)))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* (pow alphax 2) (- (* (pow alphax 2) (- (* -1 (/ (* (pow alphax 2) (* (pow sin2phi 3) u0)) (* (pow alphay 6) (pow cos2phi 4)))) (* -1 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))))) (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2))))) (/ u0 cos2phi)))))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (/ cos2phi (* alphax alphax)) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (* alphax alphax) #s(hole binary32 (pow alphax 2)))
#s(approx alphax #s(hole binary32 alphax))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* 1/3 (/ (pow alphax 2) cos2phi))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1/3 (/ (* (pow alphax 2) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (* 1/3 (/ 1 cos2phi))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* (pow alphax 2) (- (* 1/3 (/ (* (pow alphax 2) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))))) (* 1/3 (/ 1 cos2phi))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* (pow alphax 2) (- (* (pow alphax 2) (- (* -1/3 (/ (* (pow alphax 2) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))) (* 1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))))) (* 1/3 (/ 1 cos2phi))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* 1/2 (/ (pow alphax 2) cos2phi))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1/2 (/ (* (pow alphax 2) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (* 1/2 (/ 1 cos2phi))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* (pow alphax 2) (- (* 1/2 (/ (* (pow alphax 2) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))))) (* 1/2 (/ 1 cos2phi))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* (pow alphax 2) (- (* (pow alphax 2) (- (* -1/2 (/ (* (pow alphax 2) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))) (* 1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))))) (* 1/2 (/ 1 cos2phi))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (pow alphax 2) cos2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (* (pow alphax 2) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (/ 1 cos2phi)))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* (pow alphax 2) (- (/ (* (pow alphax 2) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi)))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphax 2) (+ (* (pow alphax 2) (- (* (pow alphax 2) (- (* -1 (/ (* (pow alphax 2) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4)))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) #s(hole binary32 (/ (* (pow alphay 2) cos2phi) (pow alphax 2))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) #s(hole binary32 (/ (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)) (pow alphax 2))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (- (+ (* -1 (/ (* (pow alphax 2) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) (pow cos2phi 2)))) (/ (log (+ 1 u0)) cos2phi)) (/ (log (- 1 (pow u0 2))) cos2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (- (+ (* (pow alphax 2) (- (/ (* (pow alphax 2) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 3))) (/ (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 2) (pow cos2phi 2))))) (/ (log (+ 1 u0)) cos2phi)) (/ (log (- 1 (pow u0 2))) cos2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (- (+ (* (pow alphax 2) (- (* (pow alphax 2) (- (* -1 (/ (* (pow alphax 2) (* (pow sin2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) (pow cos2phi 4)))) (* -1 (/ (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 4) (pow cos2phi 3)))))) (/ (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 2) (pow cos2phi 2))))) (/ (log (+ 1 u0)) cos2phi)) (/ (log (- 1 (pow u0 2))) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (+ (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2))) (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2)))) (pow alphax 2)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2)))) (pow alphax 2)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))) (pow alphax 4))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2)))) (pow alphax 2)) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow sin2phi 4))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4)))) (pow alphax 6)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))) (pow alphax 4)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (pow alphax 2)) (/ (pow alphay 2) sin2phi))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (pow alphax 2)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (pow alphax 4)) (/ (pow alphay 2) sin2phi)))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (pow alphax 2)) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow sin2phi 4))))))) (pow alphax 6)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (pow alphax 4)) (/ (pow alphay 2) sin2phi))))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (+ (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2))) (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (+ (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))) (/ (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))) (pow alphax 2)))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (+ (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))) (pow alphax 2)) (/ (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))) (pow alphax 4)))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4)))) (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (+ (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))) (pow alphax 2)) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow sin2phi 4))))) (pow alphax 6)) (/ (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))) (pow alphax 4)))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (* (pow alphax 4) (pow sin2phi 3)))) (+ (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 2) sin2phi)))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4)))) (+ (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (* (pow alphax 6) (pow sin2phi 4)))) (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (* (pow alphax 4) (pow sin2phi 3)))) (+ (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 2) sin2phi)))))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (* (pow alphay 2) u0) sin2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) (pow sin2phi 2)))) (/ (* (pow alphay 2) u0) sin2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (/ (* (pow alphay 2) u0) sin2phi) (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (* (pow alphax 6) (pow sin2phi 4)))) (/ (* (pow alphay 2) u0) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* 1/3 (/ (pow alphay 2) sin2phi))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (* 1/3 (/ (pow alphay 2) sin2phi)))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 2) sin2phi))) (* 1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4)))) (* 1/3 (/ (pow alphay 2) sin2phi))) (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* 1/2 (/ (pow alphay 2) sin2phi))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (* 1/2 (/ (pow alphay 2) sin2phi)))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/2 (/ (pow alphay 2) sin2phi))) (* 1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4)))) (* 1/2 (/ (pow alphay 2) sin2phi))) (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (pow alphay 2) sin2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (/ (pow alphay 2) sin2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3))) (/ (pow alphay 2) sin2phi)) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4)))) (/ (pow alphay 2) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) #s(hole binary32 sin2phi))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) #s(hole binary32 (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) (pow sin2phi 2)))) (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi) (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) (pow sin2phi 4)))) (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (/ (* (pow alphay 2) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (* (pow alphay 2) (+ (* -1 (/ (* (pow alphay 2) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* cos2phi (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (* (pow alphay 2) (+ (* (pow alphay 2) (+ (* -1 (/ (* (pow cos2phi 2) (log (- 1 u0))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 2) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))) (/ (* cos2phi (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (* (pow alphay 2) (* u0 (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (* (pow alphay 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (* (pow alphay 2) (* u0 (- (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (* (pow alphay 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (* (pow alphay 2) (+ (* u0 (- (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))) (* (pow alphay 2) (* u0 (- (* u0 (+ (* -1/2 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow cos2phi 3) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4))))))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (+ (* (pow alphay 2) (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (+ (* (pow alphay 2) (- (+ (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (* (pow alphay 2) (- (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (+ (* (pow alphay 2) (- (+ (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (* (pow alphay 2) (- (+ (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* (pow alphay 2) (- (* u0 (+ (* -1/2 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow cos2phi 3) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* 1/2 (/ 1 sin2phi)) (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* (pow alphay 2) (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* 1/2 (/ 1 sin2phi)) (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* (pow alphay 2) (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (+ (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))) (* (pow alphay 2) (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3))))))))))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* 1/2 (/ 1 sin2phi)) (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* (pow alphay 2) (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (+ (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))) (* (pow alphay 2) (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (+ (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))) (* (pow alphay 2) (+ (* -1/2 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow cos2phi 3) u0) (* (pow alphax 6) (pow sin2phi 4)))))))))))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* 1/4 (/ u0 sin2phi)) (+ (* 1/3 (/ 1 sin2phi)) (* (pow alphay 2) (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* 1/4 (/ u0 sin2phi)) (+ (* 1/3 (/ 1 sin2phi)) (* (pow alphay 2) (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (+ (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))) (* (pow alphay 2) (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3))))))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* 1/4 (/ u0 sin2phi)) (+ (* 1/3 (/ 1 sin2phi)) (* (pow alphay 2) (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (+ (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))) (* (pow alphay 2) (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (+ (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* (pow alphay 2) (+ (* -1/3 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow cos2phi 3) u0) (* (pow alphax 6) (pow sin2phi 4)))))))))))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (* (pow alphay 2) (* cos2phi u0)) (* (pow alphax 2) (pow sin2phi 2)))) (/ u0 sin2phi)))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* (pow alphay 2) (- (/ (* (pow alphay 2) (* (pow cos2phi 2) u0)) (* (pow alphax 4) (pow sin2phi 3))) (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2))))) (/ u0 sin2phi)))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* (pow alphay 2) (- (* (pow alphay 2) (- (* -1 (/ (* (pow alphay 2) (* (pow cos2phi 3) u0)) (* (pow alphax 6) (pow sin2phi 4)))) (* -1 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))))) (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2))))) (/ u0 sin2phi)))))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (/ sin2phi (* alphay alphay)) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (* alphay alphay) #s(hole binary32 (pow alphay 2)))
#s(approx alphay #s(hole binary32 alphay))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1/3 (/ (* (pow alphay 2) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (* 1/3 (/ 1 sin2phi))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* (pow alphay 2) (- (* 1/3 (/ (* (pow alphay 2) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))))) (* 1/3 (/ 1 sin2phi))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* (pow alphay 2) (- (* (pow alphay 2) (- (* -1/3 (/ (* (pow alphay 2) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))) (* 1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))))) (* 1/3 (/ 1 sin2phi))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1/2 (/ (* (pow alphay 2) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (* 1/2 (/ 1 sin2phi))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* (pow alphay 2) (- (* 1/2 (/ (* (pow alphay 2) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))))) (* 1/2 (/ 1 sin2phi))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* (pow alphay 2) (- (* (pow alphay 2) (- (* -1/2 (/ (* (pow alphay 2) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))) (* 1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))))) (* 1/2 (/ 1 sin2phi))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (* (pow alphay 2) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))) (/ 1 sin2phi)))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* (pow alphay 2) (- (/ (* (pow alphay 2) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi)))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* (pow alphay 2) (+ (* (pow alphay 2) (- (* (pow alphay 2) (- (* -1 (/ (* (pow alphay 2) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4)))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi)))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (- (+ (* -1 (/ (* (pow alphay 2) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) (pow sin2phi 2)))) (/ (log (+ 1 u0)) sin2phi)) (/ (log (- 1 (pow u0 2))) sin2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (- (+ (* (pow alphay 2) (- (/ (* (pow alphay 2) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 3))) (/ (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 2) (pow sin2phi 2))))) (/ (log (+ 1 u0)) sin2phi)) (/ (log (- 1 (pow u0 2))) sin2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (- (+ (* (pow alphay 2) (- (* (pow alphay 2) (- (* -1 (/ (* (pow alphay 2) (* (pow cos2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) (pow sin2phi 4)))) (* -1 (/ (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 4) (pow sin2phi 3)))))) (/ (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 2) (pow sin2phi 2))))) (/ (log (+ 1 u0)) sin2phi)) (/ (log (- 1 (pow u0 2))) sin2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (+ (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2))) (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2)))) (pow alphay 2)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2)))) (pow alphay 2)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))) (pow alphay 4))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2)))) (pow alphay 2)) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow cos2phi 4))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4)))) (pow alphay 6)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))) (pow alphay 4)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (pow alphay 2)) (/ (pow alphax 2) cos2phi))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (pow alphay 2)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (pow alphay 4)) (/ (pow alphax 2) cos2phi)))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (pow alphay 2)) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow cos2phi 4))))))) (pow alphay 6)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (pow alphay 4)) (/ (pow alphax 2) cos2phi))))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (+ (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2))) (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (+ (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))) (/ (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))) (pow alphay 2)))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (+ (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))) (pow alphay 2)) (/ (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))) (pow alphay 4)))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4)))) (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (+ (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))) (pow alphay 2)) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow cos2phi 4))))) (pow alphay 6)) (/ (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))) (pow alphay 4)))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (* (pow alphay 4) (pow cos2phi 3)))) (+ (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 2) cos2phi)))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4)))) (+ (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (* (pow alphay 6) (pow cos2phi 4)))) (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (* (pow alphay 4) (pow cos2phi 3)))) (+ (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 2) cos2phi)))))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) (pow cos2phi 2)))) (/ (* (pow alphax 2) u0) cos2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (/ (* (pow alphax 2) u0) cos2phi) (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (* (pow alphay 6) (pow cos2phi 4)))) (/ (* (pow alphax 2) u0) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (* 1/3 (/ (pow alphax 2) cos2phi)))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 2) cos2phi))) (* 1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4)))) (* 1/3 (/ (pow alphax 2) cos2phi))) (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (* 1/2 (/ (pow alphax 2) cos2phi)))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/2 (/ (pow alphax 2) cos2phi))) (* 1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4)))) (* 1/2 (/ (pow alphax 2) cos2phi))) (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))) (/ (pow alphax 2) cos2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3))) (/ (pow alphax 2) cos2phi)) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4)))) (/ (pow alphax 2) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) #s(hole binary32 (* (pow alphay 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) (pow cos2phi 2)))) (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi) (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) (pow cos2phi 4)))) (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ 1/2 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ 1/3 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx u0 #s(hole binary32 u0))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (/ (* (pow alphax 2) u0) cos2phi)))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* u0 (- (* 1/2 (/ (* (pow alphax 2) u0) cos2phi)) (* -1 (/ (pow alphax 2) cos2phi))))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* u0 (- (* u0 (- (* 1/3 (/ (* (pow alphax 2) u0) cos2phi)) (* -1/2 (/ (pow alphax 2) cos2phi)))) (* -1 (/ (pow alphax 2) cos2phi))))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* u0 (- (* u0 (- (* u0 (- (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* -1/3 (/ (pow alphax 2) cos2phi)))) (* -1/2 (/ (pow alphax 2) cos2phi)))) (* -1 (/ (pow alphax 2) cos2phi))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* -1 (/ (* (pow alphax 2) u0) cos2phi))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* u0 (+ (* -1 (/ (pow alphax 2) cos2phi)) (* -1/2 (/ (* (pow alphax 2) u0) cos2phi))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* u0 (+ (* -1 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* -1/2 (/ (pow alphax 2) cos2phi)) (* -1/3 (/ (* (pow alphax 2) u0) cos2phi))))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* u0 (+ (* -1 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* -1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* -1/3 (/ (pow alphax 2) cos2phi)) (* -1/4 (/ (* (pow alphax 2) u0) cos2phi))))))))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* -1 (/ u0 cos2phi))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* u0 (- (* u0 (- (* -1/3 (/ u0 cos2phi)) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* u0 (- (* u0 (- (* u0 (- (* -1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* -1 u0)))
#s(approx (log (- 1 u0)) #s(hole binary32 (* u0 (- (* -1/2 u0) 1))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* u0 (- (* u0 (- (* u0 (- (* -1/4 u0) 1/3)) 1/2)) 1))))
#s(approx (- 1 u0) #s(hole binary32 1))
#s(approx (- 1 u0) #s(hole binary32 (+ 1 (* -1 u0))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 u0))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* 1/3 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))))))))
#s(approx (* (+ (* 1/2 u0) 1) u0) #s(hole binary32 u0))
#s(approx (* (+ (* 1/2 u0) 1) u0) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (+ (* 1/2 u0) 1) #s(hole binary32 1))
#s(approx (+ (* 1/2 u0) 1) #s(hole binary32 (+ 1 (* 1/2 u0))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 u0))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* 1/3 u0)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (* -1 u0)))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (* u0 (- (* -1/2 u0) 1))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (* u0 (- (* u0 (- (* u0 (- (* -1/4 u0) 1/3)) 1/2)) 1))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (* -1 (pow u0 2))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (* (pow u0 2) (- (* -1/2 (pow u0 2)) 1))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (* (pow u0 2) (- (* (pow u0 2) (- (* -1/3 (pow u0 2)) 1/2)) 1))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (* (pow u0 2) (- (* (pow u0 2) (- (* (pow u0 2) (- (* -1/4 (pow u0 2)) 1/3)) 1/2)) 1))))
#s(approx (- 1 (* u0 u0)) #s(hole binary32 1))
#s(approx (- 1 (* u0 u0)) #s(hole binary32 (+ 1 (* -1 (pow u0 2)))))
#s(approx (* u0 u0) #s(hole binary32 (pow u0 2)))
#s(approx (log (+ 1 u0)) #s(hole binary32 u0))
#s(approx (log (+ 1 u0)) #s(hole binary32 (* u0 (+ 1 (* -1/2 u0)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (* u0 (+ 1 (* u0 (- (* 1/3 u0) 1/2))))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (* u0 (+ 1 (* u0 (- (* u0 (+ 1/3 (* -1/4 u0))) 1/2))))))
#s(approx (+ 1 u0) #s(hole binary32 1))
#s(approx (+ 1 u0) #s(hole binary32 (+ 1 u0)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/3 (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* 1/4 (/ (pow u0 4) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (+ (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* 1/4 (/ (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (+ (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* 1/4 (/ (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 2) (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 2) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* u0 (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (/ (pow alphax 2) (* cos2phi u0)) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (* 1/2 (/ (pow alphax 2) (* cos2phi (pow u0 2)))) (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (* 1/3 (/ (pow alphax 2) (* cos2phi (pow u0 3)))) (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (+ (* -1/2 (/ (pow alphax 2) (* cos2phi (pow u0 2)))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi)))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (+ (* -1/2 (/ (pow alphax 2) (* cos2phi (pow u0 2)))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (+ (* -1/2 (/ (pow alphax 2) (* cos2phi (pow u0 2)))) (+ (* -1/3 (/ (pow alphax 2) (* cos2phi (pow u0 3)))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) cos2phi)))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) cos2phi)) (/ (log -1) cos2phi)) (/ 1 (* cos2phi u0)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (+ (* -1 (/ (log (/ 1 u0)) cos2phi)) (+ (* -1 (/ (+ (/ 1 cos2phi) (* 1/2 (/ 1 (* cos2phi u0)))) u0)) (/ (log -1) cos2phi)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) cos2phi)) (+ (* -1 (/ (+ (* 1/2 (/ 1 cos2phi)) (* 1/3 (/ 1 (* cos2phi u0)))) (pow u0 2))) (/ (log -1) cos2phi))) (/ 1 (* cos2phi u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (log -1) (* -1 (log (/ 1 u0))))))
#s(approx (log (- 1 u0)) #s(hole binary32 (- (+ (log -1) (* -1 (log (/ 1 u0)))) (/ 1 u0))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (log -1) (+ (* -1 (log (/ 1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0))))))
#s(approx (log (- 1 u0)) #s(hole binary32 (- (+ (log -1) (+ (* -1 (log (/ 1 u0))) (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) (pow u0 2))))) (/ 1 u0))))
#s(approx (- 1 u0) #s(hole binary32 (* -1 u0)))
#s(approx (- 1 u0) #s(hole binary32 (* u0 (- (/ 1 u0) 1))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* -1 (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (/ 1 u0) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (/ 1 u0)) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (+ (/ 1 u0) (* 1/3 (/ 1 (pow u0 3))))) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (* (+ (* 1/2 u0) 1) u0) #s(hole binary32 (* 1/2 (pow u0 2))))
#s(approx (* (+ (* 1/2 u0) 1) u0) #s(hole binary32 (* (pow u0 2) (+ 1/2 (/ 1 u0)))))
#s(approx (+ (* 1/2 u0) 1) #s(hole binary32 (* 1/2 u0)))
#s(approx (+ (* 1/2 u0) 1) #s(hole binary32 (* u0 (+ 1/2 (/ 1 u0)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (* -1 (log (/ 1 u0))) (+ (log -1) (* -2 (log (/ 1 u0))))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (+ (* -2 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log -1) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (+ (* -2 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log -1) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/3 (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))) (+ (* -2 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log -1) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (* -1 (log (/ 1 u0))) (+ (log -1) (* -2 (log (/ 1 u0)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (/ 1 u0)) (+ (log -1) (* -2 (log (/ 1 u0)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (+ (/ 1/2 (pow u0 2)) (/ 1 u0))) (+ (log -1) (* -2 (log (/ 1 u0)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (+ (/ 1/2 (pow u0 2)) (+ (/ 1 u0) (* 1/3 (/ 1 (pow u0 3)))))) (+ (log -1) (* -2 (log (/ 1 u0)))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (log -1) (* -2 (log (/ 1 u0)))) (* -1 (log (/ 1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (log -1) (* -2 (log (/ 1 u0)))) (+ (* -1 (log (/ 1 u0))) (/ 1 u0)))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (log -1) (+ (* -2 (log (/ 1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0)))) (* -1 (log (/ 1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (log -1) (+ (* -2 (log (/ 1 u0))) (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) (pow u0 2))))) (+ (* -1 (log (/ 1 u0))) (/ 1 u0)))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (+ (log -1) (* -2 (log (/ 1 u0))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (- (+ (log -1) (* -2 (log (/ 1 u0)))) (/ 1 (pow u0 2)))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (+ (log -1) (+ (* -2 (log (/ 1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 (pow u0 2)))) (pow u0 2)))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (- (+ (log -1) (+ (* -2 (log (/ 1 u0))) (* -1 (/ (+ 1/2 (* 1/3 (/ 1 (pow u0 2)))) (pow u0 4))))) (/ 1 (pow u0 2)))))
#s(approx (- 1 (* u0 u0)) #s(hole binary32 (* -1 (pow u0 2))))
#s(approx (- 1 (* u0 u0)) #s(hole binary32 (* (pow u0 2) (- (/ 1 (pow u0 2)) 1))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (* -1 (log (/ 1 u0)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (* -1 (log (/ 1 u0))) (/ 1 u0))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (/ 1 u0)) (/ 1/2 (pow u0 2)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (+ (/ 1 u0) (* 1/3 (/ 1 (pow u0 3))))) (/ 1/2 (pow u0 2)))))
#s(approx (+ 1 u0) #s(hole binary32 u0))
#s(approx (+ 1 u0) #s(hole binary32 (* u0 (+ 1 (/ 1 u0)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (- (* -1 (/ (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) u0)) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (* -1 (/ (- (* -1 (/ (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ (* 1/2 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ (/ 1/2 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) u0)) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* u0 (+ (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (/ (pow alphax 2) (* cos2phi u0)) (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (* -1 (/ (- (* -1/2 (/ (pow alphax 2) (* cos2phi u0))) (/ (pow alphax 2) cos2phi)) u0)) (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (* -1 (/ (- (* -1 (/ (- (* 1/3 (/ (pow alphax 2) (* cos2phi u0))) (* -1/2 (/ (pow alphax 2) cos2phi))) u0)) (/ (pow alphax 2) cos2phi)) u0)) (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)) (* -1 (/ (pow alphax 2) (* cos2phi u0))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)) (* -1 (/ (+ (* 1/2 (/ (pow alphax 2) (* cos2phi u0))) (/ (pow alphax 2) cos2phi)) u0)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (pow alphax 2) cos2phi)) (* -1/3 (/ (pow alphax 2) (* cos2phi u0)))) u0)) (/ (pow alphax 2) cos2phi)) u0)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* -1 (/ (log (/ -1 u0)) cos2phi))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (- (* -1 (/ (log (/ -1 u0)) cos2phi)) (/ 1 (* cos2phi u0)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (+ (* -1 (/ (log (/ -1 u0)) cos2phi)) (* -1 (/ (+ (/ 1 cos2phi) (* 1/2 (/ 1 (* cos2phi u0)))) u0)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (+ (* -1 (/ (log (/ -1 u0)) cos2phi)) (* -1 (/ (+ (/ 1/3 (* cos2phi (pow u0 2))) (+ (/ 1/2 (* cos2phi u0)) (/ 1 cos2phi))) u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* -1 (log (/ -1 u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (- (* -1 (log (/ -1 u0))) (/ 1 u0))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (* -1 (log (/ -1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (* -1 (log (/ -1 u0))) (* -1 (/ (+ 1 (+ (/ 1/3 (pow u0 2)) (* 1/2 (/ 1 u0)))) u0)))))
#s(approx (- 1 u0) #s(hole binary32 (* -1 (* u0 (- 1 (/ 1 u0))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (log (/ -1 u0))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (/ 1 u0) (* -1 (log (/ -1 u0))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (/ 1 u0)) (* -1 (log (/ -1 u0))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (* -1 (/ (- (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) u0)) 1) u0)) (* -1 (log (/ -1 u0))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (* -1 (log (/ -1 u0))) (* -2 (log (/ -1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* -2 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* -2 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* -1 (/ (- (* -1 (/ (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) u0))) (* -2 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (* -1 (log (/ -1 u0))) (* -2 (log (/ -1 u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ -1 u0))) (/ 1 u0)) (* -2 (log (/ -1 u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ -1 u0))) (+ (/ 1/2 (pow u0 2)) (/ 1 u0))) (* -2 (log (/ -1 u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ -1 u0))) (* -1 (/ (- (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) u0)) 1) u0))) (* -2 (log (/ -1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (* -2 (log (/ -1 u0))) (* -1 (log (/ -1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (* -2 (log (/ -1 u0))) (+ (* -1 (log (/ -1 u0))) (/ 1 u0)))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (* -2 (log (/ -1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0))) (* -1 (log (/ -1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (* -2 (log (/ -1 u0))) (* -1 (/ (+ 1 (+ (/ 1/3 (pow u0 2)) (* 1/2 (/ 1 u0)))) u0))) (* -1 (log (/ -1 u0))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (+ (log -1) (* -2 (log (/ -1 u0))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (- (+ (log -1) (* -2 (log (/ -1 u0)))) (/ 1 (pow u0 2)))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (+ (log -1) (+ (* -2 (log (/ -1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 (pow u0 2)))) (pow u0 2)))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (- (+ (log -1) (+ (* -2 (log (/ -1 u0))) (* -1 (/ (+ 1/2 (* 1/3 (/ 1 (pow u0 2)))) (pow u0 4))))) (/ 1 (pow u0 2)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (log -1) (* -1 (log (/ -1 u0))))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (log -1) (+ (* -1 (log (/ -1 u0))) (/ 1 u0)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (log -1) (+ (* -1 (log (/ -1 u0))) (* -1 (/ (- (* 1/2 (/ 1 u0)) 1) u0))))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (log -1) (+ (* -1 (log (/ -1 u0))) (* -1 (/ (- (* -1 (/ (- (* 1/3 (/ 1 u0)) 1/2) u0)) 1) u0))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (* cos2phi (+ (* -1 (/ (* (pow alphay 6) (* cos2phi (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (* cos2phi (+ (* cos2phi (+ (* -1 (/ (* (pow alphay 6) (log (- 1 u0))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 8) (* cos2phi (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))) (/ (* (pow alphay 4) (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* cos2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* cos2phi (+ (* cos2phi (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* cos2phi (+ (* cos2phi (+ (* cos2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow alphay 8) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))))) (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* cos2phi (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* cos2phi (- (+ (* cos2phi (- (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* cos2phi (- (+ (* cos2phi (- (+ (* cos2phi (- (* u0 (+ (* -1/2 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow alphay 8) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4))))) (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3))))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (+ (* cos2phi (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (+ (* cos2phi (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* cos2phi (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))))))) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (+ (* cos2phi (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* cos2phi (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (+ (* cos2phi (+ (* -1/2 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow alphay 8) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3))))))))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))))))) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (+ (* 1/3 (/ (pow alphay 2) sin2phi)) (* cos2phi (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (+ (* 1/3 (/ (pow alphay 2) sin2phi)) (* cos2phi (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))) (* cos2phi (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (+ (* 1/3 (/ (pow alphay 2) sin2phi)) (* cos2phi (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (+ (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))) (* cos2phi (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (+ (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* cos2phi (+ (* -1/3 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow alphay 8) u0) (* (pow alphax 6) (pow sin2phi 4))))))))))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* cos2phi (- (/ (* (pow alphay 6) (* cos2phi u0)) (* (pow alphax 4) (pow sin2phi 3))) (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))) (/ (* (pow alphay 2) u0) sin2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* cos2phi (- (* cos2phi (- (* -1 (/ (* (pow alphay 8) (* cos2phi u0)) (* (pow alphax 6) (pow sin2phi 4)))) (* -1 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))))) (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))) (/ (* (pow alphay 2) u0) sin2phi))))
#s(approx cos2phi #s(hole binary32 cos2phi))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* 1/3 (/ (pow alphay 2) sin2phi)) (* cos2phi (- (* 1/3 (/ (* (pow alphay 6) cos2phi) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* 1/3 (/ (pow alphay 2) sin2phi)) (* cos2phi (- (* cos2phi (- (* -1/3 (/ (* (pow alphay 8) cos2phi) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))) (* 1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* cos2phi (- (* 1/2 (/ (* (pow alphay 6) cos2phi) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* cos2phi (- (* cos2phi (- (* -1/2 (/ (* (pow alphay 8) cos2phi) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))) (* 1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* cos2phi (- (/ (* (pow alphay 6) cos2phi) (* (pow alphax 4) (pow sin2phi 3))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (/ (pow alphay 2) sin2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* cos2phi (- (* cos2phi (- (* -1 (/ (* (pow alphay 8) cos2phi) (* (pow alphax 6) (pow sin2phi 4)))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (/ (pow alphay 2) sin2phi))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (/ (log (- 1 u0)) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* cos2phi (- (/ (* (pow alphay 6) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 3))) (/ (* (pow alphay 4) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 2) (pow sin2phi 2))))) (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* cos2phi (- (* cos2phi (- (* -1 (/ (* (pow alphay 8) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) (pow sin2phi 4)))) (* -1 (/ (* (pow alphay 6) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 4) (pow sin2phi 3)))))) (/ (* (pow alphay 4) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 2) (pow sin2phi 2))))) (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 2)))) (+ (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi)) (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 3)))))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) (pow cos2phi 2)))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6)))) (pow cos2phi 3)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) (pow cos2phi 2))))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2)) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi) (pow alphax 2))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (pow cos2phi 2)) (pow alphax 2)))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (pow cos2phi 3)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (pow cos2phi 2)) (pow alphax 2))))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (+ (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)) (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 3)))))) cos2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2))))) cos2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) (+ (* 1/2 (pow alphax 2)) (+ (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))) (/ (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))) cos2phi)))) cos2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (+ (* 1/2 (pow alphax 2)) (+ (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))) cos2phi) (/ (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) (pow cos2phi 2))))))) cos2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 3)))) (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (+ (* 1/2 (pow alphax 2)) (+ (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))) cos2phi) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))) (pow cos2phi 3)) (/ (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) (pow cos2phi 2))))))))) cos2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2))) cos2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) (+ (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) cos2phi))) (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2))))) cos2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) (+ (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) cos2phi))) (+ (* 1/4 (* (pow alphax 2) u0)) (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (* (pow alphay 4) (pow cos2phi 2)))) (+ (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (* 1/3 (pow alphax 2))))))) cos2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 3)))) (+ (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) cos2phi))) (+ (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (* (pow alphay 6) (pow cos2phi 3)))) (+ (* 1/4 (* (pow alphax 2) u0)) (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (* (pow alphay 4) (pow cos2phi 2)))) (+ (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (* 1/3 (pow alphax 2))))))))) cos2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (+ (* -1 (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) cos2phi))) (* (pow alphax 2) u0)) cos2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* (pow alphax 2) u0) (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (* (pow alphay 6) (pow cos2phi 3)))) (* (pow alphax 2) u0)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) (* 1/3 (pow alphax 2))) cos2phi)))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (* 1/3 (pow alphax 2))) (* 1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 3)))) (* 1/3 (pow alphax 2))) (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (* 1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))))) cos2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) (* 1/2 (pow alphax 2))) cos2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (* 1/2 (pow alphax 2))) (* 1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 3)))) (* 1/2 (pow alphax 2))) (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (* 1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))))) cos2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (+ (* -1 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) (pow alphax 2)) cos2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2))) (pow alphax 2)) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 3)))) (pow alphax 2)) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) #s(hole binary32 (* cos2phi (+ (/ sin2phi cos2phi) (/ (pow alphay 2) (pow alphax 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) cos2phi))) (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (+ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) (pow cos2phi 3)))) (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi))) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) cos2phi))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (pow alphay 2))) cos2phi)) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) cos2phi))) (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (pow alphay 4))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (pow alphay 2))) cos2phi)) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4)))) cos2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))))) cos2phi)) (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6)))) cos2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) cos2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))))) cos2phi)) (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) cos2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2)))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) cos2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4)))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) cos2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2)))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))) cos2phi))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2)))))) cos2phi)) (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))) cos2phi))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4)))))) cos2phi)) (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi)) (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))) cos2phi))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6)))))) cos2phi)) (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) cos2phi)) (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi)) (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))) cos2phi))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))) cos2phi))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2)))) cos2phi)) (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))) cos2phi))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4)))) cos2phi)) (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))) cos2phi)) (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))) cos2phi))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6)))) cos2phi)) (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))) cos2phi)) (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))) cos2phi)) (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))) cos2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphax 2) u0)) (/ (* (pow alphax 4) (* sin2phi u0)) (* (pow alphay 2) cos2phi))) cos2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphax 2) u0)) (* -1 (/ (- (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (* (pow alphay 4) cos2phi)) (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))) cos2phi))) cos2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphax 2) u0)) (* -1 (/ (- (* -1 (/ (- (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (* (pow alphay 6) cos2phi)) (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))) cos2phi))) cos2phi))))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1/3 (pow alphax 2)) (* 1/3 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)))) cos2phi))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) cos2phi))) (* 1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) (* -1/3 (pow alphax 2))) cos2phi))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (* 1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) cos2phi))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4)))) cos2phi)) (* 1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) (* -1/3 (pow alphax 2))) cos2phi))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (pow alphax 2)) (* 1/2 (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)))) cos2phi))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) cos2phi))) (* 1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) (* -1/2 (pow alphax 2))) cos2phi))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (* 1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) cos2phi))) (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4)))) cos2phi)) (* 1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) (* -1/2 (pow alphax 2))) cos2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (pow alphax 2)) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) cos2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) cos2phi)) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (* -1 (pow alphax 2))) cos2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) cos2phi)) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) cos2phi)) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (* -1 (pow alphax 2))) cos2phi))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) #s(hole binary32 (* -1 (* cos2phi (+ (* -1 (/ sin2phi cos2phi)) (* -1 (/ (pow alphay 2) (pow alphax 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) cos2phi))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* -1 (/ (- (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphay 2))) cos2phi))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* -1 (/ (- (* -1 (/ (- (/ (* (pow alphax 8) (* (pow sin2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) cos2phi)) (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphay 4))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphay 2))) cos2phi))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (* sin2phi (+ (* -1 (/ (* (pow alphax 6) (* sin2phi (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (* sin2phi (+ (* sin2phi (+ (* -1 (/ (* (pow alphax 6) (log (- 1 u0))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 8) (* sin2phi (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))) (/ (* (pow alphax 4) (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* sin2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* sin2phi (+ (* sin2phi (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* sin2phi (+ (* sin2phi (+ (* sin2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow alphax 8) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))))) (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* sin2phi (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* sin2phi (- (+ (* sin2phi (- (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* sin2phi (- (+ (* sin2phi (- (+ (* sin2phi (- (* u0 (+ (* -1/2 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow alphax 8) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4))))) (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3))))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (+ (* sin2phi (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (+ (* sin2phi (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* sin2phi (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))))))) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (+ (* sin2phi (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* sin2phi (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (+ (* sin2phi (+ (* -1/2 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow alphax 8) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3))))))))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))))))) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (+ (* 1/3 (/ (pow alphax 2) cos2phi)) (* sin2phi (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (+ (* 1/3 (/ (pow alphax 2) cos2phi)) (* sin2phi (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))) (* sin2phi (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (+ (* 1/3 (/ (pow alphax 2) cos2phi)) (* sin2phi (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (+ (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))) (* sin2phi (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (+ (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* sin2phi (+ (* -1/3 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow alphax 8) u0) (* (pow alphay 6) (pow cos2phi 4))))))))))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* sin2phi (- (/ (* (pow alphax 6) (* sin2phi u0)) (* (pow alphay 4) (pow cos2phi 3))) (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))) (/ (* (pow alphax 2) u0) cos2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* sin2phi (- (* sin2phi (- (* -1 (/ (* (pow alphax 8) (* sin2phi u0)) (* (pow alphay 6) (pow cos2phi 4)))) (* -1 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))))) (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))) (/ (* (pow alphax 2) u0) cos2phi))))
#s(approx sin2phi #s(hole binary32 sin2phi))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* 1/3 (/ (pow alphax 2) cos2phi)) (* sin2phi (- (* 1/3 (/ (* (pow alphax 6) sin2phi) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* 1/3 (/ (pow alphax 2) cos2phi)) (* sin2phi (- (* sin2phi (- (* -1/3 (/ (* (pow alphax 8) sin2phi) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))) (* 1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* sin2phi (- (* 1/2 (/ (* (pow alphax 6) sin2phi) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* sin2phi (- (* sin2phi (- (* -1/2 (/ (* (pow alphax 8) sin2phi) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))) (* 1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* sin2phi (- (/ (* (pow alphax 6) sin2phi) (* (pow alphay 4) (pow cos2phi 3))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (/ (pow alphax 2) cos2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (+ (* sin2phi (- (* sin2phi (- (* -1 (/ (* (pow alphax 8) sin2phi) (* (pow alphay 6) (pow cos2phi 4)))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (/ (pow alphax 2) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* sin2phi (- (/ (* (pow alphax 6) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 3))) (/ (* (pow alphax 4) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 2) (pow cos2phi 2))))) (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* sin2phi (- (* sin2phi (- (* -1 (/ (* (pow alphax 8) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) (pow cos2phi 4)))) (* -1 (/ (* (pow alphax 6) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 4) (pow cos2phi 3)))))) (/ (* (pow alphax 4) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 2) (pow cos2phi 2))))) (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 2)))) (+ (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi)) (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 3)))))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) (pow sin2phi 2)))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6)))) (pow sin2phi 3)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) (pow sin2phi 2))))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2)) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi) (pow alphay 2))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (pow sin2phi 2)) (pow alphay 2)))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (pow sin2phi 3)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (pow sin2phi 2)) (pow alphay 2))))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (+ (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)) (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 3)))))) sin2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2))))) sin2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) (+ (* 1/2 (pow alphay 2)) (+ (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))) (/ (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))) sin2phi)))) sin2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (+ (* 1/2 (pow alphay 2)) (+ (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))) sin2phi) (/ (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) (pow sin2phi 2))))))) sin2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 3)))) (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (+ (* 1/2 (pow alphay 2)) (+ (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))) sin2phi) (+ (/ (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))) (pow sin2phi 3)) (/ (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) (pow sin2phi 2))))))))) sin2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2))) sin2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) (+ (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) sin2phi))) (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2))))) sin2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) (+ (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) sin2phi))) (+ (* 1/4 (* (pow alphay 2) u0)) (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (* (pow alphax 4) (pow sin2phi 2)))) (+ (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (* 1/3 (pow alphay 2))))))) sin2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 3)))) (+ (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) sin2phi))) (+ (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (* (pow alphax 6) (pow sin2phi 3)))) (+ (* 1/4 (* (pow alphay 2) u0)) (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (* (pow alphax 4) (pow sin2phi 2)))) (+ (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (* 1/3 (pow alphay 2))))))))) sin2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (+ (* -1 (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) sin2phi))) (* (pow alphay 2) u0)) sin2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* (pow alphay 2) u0) (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (* (pow alphax 6) (pow sin2phi 3)))) (* (pow alphay 2) u0)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) (* 1/3 (pow alphay 2))) sin2phi)))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (* 1/3 (pow alphay 2))) (* 1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 3)))) (* 1/3 (pow alphay 2))) (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (* 1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))))) sin2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) (* 1/2 (pow alphay 2))) sin2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (* 1/2 (pow alphay 2))) (* 1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 3)))) (* 1/2 (pow alphay 2))) (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (* 1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))))) sin2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (+ (* -1 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) (pow alphay 2)) sin2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2))) (pow alphay 2)) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 3)))) (pow alphay 2)) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) #s(hole binary32 (* sin2phi (+ 1 (/ (* (pow alphay 2) cos2phi) (* (pow alphax 2) sin2phi))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) sin2phi))) (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (+ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) (pow sin2phi 3)))) (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi))) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) sin2phi))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (pow alphax 2))) sin2phi)) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) sin2phi))) (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (pow alphax 4))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (pow alphax 2))) sin2phi)) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4)))) sin2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))))) sin2phi)) (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6)))) sin2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) sin2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))))) sin2phi)) (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) sin2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2)))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) sin2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4)))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) sin2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2)))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))) sin2phi))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2)))))) sin2phi)) (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))) sin2phi))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4)))))) sin2phi)) (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi)) (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))) sin2phi))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6)))))) sin2phi)) (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) sin2phi)) (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi)) (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))) sin2phi))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))) sin2phi))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2)))) sin2phi)) (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))) sin2phi))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4)))) sin2phi)) (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))) sin2phi)) (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))) sin2phi))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6)))) sin2phi)) (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))) sin2phi)) (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))) sin2phi)) (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))) sin2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphay 2) u0)) (/ (* (pow alphay 4) (* cos2phi u0)) (* (pow alphax 2) sin2phi))) sin2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphay 2) u0)) (* -1 (/ (- (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (* (pow alphax 4) sin2phi)) (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))) sin2phi))) sin2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphay 2) u0)) (* -1 (/ (- (* -1 (/ (- (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (* (pow alphax 6) sin2phi)) (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))) sin2phi))) sin2phi))))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1/3 (pow alphay 2)) (* 1/3 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)))) sin2phi))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) sin2phi))) (* 1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) (* -1/3 (pow alphay 2))) sin2phi))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (* 1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) sin2phi))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4)))) sin2phi)) (* 1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) (* -1/3 (pow alphay 2))) sin2phi))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1/2 (pow alphay 2)) (* 1/2 (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)))) sin2phi))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) sin2phi))) (* 1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) (* -1/2 (pow alphay 2))) sin2phi))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (* 1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) sin2phi))) (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4)))) sin2phi)) (* 1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) (* -1/2 (pow alphay 2))) sin2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (pow alphay 2)) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) sin2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) sin2phi)) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (* -1 (pow alphay 2))) sin2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) sin2phi)) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) sin2phi)) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (* -1 (pow alphay 2))) sin2phi))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ (* (pow alphay 2) cos2phi) (* (pow alphax 2) sin2phi))) 1)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) sin2phi))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* -1 (/ (- (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphax 2))) sin2phi))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* -1 (/ (- (* -1 (/ (- (/ (* (pow alphay 8) (* (pow cos2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) sin2phi)) (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphax 4))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphax 2))) sin2phi))) sin2phi))))
Outputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
(*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0)
(/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0) #s(literal 3 binary32)) (pow.f32 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) #s(literal 3 binary32))) (fma.f32 (*.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0) (*.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0) (-.f32 (*.f32 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) (*.f32 (*.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))))))
(fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
(+.f32 (*.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
(/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0) #s(literal 3 binary32)) (pow.f32 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) #s(literal 3 binary32))) (fma.f32 (*.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0) (*.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0) (-.f32 (*.f32 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) (*.f32 (*.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0) (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))))))
(fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
(+.f32 (*.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0) (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
(/.f32 (+.f32 (pow.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) #s(literal 3 binary32)) (pow.f32 (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) #s(literal 3 binary32))) (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) (*.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) (-.f32 (*.f32 (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) (*.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))))))
(fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
(+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
#s(literal 1/4 binary32)
(/.f32 (neg.f32 u0) (neg.f32 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
(/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))
u0
(/.f32 (+.f32 (pow.f32 (/.f32 sin2phi (*.f32 alphay alphay)) #s(literal 3 binary32)) (pow.f32 (/.f32 cos2phi (*.f32 alphax alphax)) #s(literal 3 binary32))) (fma.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 sin2phi (*.f32 alphay alphay)) (-.f32 (*.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 cos2phi (*.f32 alphax alphax))) (*.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))))
(/.f32 (fma.f32 sin2phi (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphax alphax)))
(+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))
(/.f32 (neg.f32 sin2phi) (neg.f32 (*.f32 alphay alphay)))
(/.f32 sin2phi (*.f32 alphay alphay))
sin2phi
(*.f32 (fabs.f32 alphay) (fabs.f32 alphay))
(*.f32 (neg.f32 alphay) (neg.f32 alphay))
(*.f32 alphay alphay)
(pow.f32 alphay #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32)))
alphay
(/.f32 (neg.f32 cos2phi) (neg.f32 (*.f32 alphax alphax)))
(/.f32 cos2phi (*.f32 alphax alphax))
cos2phi
(*.f32 (fabs.f32 alphax) (fabs.f32 alphax))
(*.f32 (neg.f32 alphax) (neg.f32 alphax))
(*.f32 alphax alphax)
(pow.f32 alphax #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 alphax) #s(literal 2 binary32)))
alphax
(/.f32 #s(literal -1/3 binary32) (neg.f32 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
(/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))
#s(literal 1/3 binary32)
(/.f32 #s(literal -1/2 binary32) (neg.f32 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
(/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))
#s(literal 1/2 binary32)
(/.f32 #s(literal -1 binary32) (neg.f32 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))))
(/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))
(pow.f32 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))) #s(literal -1 binary32))
#s(literal 1 binary32)
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
(neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi)))
(*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (neg.f32 cos2phi))
(/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi)
(log.f32 (-.f32 #s(literal 1 binary32) u0))
(/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0)) (+.f32 #s(literal 1 binary32) (fma.f32 u0 u0 (*.f32 #s(literal 1 binary32) u0))))
(-.f32 #s(literal 1 binary32) u0)
(/.f32 (neg.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0))) (neg.f32 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0))
(*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)
(/.f32 (+.f32 (pow.f32 (*.f32 #s(literal 1/2 binary32) u0) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (*.f32 #s(literal 1/2 binary32) u0) (*.f32 #s(literal 1/2 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 1/2 binary32) u0) #s(literal 1 binary32)))))
(fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32))
(+.f32 (*.f32 #s(literal 1/2 binary32) u0) #s(literal 1 binary32))
(/.f32 (+.f32 (pow.f32 (/.f32 cos2phi (*.f32 alphax alphax)) #s(literal 3 binary32)) (pow.f32 (/.f32 sin2phi (*.f32 alphay alphay)) #s(literal 3 binary32))) (fma.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 cos2phi (*.f32 alphax alphax)) (-.f32 (*.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 sin2phi (*.f32 alphay alphay))) (*.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
(/.f32 (fma.f32 cos2phi (*.f32 alphay alphay) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)))
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
(/.f32 (neg.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (neg.f32 #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
(log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0)))
(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)))
(/.f32 (neg.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi)) (neg.f32 (*.f32 alphay alphay)))
(/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))
(+.f32 (/.f32 (*.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax))) (*.f32 alphay alphay)) (/.f32 sin2phi (*.f32 alphay alphay)))
(/.f32 (+.f32 (pow.f32 (*.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax))) #s(literal 3 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (fma.f32 (*.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax))) (*.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax))) (-.f32 (*.f32 sin2phi sin2phi) (*.f32 (*.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax))) sin2phi))))
(fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi)
(+.f32 (*.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax))) sin2phi)
(/.f32 (neg.f32 (neg.f32 (log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)) (+.f32 #s(literal 1 binary32) u0))))) (neg.f32 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
(/.f32 (neg.f32 (log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)) (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(neg.f32 (log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)) (+.f32 #s(literal 1 binary32) u0))))
(log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)) (+.f32 #s(literal 1 binary32) u0)))
(/.f32 (-.f32 (pow.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) #s(literal 3 binary32)) (pow.f32 (log.f32 (+.f32 #s(literal 1 binary32) u0)) #s(literal 3 binary32))) (fma.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (fma.f32 (log.f32 (+.f32 #s(literal 1 binary32) u0)) (log.f32 (+.f32 #s(literal 1 binary32) u0)) (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0))))))
(-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))
(log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))
(/.f32 (-.f32 #s(literal 1 binary32) (pow.f32 (*.f32 u0 u0) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (fma.f32 (*.f32 u0 u0) (*.f32 u0 u0) (*.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))
(-.f32 #s(literal 1 binary32) (*.f32 u0 u0))
(*.f32 (fabs.f32 u0) (fabs.f32 u0))
(*.f32 (neg.f32 u0) (neg.f32 u0))
(*.f32 u0 u0)
(pow.f32 u0 #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 u0) #s(literal 2 binary32)))
(log.f32 (+.f32 #s(literal 1 binary32) u0))
(log1p.f32 u0)
(/.f32 (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0)) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 u0 u0) (*.f32 #s(literal 1 binary32) u0))))
(+.f32 #s(literal 1 binary32) u0)
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi) (*.f32 (*.f32 alphax alphax) (fma.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))) (/.f32 (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphax alphax) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi)) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (*.f32 (*.f32 alphax alphax) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi)) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))) (*.f32 (*.f32 alphax alphax) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))))))) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (fma.f32 (*.f32 alphax alphax) (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (fma.f32 (*.f32 alphax alphax) (-.f32 (fma.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))) (*.f32 (*.f32 alphax alphax) (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (fma.f32 (*.f32 alphax alphax) (-.f32 (fma.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))) (*.f32 (*.f32 alphax alphax) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 (*.f32 alphax alphax) (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))))))) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (fma.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))))))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (fma.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))))))))))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))))))))))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi u0)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (/.f32 u0 cos2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphax alphax) (fma.f32 (*.f32 alphax alphax) (-.f32 (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 u0 cos2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphax alphax) (fma.f32 (*.f32 alphax alphax) (-.f32 (*.f32 (*.f32 alphax alphax) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 u0 cos2phi))))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (/.f32 cos2phi (*.f32 alphax alphax)))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax)))
#s(approx (/ cos2phi (* alphax alphax)) (/.f32 cos2phi (*.f32 alphax alphax)))
#s(approx (* alphax alphax) (*.f32 alphax alphax))
#s(approx alphax alphax)
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi)))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphax alphax) (fma.f32 (*.f32 alphax alphax) (-.f32 (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))) (*.f32 #s(literal 1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphax alphax) (fma.f32 (*.f32 alphax alphax) (-.f32 (*.f32 (*.f32 alphax alphax) (-.f32 (*.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) (*.f32 #s(literal 1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphax alphax) (fma.f32 (*.f32 alphax alphax) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))) (*.f32 #s(literal 1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphax alphax) (fma.f32 (*.f32 alphax alphax) (-.f32 (*.f32 (*.f32 alphax alphax) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (*.f32 alphax alphax) cos2phi))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphax alphax) (fma.f32 (*.f32 alphax alphax) (-.f32 (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 #s(literal 1 binary32) cos2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphax alphax) (fma.f32 (*.f32 alphax alphax) (-.f32 (*.f32 (*.f32 alphax alphax) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 #s(literal 1 binary32) cos2phi))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi)))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax)))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) (/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax)))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax)))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (/.f32 (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 alphax alphax)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphax alphax) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (/.f32 (log.f32 (+.f32 #s(literal 1 binary32) u0)) cos2phi)) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphax alphax) (-.f32 (fma.f32 (*.f32 alphax alphax) (-.f32 (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 (log.f32 (+.f32 #s(literal 1 binary32) u0)) cos2phi)) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphax alphax) (-.f32 (fma.f32 (*.f32 alphax alphax) (-.f32 (*.f32 (*.f32 alphax alphax) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) (/.f32 (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 (log.f32 (+.f32 #s(literal 1 binary32) u0)) cos2phi)) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (+.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)))) (*.f32 alphax alphax))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)))) (*.f32 alphax alphax)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (pow.f32 alphax #s(literal 4 binary32))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)))) (*.f32 alphax alphax)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 sin2phi #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 sin2phi #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 sin2phi #s(literal 4 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 sin2phi #s(literal 4 binary32))))) (pow.f32 alphax #s(literal 6 binary32))) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (pow.f32 alphax #s(literal 4 binary32)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))))) (*.f32 alphax alphax)) (/.f32 (*.f32 alphay alphay) sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))))) (*.f32 alphax alphax)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (pow.f32 alphax #s(literal 4 binary32))) (/.f32 (*.f32 alphay alphay) sin2phi)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))))) (*.f32 alphax alphax)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 sin2phi #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 sin2phi #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 sin2phi #s(literal 4 binary32)))))))) (pow.f32 alphax #s(literal 6 binary32))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (pow.f32 alphax #s(literal 4 binary32))) (/.f32 (*.f32 alphay alphay) sin2phi))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (+.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))) (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))) (*.f32 alphax alphax))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))) (*.f32 alphax alphax)) (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (pow.f32 alphax #s(literal 4 binary32)))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))) (*.f32 alphax alphax)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 sin2phi #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 sin2phi #s(literal 4 binary32)))))) (pow.f32 alphax #s(literal 6 binary32))) (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (pow.f32 alphax #s(literal 4 binary32)))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (-.f32 (+.f32 (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi)))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (-.f32 (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (-.f32 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (-.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (*.f32 alphay alphay) sin2phi))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (/.f32 (*.f32 alphay alphay) sin2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) sin2phi)
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (+.f32 (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (*.f32 (*.f32 alphay alphay) (fma.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))) (/.f32 (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphay alphay) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (*.f32 (*.f32 alphay alphay) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (*.f32 (*.f32 alphay alphay) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))))))) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (fma.f32 (*.f32 alphay alphay) (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (fma.f32 (*.f32 alphay alphay) (-.f32 (fma.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))) (*.f32 (*.f32 alphay alphay) (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (fma.f32 (*.f32 alphay alphay) (-.f32 (fma.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))) (*.f32 (*.f32 alphay alphay) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 (*.f32 alphay alphay) (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))))))) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (fma.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))))))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (fma.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))))))))))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))))))))))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi u0)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (/.f32 u0 sin2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphay alphay) (fma.f32 (*.f32 alphay alphay) (-.f32 (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 u0 sin2phi))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphay alphay) (fma.f32 (*.f32 alphay alphay) (-.f32 (*.f32 (*.f32 alphay alphay) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 u0 sin2phi))))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay)))
#s(approx (/ sin2phi (* alphay alphay)) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (* alphay alphay) (*.f32 alphay alphay))
#s(approx alphay alphay)
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphay alphay) (fma.f32 (*.f32 alphay alphay) (-.f32 (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))) (*.f32 #s(literal 1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphay alphay) (fma.f32 (*.f32 alphay alphay) (-.f32 (*.f32 (*.f32 alphay alphay) (-.f32 (*.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) (*.f32 #s(literal 1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphay alphay) (fma.f32 (*.f32 alphay alphay) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))) (*.f32 #s(literal 1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphay alphay) (fma.f32 (*.f32 alphay alphay) (-.f32 (*.f32 (*.f32 alphay alphay) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphay alphay) (fma.f32 (*.f32 alphay alphay) (-.f32 (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 #s(literal 1 binary32) sin2phi))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphay alphay) (fma.f32 (*.f32 alphay alphay) (-.f32 (*.f32 (*.f32 alphay alphay) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 #s(literal 1 binary32) sin2phi))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay)))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphay alphay) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (/.f32 (log.f32 (+.f32 #s(literal 1 binary32) u0)) sin2phi)) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphay alphay) (-.f32 (fma.f32 (*.f32 alphay alphay) (-.f32 (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 (log.f32 (+.f32 #s(literal 1 binary32) u0)) sin2phi)) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphay alphay) (-.f32 (fma.f32 (*.f32 alphay alphay) (-.f32 (*.f32 (*.f32 alphay alphay) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) (/.f32 (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 (log.f32 (+.f32 #s(literal 1 binary32) u0)) sin2phi)) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (+.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)))) (*.f32 alphay alphay))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)))) (*.f32 alphay alphay)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))) (pow.f32 alphay #s(literal 4 binary32))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)))) (*.f32 alphay alphay)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 cos2phi #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 cos2phi #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 cos2phi #s(literal 4 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 cos2phi #s(literal 4 binary32))))) (pow.f32 alphay #s(literal 6 binary32))) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))) (pow.f32 alphay #s(literal 4 binary32)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))))) (*.f32 alphay alphay)) (/.f32 (*.f32 alphax alphax) cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))))) (*.f32 alphay alphay)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (pow.f32 alphay #s(literal 4 binary32))) (/.f32 (*.f32 alphax alphax) cos2phi)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))))) (*.f32 alphay alphay)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 cos2phi #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 cos2phi #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 cos2phi #s(literal 4 binary32)))))))) (pow.f32 alphay #s(literal 6 binary32))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (pow.f32 alphay #s(literal 4 binary32))) (/.f32 (*.f32 alphax alphax) cos2phi))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (+.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))) (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))) (*.f32 alphay alphay))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))) (*.f32 alphay alphay)) (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))) (pow.f32 alphay #s(literal 4 binary32)))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))) (*.f32 alphay alphay)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 cos2phi #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 cos2phi #s(literal 4 binary32)))))) (pow.f32 alphay #s(literal 6 binary32))) (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))) (pow.f32 alphay #s(literal 4 binary32)))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (-.f32 (+.f32 (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (-.f32 (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (-.f32 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (-.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 alphax alphax) cos2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 alphax alphax) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (/.f32 (*.f32 alphax alphax) cos2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (*.f32 (*.f32 alphay alphay) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (+.f32 (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/3 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/3 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 u0 (fma.f32 #s(literal 1/3 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/3 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx u0 u0)
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 u0 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)) (*.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))))))))
#s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 #s(literal -1 binary32) (/.f32 u0 cos2phi)))
#s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi))))
#s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) (/.f32 u0 cos2phi)) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi)))) (/.f32 #s(literal 1 binary32) cos2phi))))
#s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) (/.f32 u0 cos2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi)))) (/.f32 #s(literal 1 binary32) cos2phi))))
#s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0))
#s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32))))
#s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32))))
#s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32))))
#s(approx (- 1 u0) #s(literal 1 binary32))
#s(approx (- 1 u0) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) u0)))
#s(approx (neg (log (- 1 u0))) u0)
#s(approx (neg (log (- 1 u0))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) u0))))
#s(approx (neg (log (- 1 u0))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0))))))
#s(approx (neg (log (- 1 u0))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0))))))))
#s(approx (* (+ (* 1/2 u0) 1) u0) u0)
#s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) u0))))
#s(approx (+ (* 1/2 u0) 1) #s(literal 1 binary32))
#s(approx (+ (* 1/2 u0) 1) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) u0)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/3 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0)
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) u0))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0))))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (*.f32 #s(literal -1 binary32) u0))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32))))
#s(approx (log (- 1 (* u0 u0))) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0)))
#s(approx (log (- 1 (* u0 u0))) (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 u0 u0)) #s(literal 1 binary32))))
#s(approx (log (- 1 (* u0 u0))) (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 #s(literal -1/3 binary32) (*.f32 u0 u0)) #s(literal 1/2 binary32))) #s(literal 1 binary32))))
#s(approx (log (- 1 (* u0 u0))) (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 #s(literal -1/4 binary32) (*.f32 u0 u0)) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32))))
#s(approx (- 1 (* u0 u0)) #s(literal 1 binary32))
#s(approx (- 1 (* u0 u0)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0))))
#s(approx (* u0 u0) (*.f32 u0 u0))
#s(approx (log (+ 1 u0)) u0)
#s(approx (log (+ 1 u0)) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) u0))))
#s(approx (log (+ 1 u0)) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (-.f32 (*.f32 #s(literal 1/3 binary32) u0) #s(literal 1/2 binary32))))))
#s(approx (log (+ 1 u0)) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (-.f32 (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal -1/4 binary32) u0))) #s(literal 1/2 binary32))))))
#s(approx (+ 1 u0) #s(literal 1 binary32))
#s(approx (+ 1 u0) (+.f32 #s(literal 1 binary32) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 u0 u0) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 u0 (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))) cos2phi)))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (-.f32 (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)) (/.f32 (*.f32 (*.f32 alphax alphax) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))) cos2phi)))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi (*.f32 u0 u0)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)) (/.f32 (*.f32 (*.f32 alphax alphax) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))) cos2phi))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (-.f32 (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi (*.f32 (*.f32 u0 u0) u0)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi (*.f32 u0 u0))) (/.f32 (*.f32 (*.f32 alphax alphax) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))) cos2phi)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))) cos2phi))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)) (/.f32 (*.f32 (*.f32 alphax alphax) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))) cos2phi)))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi (*.f32 u0 u0))) (/.f32 (*.f32 (*.f32 alphax alphax) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))) cos2phi))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi (*.f32 u0 u0))) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi (*.f32 (*.f32 u0 u0) u0))) (/.f32 (*.f32 (*.f32 alphax alphax) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))) cos2phi)))))
#s(approx (/ (log (- 1 u0)) cos2phi) (/.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))) cos2phi))
#s(approx (/ (log (- 1 u0)) cos2phi) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (neg.f32 (log.f32 u0)) cos2phi) (/.f32 (log.f32 #s(literal -1 binary32)) cos2phi)) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0))))
#s(approx (/ (log (- 1 u0)) cos2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (neg.f32 (log.f32 u0)) cos2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) cos2phi) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0)))) u0) (/.f32 (log.f32 #s(literal -1 binary32)) cos2phi))))
#s(approx (/ (log (- 1 u0)) cos2phi) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (neg.f32 (log.f32 u0)) cos2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0)))) (*.f32 u0 u0)) (/.f32 (log.f32 #s(literal -1 binary32)) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0))))
#s(approx (log (- 1 u0)) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))))
#s(approx (log (- 1 u0)) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))) (/.f32 #s(literal 1 binary32) u0)))
#s(approx (log (- 1 u0)) (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))) u0)))))
#s(approx (log (- 1 u0)) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0))) (*.f32 u0 u0))))) (/.f32 #s(literal 1 binary32) u0)))
#s(approx (- 1 u0) (*.f32 #s(literal -1 binary32) u0))
#s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))
#s(approx (neg (log (- 1 u0))) (*.f32 #s(literal -1 binary32) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (neg (log (- 1 u0))) (-.f32 (/.f32 #s(literal 1 binary32) u0) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (neg (log (- 1 u0))) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (/.f32 #s(literal 1 binary32) u0)) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (neg (log (- 1 u0))) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (+.f32 (/.f32 #s(literal 1 binary32) u0) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0))))) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)))
#s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))
#s(approx (+ (* 1/2 u0) 1) (*.f32 #s(literal 1/2 binary32) u0))
#s(approx (+ (* 1/2 u0) 1) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (neg.f32 (log.f32 u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (fma.f32 #s(literal -2 binary32) (/.f32 (neg.f32 (log.f32 u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 (log.f32 #s(literal -1 binary32)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (neg.f32 (log.f32 u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))) (fma.f32 #s(literal -2 binary32) (/.f32 (neg.f32 (log.f32 u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 (log.f32 #s(literal -1 binary32)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (neg.f32 (log.f32 u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))) (fma.f32 #s(literal -2 binary32) (/.f32 (neg.f32 (log.f32 u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 (log.f32 #s(literal -1 binary32)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (-.f32 (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (-.f32 (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (/.f32 #s(literal 1 binary32) u0)) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (-.f32 (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (/.f32 #s(literal 1 binary32) u0))) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (-.f32 (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (+.f32 (/.f32 #s(literal 1 binary32) u0) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0)))))) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0)))) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0)))) (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (/.f32 #s(literal 1 binary32) u0))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))) u0)))) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0))) (*.f32 u0 u0))))) (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (/.f32 #s(literal 1 binary32) u0))))
#s(approx (log (- 1 (* u0 u0))) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0)))))
#s(approx (log (- 1 (* u0 u0))) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0)))) (/.f32 #s(literal 1 binary32) (*.f32 u0 u0))))
#s(approx (log (- 1 (* u0 u0))) (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)))) (*.f32 u0 u0))))))
#s(approx (log (- 1 (* u0 u0))) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)))) (pow.f32 u0 #s(literal 4 binary32)))))) (/.f32 #s(literal 1 binary32) (*.f32 u0 u0))))
#s(approx (- 1 (* u0 u0)) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0)))
#s(approx (- 1 (* u0 u0)) (*.f32 (*.f32 u0 u0) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)) #s(literal 1 binary32))))
#s(approx (log (+ 1 u0)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))
#s(approx (log (+ 1 u0)) (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (/.f32 #s(literal 1 binary32) u0)))
#s(approx (log (+ 1 u0)) (-.f32 (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (/.f32 #s(literal 1 binary32) u0)) (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0))))
#s(approx (log (+ 1 u0)) (-.f32 (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (+.f32 (/.f32 #s(literal 1 binary32) u0) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0))))) (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0))))
#s(approx (+ 1 u0) u0)
#s(approx (+ 1 u0) (*.f32 u0 (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) u0))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) u0)) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) u0)) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) u0) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) u0)) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))) u0)) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 #s(literal -1 binary32) u0))) cos2phi))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (-.f32 (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 #s(literal -1 binary32) u0))) cos2phi))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0))) (/.f32 (*.f32 alphax alphax) cos2phi)) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 #s(literal -1 binary32) u0))) cos2phi))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))) u0)) (/.f32 (*.f32 alphax alphax) cos2phi)) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 #s(literal -1 binary32) u0))) cos2phi))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 #s(literal -1 binary32) u0))) cos2phi)))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 #s(literal -1 binary32) u0))) cos2phi) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 #s(literal -1 binary32) u0))) cos2phi) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)) (/.f32 (*.f32 alphax alphax) cos2phi)) u0))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 #s(literal -1 binary32) u0))) cos2phi) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)))) u0) (/.f32 (*.f32 alphax alphax) cos2phi)) u0))))
#s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 #s(literal -1 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) cos2phi)))
#s(approx (/ (log (- 1 u0)) cos2phi) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) cos2phi)) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0))))
#s(approx (/ (log (- 1 u0)) cos2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) cos2phi) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) cos2phi) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0)))) u0))))
#s(approx (/ (log (- 1 u0)) cos2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) cos2phi) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 cos2phi (*.f32 u0 u0))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 cos2phi u0)) (/.f32 #s(literal 1 binary32) cos2phi))) u0))))
#s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0))))
#s(approx (log (- 1 u0)) (-.f32 (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0))) (/.f32 #s(literal 1 binary32) u0)))
#s(approx (log (- 1 u0)) (fma.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))) u0))))
#s(approx (log (- 1 u0)) (fma.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 u0)) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))) u0))))
#s(approx (- 1 u0) (*.f32 #s(literal -1 binary32) (*.f32 u0 (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) u0)))))
#s(approx (neg (log (- 1 u0))) (log.f32 (/.f32 #s(literal -1 binary32) u0)))
#s(approx (neg (log (- 1 u0))) (-.f32 (/.f32 #s(literal 1 binary32) u0) (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (neg (log (- 1 u0))) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (/.f32 #s(literal 1 binary32) u0)) (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (neg (log (- 1 u0))) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0))) u0)) #s(literal 1 binary32)) u0)) (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0))) (*.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (*.f32 #s(literal -2 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))) (*.f32 #s(literal -2 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) u0)) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))) (*.f32 #s(literal -2 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (-.f32 (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0))) (*.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (-.f32 (fma.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (/.f32 #s(literal 1 binary32) u0)) (*.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (-.f32 (fma.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (/.f32 #s(literal 1 binary32) u0))) (*.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (-.f32 (fma.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0))) u0)) #s(literal 1 binary32)) u0))) (*.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (-.f32 (*.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0))) (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (-.f32 (*.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0))) (fma.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (/.f32 #s(literal 1 binary32) u0))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (-.f32 (fma.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))) u0))) (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (-.f32 (fma.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 u0)) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))) u0))) (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (log (- 1 (* u0 u0))) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (log (- 1 (* u0 u0))) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))) (/.f32 #s(literal 1 binary32) (*.f32 u0 u0))))
#s(approx (log (- 1 (* u0 u0))) (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)))) (*.f32 u0 u0))))))
#s(approx (log (- 1 (* u0 u0))) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)))) (pow.f32 u0 #s(literal 4 binary32)))))) (/.f32 #s(literal 1 binary32) (*.f32 u0 u0))))
#s(approx (log (+ 1 u0)) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (log (+ 1 u0)) (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (/.f32 #s(literal 1 binary32) u0))))
#s(approx (log (+ 1 u0)) (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)) #s(literal 1 binary32)) u0)))))
#s(approx (log (+ 1 u0)) (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0)) #s(literal 1/2 binary32)) u0)) #s(literal 1 binary32)) u0)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi) (*.f32 cos2phi (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi) (*.f32 cos2phi (fma.f32 cos2phi (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 cos2phi (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 cos2phi (fma.f32 cos2phi (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 cos2phi (fma.f32 cos2phi (fma.f32 cos2phi (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))))))) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))))) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 cos2phi (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 cos2phi (-.f32 (fma.f32 cos2phi (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))))) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 cos2phi (-.f32 (fma.f32 cos2phi (-.f32 (fma.f32 cos2phi (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))))))) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))))) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (fma.f32 cos2phi (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi)))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (fma.f32 cos2phi (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (fma.f32 cos2phi (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi)))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (fma.f32 cos2phi (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (fma.f32 cos2phi (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (fma.f32 cos2phi (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))))))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi)))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 cos2phi (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 cos2phi (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 cos2phi (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 cos2phi (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 cos2phi (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (fma.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 cos2phi (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))))))))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 cos2phi (-.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi u0)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 cos2phi (-.f32 (*.f32 cos2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 cos2phi u0)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)))
#s(approx cos2phi cos2phi)
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 cos2phi (-.f32 (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 cos2phi (-.f32 (*.f32 cos2phi (-.f32 (*.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 cos2phi (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 cos2phi (-.f32 (*.f32 cos2phi (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 cos2phi (-.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 (*.f32 alphay alphay) sin2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 cos2phi (-.f32 (*.f32 cos2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 (*.f32 alphay alphay) sin2phi)))
#s(approx (/ (log (- 1 u0)) cos2phi) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 cos2phi (-.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 cos2phi (-.f32 (*.f32 cos2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) cos2phi))) cos2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) cos2phi)))) cos2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (+.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) cos2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax))) cos2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)))) cos2phi)) cos2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)))) cos2phi) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))))) (*.f32 cos2phi cos2phi)))) cos2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)))) cos2phi) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 alphay #s(literal 6 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))))) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))))) (*.f32 cos2phi cos2phi))))) cos2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) cos2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) cos2phi) (*.f32 alphax alphax))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi))) cos2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) cos2phi) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))))))) (*.f32 cos2phi cos2phi)) (*.f32 alphax alphax)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)))) cos2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) cos2phi) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 alphay #s(literal 6 binary32)))))))) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))))))) (*.f32 cos2phi cos2phi)) (*.f32 alphax alphax))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (+.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) cos2phi))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) cos2phi))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)) (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))) (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))) cos2phi)))) cos2phi))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))) cos2phi) (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))))) (*.f32 cos2phi cos2phi))))))) cos2phi))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))) cos2phi) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 alphay #s(literal 6 binary32)))))) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))))) (*.f32 cos2phi cos2phi))))))))) cos2phi))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))) cos2phi))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 (*.f32 alphay alphay) cos2phi)) (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) cos2phi))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 (*.f32 alphay alphay) cos2phi)) (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))))) cos2phi))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 (*.f32 alphay alphay) cos2phi)) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))))))) cos2phi))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) u0)) cos2phi))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (-.f32 (fma.f32 (*.f32 alphax alphax) u0 (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi)))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 (*.f32 alphay alphay) cos2phi))) cos2phi))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 (*.f32 alphax alphax) u0)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 (*.f32 alphay alphay) cos2phi)))) cos2phi))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))) cos2phi))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (-.f32 (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)))) cos2phi))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (-.f32 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi))))) cos2phi))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax))) cos2phi))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)))) cos2phi))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (-.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi))))) cos2phi))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 alphax alphax)) cos2phi))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (*.f32 alphax alphax)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi))) cos2phi))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 alphax alphax)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)))) cos2phi))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (*.f32 cos2phi (+.f32 (/.f32 sin2phi cos2phi) (/.f32 (*.f32 alphay alphay) (*.f32 alphax alphax)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) cos2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (-.f32 (fma.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi)))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphay alphay) cos2phi))) cos2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphay alphay) cos2phi)))) cos2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 alphay alphay))) cos2phi) (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (pow.f32 alphay #s(literal 4 binary32)))) cos2phi) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 alphay alphay))) cos2phi) (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0)))))))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)))) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0))))))))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))))) cos2phi) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay))))) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0))))))))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 alphay #s(literal 6 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))))) cos2phi) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))))) cos2phi) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay))))) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0))))))))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0))))))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay))) cos2phi) (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0)))))))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay))) cos2phi) (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0)))))))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 alphay #s(literal 6 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32)))) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32))))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay))) cos2phi) (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0)))))))) cos2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0))))) cos2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay)))))) cos2phi) (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0)))))) cos2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32))))))) cos2phi) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) cos2phi) (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0)))))) cos2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 alphay #s(literal 6 binary32))))))) cos2phi) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32)))))))) cos2phi) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) cos2phi) (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0)))))) cos2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0))) cos2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay)))) cos2phi) (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0)))) cos2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32))))) cos2phi) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))) cos2phi) (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0)))) cos2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 alphay #s(literal 6 binary32))))) cos2phi) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32)))))) cos2phi) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))) cos2phi) (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0)))) cos2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphax alphax) u0) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 (*.f32 alphay alphay) cos2phi))) cos2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))) cos2phi))) cos2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32)))) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))) cos2phi))) cos2phi)))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 #s(literal -1 binary32) (*.f32 cos2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)))) cos2phi)))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)))) cos2phi) (*.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax))) cos2phi)))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))))) cos2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)))) cos2phi) (*.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax))) cos2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)))) cos2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)))) cos2phi) (*.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax))) cos2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))))) cos2phi)) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)))) cos2phi) (*.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax))) cos2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi))) cos2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay))) cos2phi) (*.f32 #s(literal -1 binary32) (*.f32 alphax alphax))) cos2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay))) cos2phi) (*.f32 #s(literal -1 binary32) (*.f32 alphax alphax))) cos2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 #s(literal -1 binary32) (*.f32 cos2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) (*.f32 #s(literal -1 binary32) (*.f32 cos2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (*.f32 #s(literal -1 binary32) (*.f32 cos2phi (fma.f32 #s(literal -1 binary32) (/.f32 sin2phi cos2phi) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 alphax alphax)))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphay alphay) cos2phi))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 alphay alphay))) cos2phi))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (pow.f32 alphay #s(literal 4 binary32)))) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 alphay alphay))) cos2phi))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi) (*.f32 sin2phi (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi) (*.f32 sin2phi (fma.f32 sin2phi (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 sin2phi (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 sin2phi (fma.f32 sin2phi (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 sin2phi (fma.f32 sin2phi (fma.f32 sin2phi (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))))))) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))))) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 sin2phi (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 sin2phi (-.f32 (fma.f32 sin2phi (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))))) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 sin2phi (-.f32 (fma.f32 sin2phi (-.f32 (fma.f32 sin2phi (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))))))) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))))) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (fma.f32 sin2phi (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi)))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (fma.f32 sin2phi (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (fma.f32 sin2phi (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi)))))))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (fma.f32 sin2phi (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (fma.f32 sin2phi (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (fma.f32 sin2phi (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))))))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi)))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 sin2phi (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 sin2phi (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 sin2phi (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))))))))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 sin2phi (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 sin2phi (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (fma.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 sin2phi (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))))))))))))))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 sin2phi (-.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi u0)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 sin2phi (-.f32 (*.f32 sin2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 sin2phi u0)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx sin2phi sin2phi)
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 sin2phi (-.f32 (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 sin2phi (-.f32 (*.f32 sin2phi (-.f32 (*.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 sin2phi (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 sin2phi (-.f32 (*.f32 sin2phi (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 sin2phi (-.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 (*.f32 alphax alphax) cos2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (fma.f32 sin2phi (-.f32 (*.f32 sin2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 (*.f32 alphax alphax) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 sin2phi (-.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 sin2phi (-.f32 (*.f32 sin2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) sin2phi))) sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) sin2phi)))) sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (+.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) sin2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay))) sin2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)))) sin2phi)) sin2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)))) sin2phi) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))))) (*.f32 sin2phi sin2phi)))) sin2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)))) sin2phi) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 alphax #s(literal 6 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))))) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))))) (*.f32 sin2phi sin2phi))))) sin2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay)) sin2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) sin2phi) (*.f32 alphay alphay))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi))) sin2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) sin2phi) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))))))) (*.f32 sin2phi sin2phi)) (*.f32 alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)))) sin2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) sin2phi) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 alphax #s(literal 6 binary32)))))))) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))))))) (*.f32 sin2phi sin2phi)) (*.f32 alphay alphay))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (+.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) sin2phi))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) sin2phi))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)) (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))) (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))) sin2phi)))) sin2phi))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))) sin2phi) (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))))) (*.f32 sin2phi sin2phi))))))) sin2phi))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))) sin2phi) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 alphax #s(literal 6 binary32)))))) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))))) (*.f32 sin2phi sin2phi))))))))) sin2phi))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))) sin2phi))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 (*.f32 alphax alphax) sin2phi)) (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) sin2phi))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 (*.f32 alphax alphax) sin2phi)) (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))))) sin2phi))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 (*.f32 alphax alphax) sin2phi)) (fma.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))))))) sin2phi))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) u0)) sin2phi))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (-.f32 (fma.f32 (*.f32 alphay alphay) u0 (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi)))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 (*.f32 alphax alphax) sin2phi))) sin2phi))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 (*.f32 alphax alphax) sin2phi)))) sin2phi))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))) sin2phi))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (-.f32 (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)))) sin2phi))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (-.f32 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi))))) sin2phi))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay))) sin2phi))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (-.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)))) sin2phi))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (-.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay))) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi))))) sin2phi))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 alphay alphay)) sin2phi))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (-.f32 (+.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (*.f32 alphay alphay)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi))) sin2phi))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 alphay alphay)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)))) sin2phi))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (*.f32 sin2phi (+.f32 #s(literal 1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) sin2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (-.f32 (fma.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi)))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphax alphax) sin2phi))) sin2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphax alphax) sin2phi)))) sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 alphax alphax))) sin2phi) (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (pow.f32 alphax #s(literal 4 binary32)))) sin2phi) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 alphax alphax))) sin2phi) (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0)))))))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)))) sin2phi) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0))))))))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))))) sin2phi) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax))))) sin2phi) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0))))))))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 alphax #s(literal 6 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))))) sin2phi) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))))) sin2phi) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax))))) sin2phi) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0))))))))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0))))))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax))) sin2phi) (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0)))))))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))) sin2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax))) sin2phi) (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0)))))))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 alphax #s(literal 6 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32)))) sin2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32))))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))) sin2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax))) sin2phi) (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0)))))))) sin2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0))))) sin2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax)))))) sin2phi) (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0)))))) sin2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32))))))) sin2phi) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) sin2phi) (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0)))))) sin2phi)))
#s(approx (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 alphax #s(literal 6 binary32))))))) sin2phi) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32)))))))) sin2phi) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) sin2phi) (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0)))))) sin2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0))) sin2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax)))) sin2phi) (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0)))) sin2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32))))) sin2phi) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))) sin2phi) (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0)))) sin2phi)))
#s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 alphax #s(literal 6 binary32))))) sin2phi) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32)))))) sin2phi) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))) sin2phi) (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0)))) sin2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphay alphay) u0) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 (*.f32 alphax alphax) sin2phi))) sin2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))) sin2phi))) sin2phi)))
#s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32)))) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))) sin2phi))) sin2phi)))
#s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 #s(literal -1 binary32) (*.f32 sin2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay))))))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)))) sin2phi)))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)))) sin2phi) (*.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay))) sin2phi)))
#s(approx (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))))) sin2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)))) sin2phi) (*.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay))) sin2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)))) sin2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)))) sin2phi) (*.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay))) sin2phi)))
#s(approx (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))))) sin2phi)) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)))) sin2phi) (*.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay))) sin2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi))) sin2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax))) sin2phi) (*.f32 #s(literal -1 binary32) (*.f32 alphay alphay))) sin2phi)))
#s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax))) sin2phi) (*.f32 #s(literal -1 binary32) (*.f32 alphay alphay))) sin2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 #s(literal -1 binary32) (*.f32 sin2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay))))))
#s(approx (/ (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (* alphay alphay)) (*.f32 #s(literal -1 binary32) (*.f32 sin2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay))))))
#s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) (*.f32 #s(literal -1 binary32) (*.f32 sin2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi))) #s(literal 1 binary32)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphax alphax) sin2phi))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 alphax alphax))) sin2phi))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (pow.f32 alphax #s(literal 4 binary32)))) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 alphax alphax))) sin2phi))) sin2phi)))

eval96.0ms (1.7%)

Memory
6.5MiB live, 150.8MiB allocated; 15ms collecting garbage
Compiler

Compiled 25 250 to 5 106 computations (79.8% saved)

prune62.0ms (1.1%)

Memory
10.7MiB live, 109.7MiB allocated; 10ms collecting garbage
Pruning

63 alts after pruning (57 fresh and 6 done)

PrunedKeptTotal
New65844702
Fresh51318
Picked055
Done011
Total66363726
Accuracy
99.9%
Counts
726 → 63
Alt Table
Click to see full alt table
StatusAccuracyProgram
61.1%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0))) (log.f32 (+.f32 #s(literal 1 binary32) (fma.f32 u0 u0 (*.f32 #s(literal 1 binary32) u0)))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
88.6%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log1p.f32 u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
60.7%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
60.7%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))))
48.9%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
50.6%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
61.3%
(/.f32 (neg.f32 (-.f32 (log.f32 #s(approx (- 1 (* u0 u0)) (*.f32 (*.f32 u0 u0) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)) #s(literal 1 binary32))))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
56.4%
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
61.0%
(/.f32 (neg.f32 (log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)) (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
63.7%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
38.1%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (+.f32 (cosh.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))) (sinh.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32)))))))
63.7%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
63.6%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))))
63.7%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
63.7%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
50.8%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) sin2phi) (*.f32 alphay alphay))))
20.6%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
63.0%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 (+.f32 (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay))) sin2phi)))
62.5%
(/.f32 (neg.f32 (log.f32 #s(approx (- 1 u0) (*.f32 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32)) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
93.7%
(/.f32 (neg.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
75.3%
(/.f32 (neg.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
61.2%
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
75.3%
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
93.7%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
91.7%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(literal 1/3 binary32) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
87.5%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (/.f32 (fma.f32 cos2phi (*.f32 alphay alphay) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
40.2%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (/.f32 (+.f32 (pow.f32 (/.f32 cos2phi (*.f32 alphax alphax)) #s(literal 3 binary32)) (pow.f32 (/.f32 sin2phi (*.f32 alphay alphay)) #s(literal 3 binary32))) (fma.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 cos2phi (*.f32 alphax alphax)) (-.f32 (*.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 sin2phi (*.f32 alphay alphay))) (*.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
87.5%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
86.4%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))))
87.4%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
65.5%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
26.9%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
86.6%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))
73.0%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
87.4%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (/.f32 (+.f32 (pow.f32 (*.f32 #s(literal 1/2 binary32) u0) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (*.f32 #s(literal 1/2 binary32) u0) (*.f32 #s(literal 1/2 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 1/2 binary32) u0) #s(literal 1 binary32))))) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
87.4%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 #s(approx (+ (* 1/2 u0) 1) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
87.3%
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
49.0%
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi))
20.7%
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi))
93.7%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
21.0%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 #s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi))))) u0))
92.7%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 #s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)))))) (/.f32 #s(literal 1/3 binary32) #s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))) u0 (/.f32 #s(literal 1/2 binary32) #s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))) u0 (/.f32 #s(literal 1 binary32) #s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))) u0))
91.8%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 #s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
70.7%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay)) sin2phi)) u0))
27.8%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) cos2phi)) u0))
75.3%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))
70.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
27.7%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi)))) u0))
51.3%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
51.3%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
20.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
20.8%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi))))
17.9%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) #s(literal 1 binary32))) cos2phi))))
27.8%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
27.5%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
27.0%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)))) cos2phi))))
24.5%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0)) cos2phi))))
20.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 #s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi))))
70.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay))) sin2phi)))
86.7%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))))
70.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphay alphay) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi))))))
24.5%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
26.9%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 u0 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))))
Compiler

Compiled 3 917 to 3 285 computations (16.1% saved)

series155.0ms (2.8%)

Memory
-6.6MiB live, 227.7MiB allocated; 19ms collecting garbage
Counts
53 → 408
Calls
Call 1
Inputs
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0))
(*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)
(fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32))
(fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32))
(fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32))
#s(literal 1/4 binary32)
u0
#s(literal 1/3 binary32)
#s(literal 1/2 binary32)
#s(literal 1 binary32)
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
(/.f32 cos2phi (*.f32 alphax alphax))
cos2phi
(*.f32 alphax alphax)
alphax
(/.f32 sin2phi (*.f32 alphay alphay))
sin2phi
(*.f32 alphay alphay)
alphay
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi))
(/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)
(*.f32 (*.f32 alphax alphax) u0)
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi))))
(neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi)))
(*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi))
(/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi)
(log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32)))))
#s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))
(*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32)))
(-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))
(/.f32 #s(literal 1 binary32) u0)
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0))))
(-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))
(log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))
(-.f32 #s(literal 1 binary32) (*.f32 u0 u0))
(*.f32 u0 u0)
(log.f32 (+.f32 #s(literal 1 binary32) u0))
(+.f32 #s(literal 1 binary32) u0)
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
(*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))) u0)
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi))))
(*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))
(fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi))
(fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))
(fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))
(/.f32 u0 sin2phi)
(*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))
(/.f32 #s(literal 1 binary32) sin2phi)
(*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))
Outputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (/ (* (pow alphax 2) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (* (pow alphax 2) (+ (* -1 (/ (* (pow alphax 2) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* sin2phi (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (* (pow alphax 2) (+ (* (pow alphax 2) (+ (* -1 (/ (* (pow sin2phi 2) (log (- 1 u0))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 2) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))) (/ (* sin2phi (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (/ cos2phi (* alphax alphax)) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (* alphax alphax) #s(hole binary32 (pow alphax 2)))
#s(approx alphax #s(hole binary32 alphax))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi))))
#s(approx (/ (* (* alphax alphax) u0) cos2phi) #s(hole binary32 (/ (* (pow alphax 2) u0) cos2phi)))
#s(approx (* (* alphax alphax) u0) #s(hole binary32 (* (pow alphax 2) u0)))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (- (+ (* -1 (/ (* (pow alphax 2) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) (pow cos2phi 2)))) (/ (log (+ 1 u0)) cos2phi)) (/ (log (- 1 (pow u0 2))) cos2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (- (+ (* (pow alphax 2) (- (/ (* (pow alphax 2) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 3))) (/ (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 2) (pow cos2phi 2))))) (/ (log (+ 1 u0)) cos2phi)) (/ (log (- 1 (pow u0 2))) cos2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (- (+ (* (pow alphax 2) (- (* (pow alphax 2) (- (* -1 (/ (* (pow alphax 2) (* (pow sin2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) (pow cos2phi 4)))) (* -1 (/ (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 4) (pow cos2phi 3)))))) (/ (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 2) (pow cos2phi 2))))) (/ (log (+ 1 u0)) cos2phi)) (/ (log (- 1 (pow u0 2))) cos2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))) (* (pow alphax 2) (* u0 (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))) (* (pow alphax 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (* (pow alphax 2) (* u0 (- (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))) (* (pow alphax 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (* (pow alphax 2) (+ (* u0 (- (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))) (* (pow alphax 2) (* u0 (- (* u0 (+ (* -1/2 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow sin2phi 3) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4))))))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (+ (* (pow alphax 2) (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (+ (* (pow alphax 2) (- (+ (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (* (pow alphax 2) (- (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (+ (* (pow alphax 2) (- (+ (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (* (pow alphax 2) (- (+ (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* (pow alphax 2) (- (* u0 (+ (* -1/2 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow sin2phi 3) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (+ (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2))) (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) (pow sin2phi 2)))) (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi) (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) (pow sin2phi 4)))) (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2)))) (pow alphax 2)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2)))) (pow alphax 2)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))) (pow alphax 4))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2)))) (pow alphax 2)) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow sin2phi 4))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4)))) (pow alphax 6)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))) (pow alphax 4)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (pow alphax 2)) (/ (pow alphay 2) sin2phi))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (pow alphax 2)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (pow alphax 4)) (/ (pow alphay 2) sin2phi)))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (pow alphax 2)) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow sin2phi 4))))))) (pow alphax 6)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (pow alphax 4)) (/ (pow alphay 2) sin2phi))))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (+ (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2))) (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (/ (* (pow alphay 2) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (* (pow alphay 2) (+ (* -1 (/ (* (pow alphay 2) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* cos2phi (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (* (pow alphay 2) (+ (* (pow alphay 2) (+ (* -1 (/ (* (pow cos2phi 2) (log (- 1 u0))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 2) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))) (/ (* cos2phi (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (/ sin2phi (* alphay alphay)) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (* alphay alphay) #s(hole binary32 (pow alphay 2)))
#s(approx alphay #s(hole binary32 alphay))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (- (+ (* -1 (/ (* (pow alphay 2) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) (pow sin2phi 2)))) (/ (log (+ 1 u0)) sin2phi)) (/ (log (- 1 (pow u0 2))) sin2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (- (+ (* (pow alphay 2) (- (/ (* (pow alphay 2) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 3))) (/ (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 2) (pow sin2phi 2))))) (/ (log (+ 1 u0)) sin2phi)) (/ (log (- 1 (pow u0 2))) sin2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (- (+ (* (pow alphay 2) (- (* (pow alphay 2) (- (* -1 (/ (* (pow alphay 2) (* (pow cos2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) (pow sin2phi 4)))) (* -1 (/ (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 4) (pow sin2phi 3)))))) (/ (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 2) (pow sin2phi 2))))) (/ (log (+ 1 u0)) sin2phi)) (/ (log (- 1 (pow u0 2))) sin2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (* (pow alphay 2) (* u0 (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (* (pow alphay 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (* (pow alphay 2) (* u0 (- (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (* (pow alphay 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (* (pow alphay 2) (+ (* u0 (- (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))) (* (pow alphay 2) (* u0 (- (* u0 (+ (* -1/2 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow cos2phi 3) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4))))))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (+ (* (pow alphay 2) (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (+ (* (pow alphay 2) (- (+ (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (* (pow alphay 2) (- (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (+ (* (pow alphay 2) (- (+ (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (* (pow alphay 2) (- (+ (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* (pow alphay 2) (- (* u0 (+ (* -1/2 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow cos2phi 3) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (+ (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2))) (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) (pow cos2phi 2)))) (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi) (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) (pow cos2phi 4)))) (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2)))) (pow alphay 2)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2)))) (pow alphay 2)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))) (pow alphay 4))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2)))) (pow alphay 2)) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow cos2phi 4))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4)))) (pow alphay 6)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))) (pow alphay 4)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (pow alphay 2)) (/ (pow alphax 2) cos2phi))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (pow alphay 2)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (pow alphay 4)) (/ (pow alphax 2) cos2phi)))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (pow alphay 2)) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow cos2phi 4))))))) (pow alphay 6)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (pow alphay 4)) (/ (pow alphax 2) cos2phi))))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (+ (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2))) (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 u0))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* 1/3 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 u0))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* 1/3 u0)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 1))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (+ 1 (* 1/2 u0))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (+ 1 (* u0 (+ 1/2 (* 1/3 u0))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0))))))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 1/2))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (+ 1/2 (* 1/3 u0))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0))))))
#s(approx (+ (* 1/4 u0) 1/3) #s(hole binary32 1/3))
#s(approx (+ (* 1/4 u0) 1/3) #s(hole binary32 (+ 1/3 (* 1/4 u0))))
#s(approx u0 #s(hole binary32 u0))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (/ (* (pow alphax 2) u0) cos2phi)))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* u0 (- (* 1/2 (/ (* (pow alphax 2) u0) cos2phi)) (* -1 (/ (pow alphax 2) cos2phi))))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* u0 (- (* u0 (- (* 1/3 (/ (* (pow alphax 2) u0) cos2phi)) (* -1/2 (/ (pow alphax 2) cos2phi)))) (* -1 (/ (pow alphax 2) cos2phi))))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* u0 (- (* u0 (- (* u0 (- (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* -1/3 (/ (pow alphax 2) cos2phi)))) (* -1/2 (/ (pow alphax 2) cos2phi)))) (* -1 (/ (pow alphax 2) cos2phi))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* -1 (/ (* (pow alphax 2) u0) cos2phi))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* u0 (+ (* -1 (/ (pow alphax 2) cos2phi)) (* -1/2 (/ (* (pow alphax 2) u0) cos2phi))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* u0 (+ (* -1 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* -1/2 (/ (pow alphax 2) cos2phi)) (* -1/3 (/ (* (pow alphax 2) u0) cos2phi))))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* u0 (+ (* -1 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* -1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* -1/3 (/ (pow alphax 2) cos2phi)) (* -1/4 (/ (* (pow alphax 2) u0) cos2phi))))))))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* -1 (/ u0 cos2phi))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* u0 (- (* u0 (- (* -1/3 (/ u0 cos2phi)) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* u0 (- (* u0 (- (* u0 (- (* -1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* -1 u0)))
#s(approx (log (- 1 u0)) #s(hole binary32 (* u0 (- (* -1/2 u0) 1))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* u0 (- (* u0 (- (* u0 (- (* -1/4 u0) 1/3)) 1/2)) 1))))
#s(approx (- 1 u0) #s(hole binary32 1))
#s(approx (- 1 u0) #s(hole binary32 (+ 1 (* -1 u0))))
#s(approx (* u0 (- (/ 1 u0) 1)) #s(hole binary32 1))
#s(approx (* u0 (- (/ 1 u0) 1)) #s(hole binary32 (+ 1 (* -1 u0))))
#s(approx (- (/ 1 u0) 1) #s(hole binary32 (/ 1 u0)))
#s(approx (- (/ 1 u0) 1) #s(hole binary32 (/ (+ 1 (* -1 u0)) u0)))
#s(approx (/ 1 u0) #s(hole binary32 (/ 1 u0)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 u0))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* 1/3 u0)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (* -1 u0)))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (* u0 (- (* -1/2 u0) 1))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (* u0 (- (* u0 (- (* u0 (- (* -1/4 u0) 1/3)) 1/2)) 1))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (* -1 (pow u0 2))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (* (pow u0 2) (- (* -1/2 (pow u0 2)) 1))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (* (pow u0 2) (- (* (pow u0 2) (- (* -1/3 (pow u0 2)) 1/2)) 1))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (* (pow u0 2) (- (* (pow u0 2) (- (* (pow u0 2) (- (* -1/4 (pow u0 2)) 1/3)) 1/2)) 1))))
#s(approx (- 1 (* u0 u0)) #s(hole binary32 1))
#s(approx (- 1 (* u0 u0)) #s(hole binary32 (+ 1 (* -1 (pow u0 2)))))
#s(approx (* u0 u0) #s(hole binary32 (pow u0 2)))
#s(approx (log (+ 1 u0)) #s(hole binary32 u0))
#s(approx (log (+ 1 u0)) #s(hole binary32 (* u0 (+ 1 (* -1/2 u0)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (* u0 (+ 1 (* u0 (- (* 1/3 u0) 1/2))))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (* u0 (+ 1 (* u0 (- (* u0 (+ 1/3 (* -1/4 u0))) 1/2))))))
#s(approx (+ 1 u0) #s(hole binary32 1))
#s(approx (+ 1 u0) #s(hole binary32 (+ 1 u0)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (/ (pow alphay 2) sin2phi)))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (+ (* 1/2 (/ (* (pow alphay 2) u0) sin2phi)) (/ (pow alphay 2) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (+ (* u0 (+ (* 1/3 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/2 (/ (pow alphay 2) sin2phi)))) (/ (pow alphay 2) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (/ 1 sin2phi)))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (+ (* 1/2 (/ u0 sin2phi)) (/ 1 sin2phi))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (+ (* u0 (+ (* 1/3 (/ u0 sin2phi)) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) #s(hole binary32 (/ 1/2 sin2phi)))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) #s(hole binary32 (+ (* 1/3 (/ u0 sin2phi)) (* 1/2 (/ 1 sin2phi)))))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) #s(hole binary32 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))))
#s(approx (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) #s(hole binary32 (/ 1/3 sin2phi)))
#s(approx (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) #s(hole binary32 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))))
#s(approx (/ u0 sin2phi) #s(hole binary32 (/ u0 sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/3 (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* -1 (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (/ 1 u0) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (/ 1 u0)) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (+ (/ 1 u0) (* 1/3 (/ 1 (pow u0 3))))) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* 1/4 (pow u0 4))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* (pow u0 4) (+ 1/4 (* 1/3 (/ 1 u0))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* (pow u0 4) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (* 1/3 (/ 1 u0)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* (pow u0 4) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (+ (* 1/3 (/ 1 u0)) (/ 1 (pow u0 3))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* 1/4 (pow u0 3))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* (pow u0 3) (+ 1/4 (* 1/3 (/ 1 u0))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* (pow u0 3) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (* 1/3 (/ 1 u0)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* (pow u0 3) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (+ (* 1/3 (/ 1 u0)) (/ 1 (pow u0 3))))))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (* 1/4 (pow u0 2))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (* (pow u0 2) (+ 1/4 (* 1/3 (/ 1 u0))))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (* (pow u0 2) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (* 1/3 (/ 1 u0)))))))
#s(approx (+ (* 1/4 u0) 1/3) #s(hole binary32 (* 1/4 u0)))
#s(approx (+ (* 1/4 u0) 1/3) #s(hole binary32 (* u0 (+ 1/4 (* 1/3 (/ 1 u0))))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (/ (pow alphax 2) (* cos2phi u0)) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (* 1/2 (/ (pow alphax 2) (* cos2phi (pow u0 2)))) (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (* 1/3 (/ (pow alphax 2) (* cos2phi (pow u0 3)))) (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (+ (* -1/2 (/ (pow alphax 2) (* cos2phi (pow u0 2)))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi)))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (+ (* -1/2 (/ (pow alphax 2) (* cos2phi (pow u0 2)))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (+ (* -1/2 (/ (pow alphax 2) (* cos2phi (pow u0 2)))) (+ (* -1/3 (/ (pow alphax 2) (* cos2phi (pow u0 3)))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) cos2phi)))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) cos2phi)) (/ (log -1) cos2phi)) (/ 1 (* cos2phi u0)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (+ (* -1 (/ (log (/ 1 u0)) cos2phi)) (+ (* -1 (/ (+ (/ 1 cos2phi) (* 1/2 (/ 1 (* cos2phi u0)))) u0)) (/ (log -1) cos2phi)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) cos2phi)) (+ (* -1 (/ (+ (* 1/2 (/ 1 cos2phi)) (* 1/3 (/ 1 (* cos2phi u0)))) (pow u0 2))) (/ (log -1) cos2phi))) (/ 1 (* cos2phi u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (log -1) (* -1 (log (/ 1 u0))))))
#s(approx (log (- 1 u0)) #s(hole binary32 (- (+ (log -1) (* -1 (log (/ 1 u0)))) (/ 1 u0))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (log -1) (+ (* -1 (log (/ 1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0))))))
#s(approx (log (- 1 u0)) #s(hole binary32 (- (+ (log -1) (+ (* -1 (log (/ 1 u0))) (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) (pow u0 2))))) (/ 1 u0))))
#s(approx (- 1 u0) #s(hole binary32 (* -1 u0)))
#s(approx (- 1 u0) #s(hole binary32 (* u0 (- (/ 1 u0) 1))))
#s(approx (* u0 (- (/ 1 u0) 1)) #s(hole binary32 (* -1 u0)))
#s(approx (* u0 (- (/ 1 u0) 1)) #s(hole binary32 (* u0 (- (/ 1 u0) 1))))
#s(approx (- (/ 1 u0) 1) #s(hole binary32 -1))
#s(approx (- (/ 1 u0) 1) #s(hole binary32 (- (/ 1 u0) 1)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (* -1 (log (/ 1 u0))) (+ (log -1) (* -2 (log (/ 1 u0))))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (+ (* -2 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log -1) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (+ (* -2 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log -1) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/3 (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))) (+ (* -2 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log -1) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (* -1 (log (/ 1 u0))) (+ (log -1) (* -2 (log (/ 1 u0)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (/ 1 u0)) (+ (log -1) (* -2 (log (/ 1 u0)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (+ (/ 1/2 (pow u0 2)) (/ 1 u0))) (+ (log -1) (* -2 (log (/ 1 u0)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (+ (/ 1/2 (pow u0 2)) (+ (/ 1 u0) (* 1/3 (/ 1 (pow u0 3)))))) (+ (log -1) (* -2 (log (/ 1 u0)))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (log -1) (* -2 (log (/ 1 u0)))) (* -1 (log (/ 1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (log -1) (* -2 (log (/ 1 u0)))) (+ (* -1 (log (/ 1 u0))) (/ 1 u0)))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (log -1) (+ (* -2 (log (/ 1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0)))) (* -1 (log (/ 1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (log -1) (+ (* -2 (log (/ 1 u0))) (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) (pow u0 2))))) (+ (* -1 (log (/ 1 u0))) (/ 1 u0)))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (+ (log -1) (* -2 (log (/ 1 u0))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (- (+ (log -1) (* -2 (log (/ 1 u0)))) (/ 1 (pow u0 2)))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (+ (log -1) (+ (* -2 (log (/ 1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 (pow u0 2)))) (pow u0 2)))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (- (+ (log -1) (+ (* -2 (log (/ 1 u0))) (* -1 (/ (+ 1/2 (* 1/3 (/ 1 (pow u0 2)))) (pow u0 4))))) (/ 1 (pow u0 2)))))
#s(approx (- 1 (* u0 u0)) #s(hole binary32 (* -1 (pow u0 2))))
#s(approx (- 1 (* u0 u0)) #s(hole binary32 (* (pow u0 2) (- (/ 1 (pow u0 2)) 1))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (* -1 (log (/ 1 u0)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (* -1 (log (/ 1 u0))) (/ 1 u0))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (/ 1 u0)) (/ 1/2 (pow u0 2)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (+ (/ 1 u0) (* 1/3 (/ 1 (pow u0 3))))) (/ 1/2 (pow u0 2)))))
#s(approx (+ 1 u0) #s(hole binary32 u0))
#s(approx (+ 1 u0) #s(hole binary32 (* u0 (+ 1 (/ 1 u0)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* 1/4 (/ (pow u0 4) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (+ (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* 1/4 (/ (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (+ (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* 1/4 (/ (* (pow alphay 2) (pow u0 3)) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ (pow alphay 2) sin2phi)) (* 1/3 (/ (pow alphay 2) (* sin2phi u0)))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ (pow alphay 2) sin2phi)) (+ (* 1/3 (/ (pow alphay 2) (* sin2phi u0))) (* 1/2 (/ (pow alphay 2) (* sin2phi (pow u0 2)))))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ (pow alphay 2) sin2phi)) (+ (* 1/3 (/ (pow alphay 2) (* sin2phi u0))) (+ (* 1/2 (/ (pow alphay 2) (* sin2phi (pow u0 2)))) (/ (pow alphay 2) (* sin2phi (pow u0 3)))))))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (* 1/4 (/ (pow u0 3) sin2phi))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ 1 sin2phi)) (* 1/3 (/ 1 (* sin2phi u0)))))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (* (pow u0 3) (+ (/ 1/3 (* sin2phi u0)) (+ (/ 1/2 (* sin2phi (pow u0 2))) (* 1/4 (/ 1 sin2phi)))))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (* (pow u0 3) (+ (/ 1/3 (* sin2phi u0)) (+ (* 1/4 (/ 1 sin2phi)) (+ (* 1/2 (/ 1 (* sin2phi (pow u0 2)))) (/ 1 (* sin2phi (pow u0 3)))))))))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) #s(hole binary32 (* 1/4 (/ (pow u0 2) sin2phi))))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) #s(hole binary32 (* (pow u0 2) (+ (* 1/4 (/ 1 sin2phi)) (* 1/3 (/ 1 (* sin2phi u0)))))))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) #s(hole binary32 (* (pow u0 2) (+ (/ 1/3 (* sin2phi u0)) (+ (/ 1/2 (* sin2phi (pow u0 2))) (* 1/4 (/ 1 sin2phi)))))))
#s(approx (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) #s(hole binary32 (* 1/4 (/ u0 sin2phi))))
#s(approx (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) #s(hole binary32 (* u0 (+ (* 1/4 (/ 1 sin2phi)) (* 1/3 (/ 1 (* sin2phi u0)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (- (* -1 (/ (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) u0)) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (log (/ -1 u0))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (/ 1 u0) (* -1 (log (/ -1 u0))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (/ 1 u0)) (* -1 (log (/ -1 u0))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (* -1 (/ (- (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) u0)) 1) u0)) (* -1 (log (/ -1 u0))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* (pow u0 4) (+ 1/4 (* -1 (/ (- (* -1 (/ (+ 1/2 (/ 1 u0)) u0)) 1/3) u0))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ 1/3 (* 1/2 (/ 1 u0))) u0)) 1/4)))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ 1/3 (+ (* 1/2 (/ 1 u0)) (/ 1 (pow u0 2)))) u0)) 1/4)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (/ (pow alphax 2) (* cos2phi u0)) (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (* -1 (/ (- (* -1/2 (/ (pow alphax 2) (* cos2phi u0))) (/ (pow alphax 2) cos2phi)) u0)) (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (* -1 (/ (- (* -1 (/ (- (* 1/3 (/ (pow alphax 2) (* cos2phi u0))) (* -1/2 (/ (pow alphax 2) cos2phi))) u0)) (/ (pow alphax 2) cos2phi)) u0)) (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)) (* -1 (/ (pow alphax 2) (* cos2phi u0))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)) (* -1 (/ (+ (* 1/2 (/ (pow alphax 2) (* cos2phi u0))) (/ (pow alphax 2) cos2phi)) u0)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (pow alphax 2) cos2phi)) (* -1/3 (/ (pow alphax 2) (* cos2phi u0)))) u0)) (/ (pow alphax 2) cos2phi)) u0)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* -1 (/ (log (/ -1 u0)) cos2phi))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (- (* -1 (/ (log (/ -1 u0)) cos2phi)) (/ 1 (* cos2phi u0)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (+ (* -1 (/ (log (/ -1 u0)) cos2phi)) (* -1 (/ (+ (/ 1 cos2phi) (* 1/2 (/ 1 (* cos2phi u0)))) u0)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (+ (* -1 (/ (log (/ -1 u0)) cos2phi)) (* -1 (/ (+ (/ 1/3 (* cos2phi (pow u0 2))) (+ (/ 1/2 (* cos2phi u0)) (/ 1 cos2phi))) u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* -1 (log (/ -1 u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (- (* -1 (log (/ -1 u0))) (/ 1 u0))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (* -1 (log (/ -1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (* -1 (log (/ -1 u0))) (* -1 (/ (+ 1 (+ (/ 1/3 (pow u0 2)) (* 1/2 (/ 1 u0)))) u0)))))
#s(approx (- 1 u0) #s(hole binary32 (* -1 (* u0 (- 1 (/ 1 u0))))))
#s(approx (* u0 (- (/ 1 u0) 1)) #s(hole binary32 (* -1 (* u0 (- 1 (/ 1 u0))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (* -1 (log (/ -1 u0))) (* -2 (log (/ -1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* -2 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* -2 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* -1 (/ (- (* -1 (/ (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) u0))) (* -2 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (* -1 (log (/ -1 u0))) (* -2 (log (/ -1 u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ -1 u0))) (/ 1 u0)) (* -2 (log (/ -1 u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ -1 u0))) (+ (/ 1/2 (pow u0 2)) (/ 1 u0))) (* -2 (log (/ -1 u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ -1 u0))) (* -1 (/ (- (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) u0)) 1) u0))) (* -2 (log (/ -1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (* -2 (log (/ -1 u0))) (* -1 (log (/ -1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (* -2 (log (/ -1 u0))) (+ (* -1 (log (/ -1 u0))) (/ 1 u0)))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (* -2 (log (/ -1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0))) (* -1 (log (/ -1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (* -2 (log (/ -1 u0))) (* -1 (/ (+ 1 (+ (/ 1/3 (pow u0 2)) (* 1/2 (/ 1 u0)))) u0))) (* -1 (log (/ -1 u0))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (+ (log -1) (* -2 (log (/ -1 u0))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (- (+ (log -1) (* -2 (log (/ -1 u0)))) (/ 1 (pow u0 2)))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (+ (log -1) (+ (* -2 (log (/ -1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 (pow u0 2)))) (pow u0 2)))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (- (+ (log -1) (+ (* -2 (log (/ -1 u0))) (* -1 (/ (+ 1/2 (* 1/3 (/ 1 (pow u0 2)))) (pow u0 4))))) (/ 1 (pow u0 2)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (log -1) (* -1 (log (/ -1 u0))))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (log -1) (+ (* -1 (log (/ -1 u0))) (/ 1 u0)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (log -1) (+ (* -1 (log (/ -1 u0))) (* -1 (/ (- (* 1/2 (/ 1 u0)) 1) u0))))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (log -1) (+ (* -1 (log (/ -1 u0))) (* -1 (/ (- (* -1 (/ (- (* 1/3 (/ 1 u0)) 1/2) u0)) 1) u0))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (* -1 (/ (- (* -1 (/ (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ (* 1/2 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ (/ 1/2 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) u0)) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* -1 (* (pow u0 3) (+ (* -1/3 (/ (pow alphay 2) (* sin2phi u0))) (* -1/4 (/ (pow alphay 2) sin2phi)))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* -1 (* (pow u0 3) (+ (* -1 (/ (+ (* 1/3 (/ (pow alphay 2) sin2phi)) (* 1/2 (/ (pow alphay 2) (* sin2phi u0)))) u0)) (* -1/4 (/ (pow alphay 2) sin2phi)))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* -1 (* (pow u0 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (pow alphay 2) (* sin2phi u0))) (* -1/2 (/ (pow alphay 2) sin2phi))) u0)) (* 1/3 (/ (pow alphay 2) sin2phi))) u0)) (* -1/4 (/ (pow alphay 2) sin2phi)))))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ (* 1/3 (/ 1 sin2phi)) (* 1/2 (/ 1 (* sin2phi u0)))) u0)) (* 1/4 (/ 1 sin2phi)))))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ (/ 1/2 (* sin2phi u0)) (+ (* 1/3 (/ 1 sin2phi)) (/ 1 (* sin2phi (pow u0 2))))) u0)) (* 1/4 (/ 1 sin2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (* cos2phi (+ (* -1 (/ (* (pow alphay 6) (* cos2phi (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (* cos2phi (+ (* cos2phi (+ (* -1 (/ (* (pow alphay 6) (log (- 1 u0))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 8) (* cos2phi (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))) (/ (* (pow alphay 4) (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx cos2phi #s(hole binary32 cos2phi))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (/ (log (- 1 u0)) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* cos2phi (- (/ (* (pow alphay 6) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 3))) (/ (* (pow alphay 4) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 2) (pow sin2phi 2))))) (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* cos2phi (- (* cos2phi (- (* -1 (/ (* (pow alphay 8) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) (pow sin2phi 4)))) (* -1 (/ (* (pow alphay 6) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 4) (pow sin2phi 3)))))) (/ (* (pow alphay 4) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 2) (pow sin2phi 2))))) (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* cos2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* cos2phi (+ (* cos2phi (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* cos2phi (+ (* cos2phi (+ (* cos2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow alphay 8) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))))) (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* cos2phi (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* cos2phi (- (+ (* cos2phi (- (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* cos2phi (- (+ (* cos2phi (- (+ (* cos2phi (- (* u0 (+ (* -1/2 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow alphay 8) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4))))) (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3))))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 2)))) (+ (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi)) (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 3)))))) cos2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) cos2phi))) (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (+ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) (pow cos2phi 3)))) (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) (pow cos2phi 2)))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6)))) (pow cos2phi 3)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) (pow cos2phi 2))))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2)) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi) (pow alphax 2))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (pow cos2phi 2)) (pow alphax 2)))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (pow cos2phi 3)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (pow cos2phi 2)) (pow alphax 2))))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (+ (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)) (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 3)))))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi))) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) cos2phi))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (pow alphay 2))) cos2phi)) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) cos2phi))) (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (pow alphay 4))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (pow alphay 2))) cos2phi)) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) cos2phi))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* -1 (/ (- (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphay 2))) cos2phi))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* -1 (/ (- (* -1 (/ (- (/ (* (pow alphax 8) (* (pow sin2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) cos2phi)) (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphay 4))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphay 2))) cos2phi))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4)))) cos2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))))) cos2phi)) (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6)))) cos2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) cos2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))))) cos2phi)) (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) cos2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2)))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) cos2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4)))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) cos2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2)))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (* sin2phi (+ (* -1 (/ (* (pow alphax 6) (* sin2phi (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (* sin2phi (+ (* sin2phi (+ (* -1 (/ (* (pow alphax 6) (log (- 1 u0))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 8) (* sin2phi (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))) (/ (* (pow alphax 4) (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx sin2phi #s(hole binary32 sin2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* sin2phi (- (/ (* (pow alphax 6) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 3))) (/ (* (pow alphax 4) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 2) (pow cos2phi 2))))) (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* sin2phi (- (* sin2phi (- (* -1 (/ (* (pow alphax 8) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) (pow cos2phi 4)))) (* -1 (/ (* (pow alphax 6) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 4) (pow cos2phi 3)))))) (/ (* (pow alphax 4) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 2) (pow cos2phi 2))))) (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* sin2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* sin2phi (+ (* sin2phi (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* sin2phi (+ (* sin2phi (+ (* sin2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow alphax 8) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))))) (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* sin2phi (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* sin2phi (- (+ (* sin2phi (- (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* sin2phi (- (+ (* sin2phi (- (+ (* sin2phi (- (* u0 (+ (* -1/2 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow alphax 8) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4))))) (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3))))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (/ (* (pow alphay 2) (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0))))))) sin2phi)))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (/ (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))))) sin2phi)))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) #s(hole binary32 (/ (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))) sin2phi)))
#s(approx (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) #s(hole binary32 (/ (+ 1/3 (* 1/4 u0)) sin2phi)))
#s(approx (* 1/3 (/ 1 sin2phi)) #s(hole binary32 (/ 1/3 sin2phi)))
#s(approx (/ 1 sin2phi) #s(hole binary32 (/ 1 sin2phi)))
#s(approx (* 1/2 (/ 1 sin2phi)) #s(hole binary32 (/ 1/2 sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 2)))) (+ (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi)) (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 3)))))) sin2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) sin2phi))) (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (+ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) (pow sin2phi 3)))) (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) (pow sin2phi 2)))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6)))) (pow sin2phi 3)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) (pow sin2phi 2))))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2)) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi) (pow alphay 2))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (pow sin2phi 2)) (pow alphay 2)))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (pow sin2phi 3)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (pow sin2phi 2)) (pow alphay 2))))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (+ (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)) (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 3)))))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi))) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) sin2phi))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (pow alphax 2))) sin2phi)) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) sin2phi))) (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (pow alphax 4))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (pow alphax 2))) sin2phi)) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) sin2phi))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* -1 (/ (- (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphax 2))) sin2phi))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* -1 (/ (- (* -1 (/ (- (/ (* (pow alphay 8) (* (pow cos2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) sin2phi)) (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphax 4))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphax 2))) sin2phi))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4)))) sin2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))))) sin2phi)) (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6)))) sin2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) sin2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))))) sin2phi)) (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) sin2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2)))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) sin2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4)))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) sin2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2)))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* -1 (/ (* (pow alphay 2) (- (* u0 (- (* u0 (- (* -1/4 u0) 1/3)) 1/2)) 1)) sin2phi))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (* -1 (/ (- (* u0 (- (* u0 (- (* -1/4 u0) 1/3)) 1/2)) 1) sin2phi))))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) #s(hole binary32 (* -1 (/ (- (* u0 (- (* -1/4 u0) 1/3)) 1/2) sin2phi))))
#s(approx (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) #s(hole binary32 (* -1 (/ (- (* -1/4 u0) 1/3) sin2phi))))
Calls

15 calls:

TimeVariablePointExpression
26.0ms
alphay
@0
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (+ (* 1/4 u0) 1/3) 1/4 u0 1/3 1/2 1 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ cos2phi (* alphax alphax)) cos2phi (* alphax alphax) alphax (/ sin2phi (* alphay alphay)) sin2phi (* alphay alphay) alphay (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/ (* (* alphax alphax) u0) cos2phi) (* (* alphax alphax) u0) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/ (log (- 1 u0)) cos2phi) (log (- 1 u0)) (- 1 u0) (* u0 (- (/ 1 u0) 1)) (- (/ 1 u0) 1) (/ 1 u0) (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (log (- 1 (* u0 u0))) (- 1 (* u0 u0)) (* u0 u0) (log (+ 1 u0)) (+ 1 u0) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) (/ u0 sin2phi) (* 1/3 (/ 1 sin2phi)) (/ 1 sin2phi) (* 1/2 (/ 1 sin2phi)))
17.0ms
cos2phi
@inf
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (+ (* 1/4 u0) 1/3) 1/4 u0 1/3 1/2 1 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ cos2phi (* alphax alphax)) cos2phi (* alphax alphax) alphax (/ sin2phi (* alphay alphay)) sin2phi (* alphay alphay) alphay (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/ (* (* alphax alphax) u0) cos2phi) (* (* alphax alphax) u0) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/ (log (- 1 u0)) cos2phi) (log (- 1 u0)) (- 1 u0) (* u0 (- (/ 1 u0) 1)) (- (/ 1 u0) 1) (/ 1 u0) (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (log (- 1 (* u0 u0))) (- 1 (* u0 u0)) (* u0 u0) (log (+ 1 u0)) (+ 1 u0) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) (/ u0 sin2phi) (* 1/3 (/ 1 sin2phi)) (/ 1 sin2phi) (* 1/2 (/ 1 sin2phi)))
13.0ms
cos2phi
@-inf
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (+ (* 1/4 u0) 1/3) 1/4 u0 1/3 1/2 1 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ cos2phi (* alphax alphax)) cos2phi (* alphax alphax) alphax (/ sin2phi (* alphay alphay)) sin2phi (* alphay alphay) alphay (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/ (* (* alphax alphax) u0) cos2phi) (* (* alphax alphax) u0) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/ (log (- 1 u0)) cos2phi) (log (- 1 u0)) (- 1 u0) (* u0 (- (/ 1 u0) 1)) (- (/ 1 u0) 1) (/ 1 u0) (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (log (- 1 (* u0 u0))) (- 1 (* u0 u0)) (* u0 u0) (log (+ 1 u0)) (+ 1 u0) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) (/ u0 sin2phi) (* 1/3 (/ 1 sin2phi)) (/ 1 sin2phi) (* 1/2 (/ 1 sin2phi)))
12.0ms
alphax
@0
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (+ (* 1/4 u0) 1/3) 1/4 u0 1/3 1/2 1 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ cos2phi (* alphax alphax)) cos2phi (* alphax alphax) alphax (/ sin2phi (* alphay alphay)) sin2phi (* alphay alphay) alphay (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/ (* (* alphax alphax) u0) cos2phi) (* (* alphax alphax) u0) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/ (log (- 1 u0)) cos2phi) (log (- 1 u0)) (- 1 u0) (* u0 (- (/ 1 u0) 1)) (- (/ 1 u0) 1) (/ 1 u0) (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (log (- 1 (* u0 u0))) (- 1 (* u0 u0)) (* u0 u0) (log (+ 1 u0)) (+ 1 u0) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) (/ u0 sin2phi) (* 1/3 (/ 1 sin2phi)) (/ 1 sin2phi) (* 1/2 (/ 1 sin2phi)))
10.0ms
alphax
@inf
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (+ (* 1/4 u0) 1/3) 1/4 u0 1/3 1/2 1 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ cos2phi (* alphax alphax)) cos2phi (* alphax alphax) alphax (/ sin2phi (* alphay alphay)) sin2phi (* alphay alphay) alphay (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/ (* (* alphax alphax) u0) cos2phi) (* (* alphax alphax) u0) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/ (log (- 1 u0)) cos2phi) (log (- 1 u0)) (- 1 u0) (* u0 (- (/ 1 u0) 1)) (- (/ 1 u0) 1) (/ 1 u0) (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (log (- 1 (* u0 u0))) (- 1 (* u0 u0)) (* u0 u0) (log (+ 1 u0)) (+ 1 u0) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) (/ u0 sin2phi) (* 1/3 (/ 1 sin2phi)) (/ 1 sin2phi) (* 1/2 (/ 1 sin2phi)))

rewrite268.0ms (4.8%)

Memory
20.5MiB live, 308.0MiB allocated; 75ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0233330203
0239829690
0895328441
Stop Event
iter-limit
node-limit
iter-limit
Counts
461 → 504
Calls
Call 1
Inputs
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0))
(*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)
(fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32))
(fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32))
(fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32))
#s(literal 1/4 binary32)
u0
#s(literal 1/3 binary32)
#s(literal 1/2 binary32)
#s(literal 1 binary32)
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
(/.f32 cos2phi (*.f32 alphax alphax))
cos2phi
(*.f32 alphax alphax)
alphax
(/.f32 sin2phi (*.f32 alphay alphay))
sin2phi
(*.f32 alphay alphay)
alphay
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi))
(/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)
(*.f32 (*.f32 alphax alphax) u0)
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi))))
(neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi)))
(*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi))
(/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi)
(log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32)))))
#s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))
(*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32)))
(-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))
(/.f32 #s(literal 1 binary32) u0)
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0))))
(-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))
(log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))
(-.f32 #s(literal 1 binary32) (*.f32 u0 u0))
(*.f32 u0 u0)
(log.f32 (+.f32 #s(literal 1 binary32) u0))
(+.f32 #s(literal 1 binary32) u0)
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
(*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))) u0)
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi))))
(*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))
(fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi))
(fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))
(fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))
(/.f32 u0 sin2phi)
(*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))
(/.f32 #s(literal 1 binary32) sin2phi)
(*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (/ (* (pow alphax 2) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (* (pow alphax 2) (+ (* -1 (/ (* (pow alphax 2) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* sin2phi (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (* (pow alphax 2) (+ (* (pow alphax 2) (+ (* -1 (/ (* (pow sin2phi 2) (log (- 1 u0))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 2) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))) (/ (* sin2phi (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (/ cos2phi (* alphax alphax)) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (* alphax alphax) #s(hole binary32 (pow alphax 2)))
#s(approx alphax #s(hole binary32 alphax))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi))))
#s(approx (/ (* (* alphax alphax) u0) cos2phi) #s(hole binary32 (/ (* (pow alphax 2) u0) cos2phi)))
#s(approx (* (* alphax alphax) u0) #s(hole binary32 (* (pow alphax 2) u0)))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (- (+ (* -1 (/ (* (pow alphax 2) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) (pow cos2phi 2)))) (/ (log (+ 1 u0)) cos2phi)) (/ (log (- 1 (pow u0 2))) cos2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (- (+ (* (pow alphax 2) (- (/ (* (pow alphax 2) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 3))) (/ (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 2) (pow cos2phi 2))))) (/ (log (+ 1 u0)) cos2phi)) (/ (log (- 1 (pow u0 2))) cos2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (- (+ (* (pow alphax 2) (- (* (pow alphax 2) (- (* -1 (/ (* (pow alphax 2) (* (pow sin2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) (pow cos2phi 4)))) (* -1 (/ (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 4) (pow cos2phi 3)))))) (/ (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 2) (pow cos2phi 2))))) (/ (log (+ 1 u0)) cos2phi)) (/ (log (- 1 (pow u0 2))) cos2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))) (* (pow alphax 2) (* u0 (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))) (* (pow alphax 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (* (pow alphax 2) (* u0 (- (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))) (* (pow alphax 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (* (pow alphax 2) (+ (* u0 (- (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))) (* (pow alphax 2) (* u0 (- (* u0 (+ (* -1/2 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow sin2phi 3) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4))))))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (+ (* (pow alphax 2) (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (+ (* (pow alphax 2) (- (+ (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (* (pow alphax 2) (- (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (+ (* (pow alphax 2) (- (+ (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (* (pow alphax 2) (- (+ (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* (pow alphax 2) (- (* u0 (+ (* -1/2 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow sin2phi 3) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (+ (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2))) (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) (pow sin2phi 2)))) (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi) (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) (pow sin2phi 4)))) (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2)))) (pow alphax 2)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2)))) (pow alphax 2)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))) (pow alphax 4))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2)))) (pow alphax 2)) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow sin2phi 4))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4)))) (pow alphax 6)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))) (pow alphax 4)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (pow alphax 2)) (/ (pow alphay 2) sin2phi))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (pow alphax 2)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (pow alphax 4)) (/ (pow alphay 2) sin2phi)))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (pow alphax 2)) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow sin2phi 4))))))) (pow alphax 6)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (pow alphax 4)) (/ (pow alphay 2) sin2phi))))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (+ (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2))) (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (/ (* (pow alphay 2) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (* (pow alphay 2) (+ (* -1 (/ (* (pow alphay 2) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* cos2phi (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (* (pow alphay 2) (+ (* (pow alphay 2) (+ (* -1 (/ (* (pow cos2phi 2) (log (- 1 u0))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 2) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))) (/ (* cos2phi (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (/ sin2phi (* alphay alphay)) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (* alphay alphay) #s(hole binary32 (pow alphay 2)))
#s(approx alphay #s(hole binary32 alphay))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (- (+ (* -1 (/ (* (pow alphay 2) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) (pow sin2phi 2)))) (/ (log (+ 1 u0)) sin2phi)) (/ (log (- 1 (pow u0 2))) sin2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (- (+ (* (pow alphay 2) (- (/ (* (pow alphay 2) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 3))) (/ (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 2) (pow sin2phi 2))))) (/ (log (+ 1 u0)) sin2phi)) (/ (log (- 1 (pow u0 2))) sin2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (- (+ (* (pow alphay 2) (- (* (pow alphay 2) (- (* -1 (/ (* (pow alphay 2) (* (pow cos2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) (pow sin2phi 4)))) (* -1 (/ (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 4) (pow sin2phi 3)))))) (/ (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 2) (pow sin2phi 2))))) (/ (log (+ 1 u0)) sin2phi)) (/ (log (- 1 (pow u0 2))) sin2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (* (pow alphay 2) (* u0 (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (* (pow alphay 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (* (pow alphay 2) (* u0 (- (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (* (pow alphay 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (* (pow alphay 2) (+ (* u0 (- (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))) (* (pow alphay 2) (* u0 (- (* u0 (+ (* -1/2 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow cos2phi 3) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4))))))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (+ (* (pow alphay 2) (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (+ (* (pow alphay 2) (- (+ (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (* (pow alphay 2) (- (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (+ (* (pow alphay 2) (- (+ (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (* (pow alphay 2) (- (+ (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* (pow alphay 2) (- (* u0 (+ (* -1/2 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow cos2phi 3) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (+ (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2))) (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) (pow cos2phi 2)))) (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi) (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) (pow cos2phi 4)))) (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2)))) (pow alphay 2)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2)))) (pow alphay 2)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))) (pow alphay 4))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2)))) (pow alphay 2)) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow cos2phi 4))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4)))) (pow alphay 6)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))) (pow alphay 4)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (pow alphay 2)) (/ (pow alphax 2) cos2phi))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (pow alphay 2)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (pow alphay 4)) (/ (pow alphax 2) cos2phi)))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (pow alphay 2)) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow cos2phi 4))))))) (pow alphay 6)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (pow alphay 4)) (/ (pow alphax 2) cos2phi))))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (+ (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2))) (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 u0))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* 1/3 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 u0))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* 1/3 u0)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 1))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (+ 1 (* 1/2 u0))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (+ 1 (* u0 (+ 1/2 (* 1/3 u0))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0))))))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 1/2))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (+ 1/2 (* 1/3 u0))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0))))))
#s(approx (+ (* 1/4 u0) 1/3) #s(hole binary32 1/3))
#s(approx (+ (* 1/4 u0) 1/3) #s(hole binary32 (+ 1/3 (* 1/4 u0))))
#s(approx u0 #s(hole binary32 u0))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (/ (* (pow alphax 2) u0) cos2phi)))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* u0 (- (* 1/2 (/ (* (pow alphax 2) u0) cos2phi)) (* -1 (/ (pow alphax 2) cos2phi))))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* u0 (- (* u0 (- (* 1/3 (/ (* (pow alphax 2) u0) cos2phi)) (* -1/2 (/ (pow alphax 2) cos2phi)))) (* -1 (/ (pow alphax 2) cos2phi))))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* u0 (- (* u0 (- (* u0 (- (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* -1/3 (/ (pow alphax 2) cos2phi)))) (* -1/2 (/ (pow alphax 2) cos2phi)))) (* -1 (/ (pow alphax 2) cos2phi))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* -1 (/ (* (pow alphax 2) u0) cos2phi))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* u0 (+ (* -1 (/ (pow alphax 2) cos2phi)) (* -1/2 (/ (* (pow alphax 2) u0) cos2phi))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* u0 (+ (* -1 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* -1/2 (/ (pow alphax 2) cos2phi)) (* -1/3 (/ (* (pow alphax 2) u0) cos2phi))))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* u0 (+ (* -1 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* -1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* -1/3 (/ (pow alphax 2) cos2phi)) (* -1/4 (/ (* (pow alphax 2) u0) cos2phi))))))))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* -1 (/ u0 cos2phi))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* u0 (- (* u0 (- (* -1/3 (/ u0 cos2phi)) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* u0 (- (* u0 (- (* u0 (- (* -1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* -1 u0)))
#s(approx (log (- 1 u0)) #s(hole binary32 (* u0 (- (* -1/2 u0) 1))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* u0 (- (* u0 (- (* u0 (- (* -1/4 u0) 1/3)) 1/2)) 1))))
#s(approx (- 1 u0) #s(hole binary32 1))
#s(approx (- 1 u0) #s(hole binary32 (+ 1 (* -1 u0))))
#s(approx (* u0 (- (/ 1 u0) 1)) #s(hole binary32 1))
#s(approx (* u0 (- (/ 1 u0) 1)) #s(hole binary32 (+ 1 (* -1 u0))))
#s(approx (- (/ 1 u0) 1) #s(hole binary32 (/ 1 u0)))
#s(approx (- (/ 1 u0) 1) #s(hole binary32 (/ (+ 1 (* -1 u0)) u0)))
#s(approx (/ 1 u0) #s(hole binary32 (/ 1 u0)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 u0))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* 1/3 u0)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (* -1 u0)))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (* u0 (- (* -1/2 u0) 1))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (* u0 (- (* u0 (- (* u0 (- (* -1/4 u0) 1/3)) 1/2)) 1))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (* -1 (pow u0 2))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (* (pow u0 2) (- (* -1/2 (pow u0 2)) 1))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (* (pow u0 2) (- (* (pow u0 2) (- (* -1/3 (pow u0 2)) 1/2)) 1))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (* (pow u0 2) (- (* (pow u0 2) (- (* (pow u0 2) (- (* -1/4 (pow u0 2)) 1/3)) 1/2)) 1))))
#s(approx (- 1 (* u0 u0)) #s(hole binary32 1))
#s(approx (- 1 (* u0 u0)) #s(hole binary32 (+ 1 (* -1 (pow u0 2)))))
#s(approx (* u0 u0) #s(hole binary32 (pow u0 2)))
#s(approx (log (+ 1 u0)) #s(hole binary32 u0))
#s(approx (log (+ 1 u0)) #s(hole binary32 (* u0 (+ 1 (* -1/2 u0)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (* u0 (+ 1 (* u0 (- (* 1/3 u0) 1/2))))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (* u0 (+ 1 (* u0 (- (* u0 (+ 1/3 (* -1/4 u0))) 1/2))))))
#s(approx (+ 1 u0) #s(hole binary32 1))
#s(approx (+ 1 u0) #s(hole binary32 (+ 1 u0)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (/ (pow alphay 2) sin2phi)))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (+ (* 1/2 (/ (* (pow alphay 2) u0) sin2phi)) (/ (pow alphay 2) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (+ (* u0 (+ (* 1/3 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/2 (/ (pow alphay 2) sin2phi)))) (/ (pow alphay 2) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (/ 1 sin2phi)))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (+ (* 1/2 (/ u0 sin2phi)) (/ 1 sin2phi))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (+ (* u0 (+ (* 1/3 (/ u0 sin2phi)) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) #s(hole binary32 (/ 1/2 sin2phi)))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) #s(hole binary32 (+ (* 1/3 (/ u0 sin2phi)) (* 1/2 (/ 1 sin2phi)))))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) #s(hole binary32 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))))
#s(approx (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) #s(hole binary32 (/ 1/3 sin2phi)))
#s(approx (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) #s(hole binary32 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))))
#s(approx (/ u0 sin2phi) #s(hole binary32 (/ u0 sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/3 (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* -1 (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (/ 1 u0) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (/ 1 u0)) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (+ (/ 1 u0) (* 1/3 (/ 1 (pow u0 3))))) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* 1/4 (pow u0 4))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* (pow u0 4) (+ 1/4 (* 1/3 (/ 1 u0))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* (pow u0 4) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (* 1/3 (/ 1 u0)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* (pow u0 4) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (+ (* 1/3 (/ 1 u0)) (/ 1 (pow u0 3))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* 1/4 (pow u0 3))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* (pow u0 3) (+ 1/4 (* 1/3 (/ 1 u0))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* (pow u0 3) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (* 1/3 (/ 1 u0)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* (pow u0 3) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (+ (* 1/3 (/ 1 u0)) (/ 1 (pow u0 3))))))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (* 1/4 (pow u0 2))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (* (pow u0 2) (+ 1/4 (* 1/3 (/ 1 u0))))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (* (pow u0 2) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (* 1/3 (/ 1 u0)))))))
#s(approx (+ (* 1/4 u0) 1/3) #s(hole binary32 (* 1/4 u0)))
#s(approx (+ (* 1/4 u0) 1/3) #s(hole binary32 (* u0 (+ 1/4 (* 1/3 (/ 1 u0))))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (/ (pow alphax 2) (* cos2phi u0)) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (* 1/2 (/ (pow alphax 2) (* cos2phi (pow u0 2)))) (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (* 1/3 (/ (pow alphax 2) (* cos2phi (pow u0 3)))) (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (+ (* -1/2 (/ (pow alphax 2) (* cos2phi (pow u0 2)))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi)))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (+ (* -1/2 (/ (pow alphax 2) (* cos2phi (pow u0 2)))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (pow alphax 2) (* cos2phi u0))) (+ (* -1/2 (/ (pow alphax 2) (* cos2phi (pow u0 2)))) (+ (* -1/3 (/ (pow alphax 2) (* cos2phi (pow u0 3)))) (/ (* (pow alphax 2) (+ (log -1) (* -1 (log (/ 1 u0))))) cos2phi))))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) cos2phi)))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) cos2phi)) (/ (log -1) cos2phi)) (/ 1 (* cos2phi u0)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (+ (* -1 (/ (log (/ 1 u0)) cos2phi)) (+ (* -1 (/ (+ (/ 1 cos2phi) (* 1/2 (/ 1 (* cos2phi u0)))) u0)) (/ (log -1) cos2phi)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) cos2phi)) (+ (* -1 (/ (+ (* 1/2 (/ 1 cos2phi)) (* 1/3 (/ 1 (* cos2phi u0)))) (pow u0 2))) (/ (log -1) cos2phi))) (/ 1 (* cos2phi u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (log -1) (* -1 (log (/ 1 u0))))))
#s(approx (log (- 1 u0)) #s(hole binary32 (- (+ (log -1) (* -1 (log (/ 1 u0)))) (/ 1 u0))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (log -1) (+ (* -1 (log (/ 1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0))))))
#s(approx (log (- 1 u0)) #s(hole binary32 (- (+ (log -1) (+ (* -1 (log (/ 1 u0))) (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) (pow u0 2))))) (/ 1 u0))))
#s(approx (- 1 u0) #s(hole binary32 (* -1 u0)))
#s(approx (- 1 u0) #s(hole binary32 (* u0 (- (/ 1 u0) 1))))
#s(approx (* u0 (- (/ 1 u0) 1)) #s(hole binary32 (* -1 u0)))
#s(approx (* u0 (- (/ 1 u0) 1)) #s(hole binary32 (* u0 (- (/ 1 u0) 1))))
#s(approx (- (/ 1 u0) 1) #s(hole binary32 -1))
#s(approx (- (/ 1 u0) 1) #s(hole binary32 (- (/ 1 u0) 1)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (* -1 (log (/ 1 u0))) (+ (log -1) (* -2 (log (/ 1 u0))))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (+ (* -2 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log -1) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (+ (* -2 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log -1) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/3 (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))) (+ (* -2 (/ (log (/ 1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log -1) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (* -1 (log (/ 1 u0))) (+ (log -1) (* -2 (log (/ 1 u0)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (/ 1 u0)) (+ (log -1) (* -2 (log (/ 1 u0)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (+ (/ 1/2 (pow u0 2)) (/ 1 u0))) (+ (log -1) (* -2 (log (/ 1 u0)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (+ (/ 1/2 (pow u0 2)) (+ (/ 1 u0) (* 1/3 (/ 1 (pow u0 3)))))) (+ (log -1) (* -2 (log (/ 1 u0)))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (log -1) (* -2 (log (/ 1 u0)))) (* -1 (log (/ 1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (log -1) (* -2 (log (/ 1 u0)))) (+ (* -1 (log (/ 1 u0))) (/ 1 u0)))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (log -1) (+ (* -2 (log (/ 1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0)))) (* -1 (log (/ 1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (log -1) (+ (* -2 (log (/ 1 u0))) (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) (pow u0 2))))) (+ (* -1 (log (/ 1 u0))) (/ 1 u0)))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (+ (log -1) (* -2 (log (/ 1 u0))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (- (+ (log -1) (* -2 (log (/ 1 u0)))) (/ 1 (pow u0 2)))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (+ (log -1) (+ (* -2 (log (/ 1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 (pow u0 2)))) (pow u0 2)))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (- (+ (log -1) (+ (* -2 (log (/ 1 u0))) (* -1 (/ (+ 1/2 (* 1/3 (/ 1 (pow u0 2)))) (pow u0 4))))) (/ 1 (pow u0 2)))))
#s(approx (- 1 (* u0 u0)) #s(hole binary32 (* -1 (pow u0 2))))
#s(approx (- 1 (* u0 u0)) #s(hole binary32 (* (pow u0 2) (- (/ 1 (pow u0 2)) 1))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (* -1 (log (/ 1 u0)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (* -1 (log (/ 1 u0))) (/ 1 u0))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (/ 1 u0)) (/ 1/2 (pow u0 2)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (- (+ (* -1 (log (/ 1 u0))) (+ (/ 1 u0) (* 1/3 (/ 1 (pow u0 3))))) (/ 1/2 (pow u0 2)))))
#s(approx (+ 1 u0) #s(hole binary32 u0))
#s(approx (+ 1 u0) #s(hole binary32 (* u0 (+ 1 (/ 1 u0)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* 1/4 (/ (pow u0 4) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (+ (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* 1/4 (/ (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (+ (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* 1/4 (/ (* (pow alphay 2) (pow u0 3)) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ (pow alphay 2) sin2phi)) (* 1/3 (/ (pow alphay 2) (* sin2phi u0)))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ (pow alphay 2) sin2phi)) (+ (* 1/3 (/ (pow alphay 2) (* sin2phi u0))) (* 1/2 (/ (pow alphay 2) (* sin2phi (pow u0 2)))))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ (pow alphay 2) sin2phi)) (+ (* 1/3 (/ (pow alphay 2) (* sin2phi u0))) (+ (* 1/2 (/ (pow alphay 2) (* sin2phi (pow u0 2)))) (/ (pow alphay 2) (* sin2phi (pow u0 3)))))))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (* 1/4 (/ (pow u0 3) sin2phi))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ 1 sin2phi)) (* 1/3 (/ 1 (* sin2phi u0)))))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (* (pow u0 3) (+ (/ 1/3 (* sin2phi u0)) (+ (/ 1/2 (* sin2phi (pow u0 2))) (* 1/4 (/ 1 sin2phi)))))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (* (pow u0 3) (+ (/ 1/3 (* sin2phi u0)) (+ (* 1/4 (/ 1 sin2phi)) (+ (* 1/2 (/ 1 (* sin2phi (pow u0 2)))) (/ 1 (* sin2phi (pow u0 3)))))))))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) #s(hole binary32 (* 1/4 (/ (pow u0 2) sin2phi))))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) #s(hole binary32 (* (pow u0 2) (+ (* 1/4 (/ 1 sin2phi)) (* 1/3 (/ 1 (* sin2phi u0)))))))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) #s(hole binary32 (* (pow u0 2) (+ (/ 1/3 (* sin2phi u0)) (+ (/ 1/2 (* sin2phi (pow u0 2))) (* 1/4 (/ 1 sin2phi)))))))
#s(approx (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) #s(hole binary32 (* 1/4 (/ u0 sin2phi))))
#s(approx (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) #s(hole binary32 (* u0 (+ (* 1/4 (/ 1 sin2phi)) (* 1/3 (/ 1 (* sin2phi u0)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (- (* -1 (/ (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) u0)) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (log (/ -1 u0))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (/ 1 u0) (* -1 (log (/ -1 u0))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (/ 1 u0)) (* -1 (log (/ -1 u0))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (* -1 (/ (- (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) u0)) 1) u0)) (* -1 (log (/ -1 u0))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* (pow u0 4) (+ 1/4 (* -1 (/ (- (* -1 (/ (+ 1/2 (/ 1 u0)) u0)) 1/3) u0))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ 1/3 (* 1/2 (/ 1 u0))) u0)) 1/4)))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ 1/3 (+ (* 1/2 (/ 1 u0)) (/ 1 (pow u0 2)))) u0)) 1/4)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (/ (pow alphax 2) (* cos2phi u0)) (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (* -1 (/ (- (* -1/2 (/ (pow alphax 2) (* cos2phi u0))) (/ (pow alphax 2) cos2phi)) u0)) (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) #s(hole binary32 (- (* -1 (/ (- (* -1 (/ (- (* 1/3 (/ (pow alphax 2) (* cos2phi u0))) (* -1/2 (/ (pow alphax 2) cos2phi))) u0)) (/ (pow alphax 2) cos2phi)) u0)) (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)) (* -1 (/ (pow alphax 2) (* cos2phi u0))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)) (* -1 (/ (+ (* 1/2 (/ (pow alphax 2) (* cos2phi u0))) (/ (pow alphax 2) cos2phi)) u0)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (/ -1 u0))) cos2phi)) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (pow alphax 2) cos2phi)) (* -1/3 (/ (pow alphax 2) (* cos2phi u0)))) u0)) (/ (pow alphax 2) cos2phi)) u0)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (* -1 (/ (log (/ -1 u0)) cos2phi))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (- (* -1 (/ (log (/ -1 u0)) cos2phi)) (/ 1 (* cos2phi u0)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (+ (* -1 (/ (log (/ -1 u0)) cos2phi)) (* -1 (/ (+ (/ 1 cos2phi) (* 1/2 (/ 1 (* cos2phi u0)))) u0)))))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (+ (* -1 (/ (log (/ -1 u0)) cos2phi)) (* -1 (/ (+ (/ 1/3 (* cos2phi (pow u0 2))) (+ (/ 1/2 (* cos2phi u0)) (/ 1 cos2phi))) u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (* -1 (log (/ -1 u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (- (* -1 (log (/ -1 u0))) (/ 1 u0))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (* -1 (log (/ -1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0)))))
#s(approx (log (- 1 u0)) #s(hole binary32 (+ (* -1 (log (/ -1 u0))) (* -1 (/ (+ 1 (+ (/ 1/3 (pow u0 2)) (* 1/2 (/ 1 u0)))) u0)))))
#s(approx (- 1 u0) #s(hole binary32 (* -1 (* u0 (- 1 (/ 1 u0))))))
#s(approx (* u0 (- (/ 1 u0) 1)) #s(hole binary32 (* -1 (* u0 (- 1 (/ 1 u0))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (* -1 (log (/ -1 u0))) (* -2 (log (/ -1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* -2 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* -2 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (- (+ (* -1 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* -1 (/ (- (* -1 (/ (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) u0))) (* -2 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (* -1 (log (/ -1 u0))) (* -2 (log (/ -1 u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ -1 u0))) (/ 1 u0)) (* -2 (log (/ -1 u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ -1 u0))) (+ (/ 1/2 (pow u0 2)) (/ 1 u0))) (* -2 (log (/ -1 u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) #s(hole binary32 (- (+ (* -1 (log (/ -1 u0))) (* -1 (/ (- (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) u0)) 1) u0))) (* -2 (log (/ -1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (* -2 (log (/ -1 u0))) (* -1 (log (/ -1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (* -2 (log (/ -1 u0))) (+ (* -1 (log (/ -1 u0))) (/ 1 u0)))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (* -2 (log (/ -1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 u0))) u0))) (* -1 (log (/ -1 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) #s(hole binary32 (- (+ (* -2 (log (/ -1 u0))) (* -1 (/ (+ 1 (+ (/ 1/3 (pow u0 2)) (* 1/2 (/ 1 u0)))) u0))) (* -1 (log (/ -1 u0))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (+ (log -1) (* -2 (log (/ -1 u0))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (- (+ (log -1) (* -2 (log (/ -1 u0)))) (/ 1 (pow u0 2)))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (+ (log -1) (+ (* -2 (log (/ -1 u0))) (* -1 (/ (+ 1 (* 1/2 (/ 1 (pow u0 2)))) (pow u0 2)))))))
#s(approx (log (- 1 (* u0 u0))) #s(hole binary32 (- (+ (log -1) (+ (* -2 (log (/ -1 u0))) (* -1 (/ (+ 1/2 (* 1/3 (/ 1 (pow u0 2)))) (pow u0 4))))) (/ 1 (pow u0 2)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (log -1) (* -1 (log (/ -1 u0))))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (log -1) (+ (* -1 (log (/ -1 u0))) (/ 1 u0)))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (log -1) (+ (* -1 (log (/ -1 u0))) (* -1 (/ (- (* 1/2 (/ 1 u0)) 1) u0))))))
#s(approx (log (+ 1 u0)) #s(hole binary32 (+ (log -1) (+ (* -1 (log (/ -1 u0))) (* -1 (/ (- (* -1 (/ (- (* 1/3 (/ 1 u0)) 1/2) u0)) 1) u0))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (* -1 (/ (- (* -1 (/ (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ (* 1/2 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ (/ 1/2 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) u0)) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* -1 (* (pow u0 3) (+ (* -1/3 (/ (pow alphay 2) (* sin2phi u0))) (* -1/4 (/ (pow alphay 2) sin2phi)))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* -1 (* (pow u0 3) (+ (* -1 (/ (+ (* 1/3 (/ (pow alphay 2) sin2phi)) (* 1/2 (/ (pow alphay 2) (* sin2phi u0)))) u0)) (* -1/4 (/ (pow alphay 2) sin2phi)))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* -1 (* (pow u0 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (pow alphay 2) (* sin2phi u0))) (* -1/2 (/ (pow alphay 2) sin2phi))) u0)) (* 1/3 (/ (pow alphay 2) sin2phi))) u0)) (* -1/4 (/ (pow alphay 2) sin2phi)))))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ (* 1/3 (/ 1 sin2phi)) (* 1/2 (/ 1 (* sin2phi u0)))) u0)) (* 1/4 (/ 1 sin2phi)))))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ (/ 1/2 (* sin2phi u0)) (+ (* 1/3 (/ 1 sin2phi)) (/ 1 (* sin2phi (pow u0 2))))) u0)) (* 1/4 (/ 1 sin2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (* cos2phi (+ (* -1 (/ (* (pow alphay 6) (* cos2phi (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (* cos2phi (+ (* cos2phi (+ (* -1 (/ (* (pow alphay 6) (log (- 1 u0))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 8) (* cos2phi (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))) (/ (* (pow alphay 4) (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx cos2phi #s(hole binary32 cos2phi))
#s(approx (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (/ (log (- 1 u0)) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* cos2phi (- (/ (* (pow alphay 6) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 3))) (/ (* (pow alphay 4) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 2) (pow sin2phi 2))))) (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* cos2phi (- (* cos2phi (- (* -1 (/ (* (pow alphay 8) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) (pow sin2phi 4)))) (* -1 (/ (* (pow alphay 6) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 4) (pow sin2phi 3)))))) (/ (* (pow alphay 4) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphax 2) (pow sin2phi 2))))) (/ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* cos2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* cos2phi (+ (* cos2phi (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* cos2phi (+ (* cos2phi (+ (* cos2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow alphay 8) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))))) (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* cos2phi (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* cos2phi (- (+ (* cos2phi (- (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* cos2phi (- (+ (* cos2phi (- (+ (* cos2phi (- (* u0 (+ (* -1/2 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow alphay 8) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4))))) (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3))))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 2)))) (+ (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi)) (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 3)))))) cos2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) cos2phi))) (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (+ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) (pow cos2phi 3)))) (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) (pow cos2phi 2)))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6)))) (pow cos2phi 3)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) (pow cos2phi 2))))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2)) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi) (pow alphax 2))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (pow cos2phi 2)) (pow alphax 2)))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (pow cos2phi 3)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (pow cos2phi 2)) (pow alphax 2))))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (+ (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)) (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 3)))))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi))) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) cos2phi))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (pow alphay 2))) cos2phi)) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) cos2phi))) (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (pow alphay 4))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (pow alphay 2))) cos2phi)) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 2) cos2phi))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* -1 (/ (- (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphay 2))) cos2phi))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* -1 (/ (- (* -1 (/ (- (/ (* (pow alphax 8) (* (pow sin2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) cos2phi)) (/ (* (pow alphax 6) (* (pow sin2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphay 4))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphay 2))) cos2phi))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4)))) cos2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))))) cos2phi)) (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6)))) cos2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) cos2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))))) cos2phi)) (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) cos2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2)))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) cos2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4)))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) cos2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2)))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (* sin2phi (+ (* -1 (/ (* (pow alphax 6) (* sin2phi (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (* sin2phi (+ (* sin2phi (+ (* -1 (/ (* (pow alphax 6) (log (- 1 u0))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 8) (* sin2phi (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))) (/ (* (pow alphax 4) (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx sin2phi #s(hole binary32 sin2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* sin2phi (- (/ (* (pow alphax 6) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 4) (pow cos2phi 3))) (/ (* (pow alphax 4) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 2) (pow cos2phi 2))))) (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* sin2phi (- (* sin2phi (- (* -1 (/ (* (pow alphax 8) (* sin2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphay 6) (pow cos2phi 4)))) (* -1 (/ (* (pow alphax 6) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 4) (pow cos2phi 3)))))) (/ (* (pow alphax 4) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (* (pow alphay 2) (pow cos2phi 2))))) (/ (* (pow alphax 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* sin2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* sin2phi (+ (* sin2phi (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* sin2phi (+ (* sin2phi (+ (* sin2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow alphax 8) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))))) (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* sin2phi (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* sin2phi (- (+ (* sin2phi (- (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* sin2phi (- (+ (* sin2phi (- (+ (* sin2phi (- (* u0 (+ (* -1/2 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow alphax 8) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4))))) (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3))))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (/ (* (pow alphay 2) (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0))))))) sin2phi)))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (/ (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))))) sin2phi)))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) #s(hole binary32 (/ (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))) sin2phi)))
#s(approx (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) #s(hole binary32 (/ (+ 1/3 (* 1/4 u0)) sin2phi)))
#s(approx (* 1/3 (/ 1 sin2phi)) #s(hole binary32 (/ 1/3 sin2phi)))
#s(approx (/ 1 sin2phi) #s(hole binary32 (/ 1 sin2phi)))
#s(approx (* 1/2 (/ 1 sin2phi)) #s(hole binary32 (/ 1/2 sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 2)))) (+ (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi)) (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 3)))))) sin2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) sin2phi))) (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (+ (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2))))) (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (- (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) (pow sin2phi 3)))) (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) (pow sin2phi 2)))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6)))) (pow sin2phi 3)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) (pow sin2phi 2))))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2)) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi) (pow alphay 2))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (pow sin2phi 2)) (pow alphay 2)))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (pow sin2phi 3)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (pow sin2phi 2)) (pow alphay 2))))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (+ (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)) (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 3)))))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi))) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) sin2phi))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (pow alphax 2))) sin2phi)) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) sin2phi))) (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (pow alphax 4))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (pow alphax 2))) sin2phi)) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 2) sin2phi))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* -1 (/ (- (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 4) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphax 2))) sin2phi))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (* (pow alphay 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* -1 (/ (- (* -1 (/ (- (/ (* (pow alphay 8) (* (pow cos2phi 3) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (* (pow alphax 6) sin2phi)) (/ (* (pow alphay 6) (* (pow cos2phi 2) (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphax 4))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (- (log (+ 1 u0)) (log (- 1 (pow u0 2)))))) (pow alphax 2))) sin2phi))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4)))) sin2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))))) sin2phi)) (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6)))) sin2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) sin2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))))) sin2phi)) (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) sin2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2)))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) sin2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4)))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) sin2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2)))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* -1 (/ (* (pow alphay 2) (- (* u0 (- (* u0 (- (* -1/4 u0) 1/3)) 1/2)) 1)) sin2phi))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) #s(hole binary32 (* -1 (/ (- (* u0 (- (* u0 (- (* -1/4 u0) 1/3)) 1/2)) 1) sin2phi))))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) #s(hole binary32 (* -1 (/ (- (* u0 (- (* -1/4 u0) 1/3)) 1/2) sin2phi))))
#s(approx (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) #s(hole binary32 (* -1 (/ (- (* -1/4 u0) 1/3) sin2phi))))
Outputs
(/.f32 (neg.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0))) (neg.f32 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0))
(*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)
(/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (*.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0) (*.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0) #s(literal 1 binary32)))))
(fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32))
(+.f32 (*.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0) #s(literal 1 binary32))
(/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0) #s(literal 3 binary32)) #s(literal 1/8 binary32)) (fma.f32 (*.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0) (*.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0) (-.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0) #s(literal 1/2 binary32)))))
(fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32))
(+.f32 (*.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0) #s(literal 1/2 binary32))
(/.f32 (+.f32 (pow.f32 (*.f32 #s(literal 1/4 binary32) u0) #s(literal 3 binary32)) #s(literal 1/27 binary32)) (fma.f32 (*.f32 #s(literal 1/4 binary32) u0) (*.f32 #s(literal 1/4 binary32) u0) (-.f32 #s(literal 1/9 binary32) (*.f32 (*.f32 #s(literal 1/4 binary32) u0) #s(literal 1/3 binary32)))))
(fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32))
(+.f32 (*.f32 #s(literal 1/4 binary32) u0) #s(literal 1/3 binary32))
#s(literal 1/4 binary32)
u0
#s(literal 1/3 binary32)
#s(literal 1/2 binary32)
#s(literal 1 binary32)
(/.f32 (+.f32 (pow.f32 (/.f32 cos2phi (*.f32 alphax alphax)) #s(literal 3 binary32)) (pow.f32 (/.f32 sin2phi (*.f32 alphay alphay)) #s(literal 3 binary32))) (fma.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 cos2phi (*.f32 alphax alphax)) (-.f32 (*.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 sin2phi (*.f32 alphay alphay))) (*.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
(/.f32 (fma.f32 cos2phi (*.f32 alphay alphay) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)))
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
(/.f32 (neg.f32 cos2phi) (neg.f32 (*.f32 alphax alphax)))
(/.f32 cos2phi (*.f32 alphax alphax))
cos2phi
(*.f32 (fabs.f32 alphax) (fabs.f32 alphax))
(*.f32 (neg.f32 alphax) (neg.f32 alphax))
(*.f32 alphax alphax)
(pow.f32 alphax #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 alphax) #s(literal 2 binary32)))
alphax
(/.f32 (neg.f32 sin2phi) (neg.f32 (*.f32 alphay alphay)))
(/.f32 sin2phi (*.f32 alphay alphay))
sin2phi
(*.f32 (fabs.f32 alphay) (fabs.f32 alphay))
(*.f32 (neg.f32 alphay) (neg.f32 alphay))
(*.f32 alphay alphay)
(pow.f32 alphay #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32)))
alphay
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi))
(/.f32 (neg.f32 (*.f32 (*.f32 alphax alphax) u0)) (neg.f32 cos2phi))
(/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)
(*.f32 (*.f32 alphax alphax) u0)
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi))))
(neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi)))
(*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi))
(/.f32 (neg.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32)))))) (neg.f32 cos2phi))
(/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi)
(log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32)))))
#s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))
(*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32)))
(/.f32 (-.f32 (pow.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (/.f32 #s(literal 1 binary32) u0) (/.f32 #s(literal 1 binary32) u0) (+.f32 #s(literal 1 binary32) (*.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32)))))
(-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))
(/.f32 #s(literal -1 binary32) (neg.f32 u0))
(/.f32 #s(literal 1 binary32) u0)
(pow.f32 u0 #s(literal -1 binary32))
(/.f32 (neg.f32 (neg.f32 (log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)) (+.f32 #s(literal 1 binary32) u0))))) (neg.f32 #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay)))))
(/.f32 (neg.f32 (log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)) (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(neg.f32 (log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)) (+.f32 #s(literal 1 binary32) u0))))
(log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)) (+.f32 #s(literal 1 binary32) u0)))
(/.f32 (-.f32 (pow.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) #s(literal 3 binary32)) (pow.f32 (log.f32 (+.f32 #s(literal 1 binary32) u0)) #s(literal 3 binary32))) (fma.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (fma.f32 (log.f32 (+.f32 #s(literal 1 binary32) u0)) (log.f32 (+.f32 #s(literal 1 binary32) u0)) (*.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0))))))
(-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))
(log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))
(/.f32 (-.f32 #s(literal 1 binary32) (pow.f32 (*.f32 u0 u0) #s(literal 3 binary32))) (+.f32 #s(literal 1 binary32) (fma.f32 (*.f32 u0 u0) (*.f32 u0 u0) (*.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))
(-.f32 #s(literal 1 binary32) (*.f32 u0 u0))
(*.f32 (fabs.f32 u0) (fabs.f32 u0))
(*.f32 (neg.f32 u0) (neg.f32 u0))
(*.f32 u0 u0)
(pow.f32 u0 #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 u0) #s(literal 2 binary32)))
(log.f32 (+.f32 #s(literal 1 binary32) u0))
(log1p.f32 u0)
(/.f32 (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0)) (+.f32 #s(literal 1 binary32) (-.f32 (*.f32 u0 u0) (*.f32 #s(literal 1 binary32) u0))))
(+.f32 #s(literal 1 binary32) u0)
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
(*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))) u0)
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi))))
(*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))
(/.f32 (+.f32 (pow.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))) #s(literal 3 binary32)) (pow.f32 (/.f32 #s(literal 1 binary32) sin2phi) #s(literal 3 binary32))) (fma.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))) (-.f32 (*.f32 (/.f32 #s(literal 1 binary32) sin2phi) (/.f32 #s(literal 1 binary32) sin2phi)) (*.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))) (/.f32 #s(literal 1 binary32) sin2phi)))))
(fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi))
(+.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))) (/.f32 #s(literal 1 binary32) sin2phi))
(/.f32 (+.f32 (pow.f32 (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi)) #s(literal 3 binary32))) (fma.f32 (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))) (-.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi)) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))))))
(fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))
(+.f32 (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))
(/.f32 (+.f32 (pow.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi)) #s(literal 3 binary32)) (pow.f32 (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi)) #s(literal 3 binary32))) (fma.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi)) (*.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi)) (-.f32 (*.f32 (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))))))
(fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))
(+.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi)))
(/.f32 (neg.f32 u0) (neg.f32 sin2phi))
(/.f32 u0 sin2phi)
(*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))
(/.f32 #s(literal -1 binary32) (neg.f32 sin2phi))
(/.f32 #s(literal 1 binary32) sin2phi)
(pow.f32 sin2phi #s(literal -1 binary32))
(*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi) (*.f32 (*.f32 alphax alphax) (fma.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))) (/.f32 (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax)))
#s(approx (/ cos2phi (* alphax alphax)) (/.f32 cos2phi (*.f32 alphax alphax)))
#s(approx (* alphax alphax) (*.f32 alphax alphax))
#s(approx alphax alphax)
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi)))
#s(approx (/ (* (* alphax alphax) u0) cos2phi) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi))
#s(approx (* (* alphax alphax) u0) (*.f32 (*.f32 alphax alphax) u0))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphax alphax) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (/.f32 (log.f32 (+.f32 #s(literal 1 binary32) u0)) cos2phi)) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphax alphax) (-.f32 (fma.f32 (*.f32 alphax alphax) (-.f32 (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 (log.f32 (+.f32 #s(literal 1 binary32) u0)) cos2phi)) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) cos2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphax alphax) (-.f32 (fma.f32 (*.f32 alphax alphax) (-.f32 (*.f32 (*.f32 alphax alphax) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) (/.f32 (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 (log.f32 (+.f32 #s(literal 1 binary32) u0)) cos2phi)) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphax alphax) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi)) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (*.f32 (*.f32 alphax alphax) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi)) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))) (*.f32 (*.f32 alphax alphax) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))))))) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (fma.f32 (*.f32 alphax alphax) (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (fma.f32 (*.f32 alphax alphax) (-.f32 (fma.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))) (*.f32 (*.f32 alphax alphax) (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (fma.f32 (*.f32 alphax alphax) (-.f32 (fma.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))) (*.f32 (*.f32 alphax alphax) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 (*.f32 alphax alphax) (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))))))) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (+.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (+.f32 (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)))) (*.f32 alphax alphax))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)))) (*.f32 alphax alphax)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (pow.f32 alphax #s(literal 4 binary32))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)))) (*.f32 alphax alphax)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 sin2phi #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 sin2phi #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 sin2phi #s(literal 4 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 sin2phi #s(literal 4 binary32))))) (pow.f32 alphax #s(literal 6 binary32))) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (pow.f32 alphax #s(literal 4 binary32)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))))) (*.f32 alphax alphax)) (/.f32 (*.f32 alphay alphay) sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))))) (*.f32 alphax alphax)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (pow.f32 alphax #s(literal 4 binary32))) (/.f32 (*.f32 alphay alphay) sin2phi)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))))) (*.f32 alphax alphax)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 sin2phi #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 sin2phi #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 sin2phi #s(literal 4 binary32)))))))) (pow.f32 alphax #s(literal 6 binary32))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (pow.f32 alphax #s(literal 4 binary32))) (/.f32 (*.f32 alphay alphay) sin2phi))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (+.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (*.f32 (*.f32 alphay alphay) (fma.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))) (/.f32 (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay)))
#s(approx (/ sin2phi (* alphay alphay)) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (* alphay alphay) (*.f32 alphay alphay))
#s(approx alphay alphay)
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphay alphay) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (/.f32 (log.f32 (+.f32 #s(literal 1 binary32) u0)) sin2phi)) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphay alphay) (-.f32 (fma.f32 (*.f32 alphay alphay) (-.f32 (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 (log.f32 (+.f32 #s(literal 1 binary32) u0)) sin2phi)) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) sin2phi))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphay alphay) (-.f32 (fma.f32 (*.f32 alphay alphay) (-.f32 (*.f32 (*.f32 alphay alphay) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) (/.f32 (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 (log.f32 (+.f32 #s(literal 1 binary32) u0)) sin2phi)) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphay alphay) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (*.f32 (*.f32 alphay alphay) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (*.f32 (*.f32 alphay alphay) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))))))) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (fma.f32 (*.f32 alphay alphay) (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (fma.f32 (*.f32 alphay alphay) (-.f32 (fma.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))) (*.f32 (*.f32 alphay alphay) (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (fma.f32 (*.f32 alphay alphay) (-.f32 (fma.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))) (*.f32 (*.f32 alphay alphay) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 (*.f32 alphay alphay) (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))))))) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (+.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (+.f32 (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)))) (*.f32 alphay alphay))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)))) (*.f32 alphay alphay)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))) (pow.f32 alphay #s(literal 4 binary32))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)))) (*.f32 alphay alphay)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 cos2phi #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 cos2phi #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 cos2phi #s(literal 4 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 cos2phi #s(literal 4 binary32))))) (pow.f32 alphay #s(literal 6 binary32))) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))) (pow.f32 alphay #s(literal 4 binary32)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))))) (*.f32 alphay alphay)) (/.f32 (*.f32 alphax alphax) cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))))) (*.f32 alphay alphay)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (pow.f32 alphay #s(literal 4 binary32))) (/.f32 (*.f32 alphax alphax) cos2phi)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))))) (*.f32 alphay alphay)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 cos2phi #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 cos2phi #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 cos2phi #s(literal 4 binary32)))))))) (pow.f32 alphay #s(literal 6 binary32))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (pow.f32 alphay #s(literal 4 binary32))) (/.f32 (*.f32 alphax alphax) cos2phi))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (+.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/3 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (neg (log (- 1 u0))) u0)
#s(approx (neg (log (- 1 u0))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) u0))))
#s(approx (neg (log (- 1 u0))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0))))))
#s(approx (neg (log (- 1 u0))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) u0))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(literal 1 binary32))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) u0)))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0)))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(literal 1/2 binary32))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0)))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))))
#s(approx (+ (* 1/4 u0) 1/3) #s(literal 1/3 binary32))
#s(approx (+ (* 1/4 u0) 1/3) (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))
#s(approx u0 u0)
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 u0 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)) (*.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi)))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))))))))
#s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 #s(literal -1 binary32) (/.f32 u0 cos2phi)))
#s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi))))
#s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) (/.f32 u0 cos2phi)) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi)))) (/.f32 #s(literal 1 binary32) cos2phi))))
#s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) (/.f32 u0 cos2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi)))) (/.f32 #s(literal 1 binary32) cos2phi))))
#s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0))
#s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32))))
#s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32))))
#s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32))))
#s(approx (- 1 u0) #s(literal 1 binary32))
#s(approx (- 1 u0) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) u0)))
#s(approx (* u0 (- (/ 1 u0) 1)) #s(literal 1 binary32))
#s(approx (* u0 (- (/ 1 u0) 1)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) u0)))
#s(approx (- (/ 1 u0) 1) (/.f32 #s(literal 1 binary32) u0))
#s(approx (- (/ 1 u0) 1) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) u0)) u0))
#s(approx (/ 1 u0) (/.f32 #s(literal 1 binary32) u0))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/3 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0)
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) u0))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0))))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (*.f32 #s(literal -1 binary32) u0))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32))))
#s(approx (log (- 1 (* u0 u0))) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0)))
#s(approx (log (- 1 (* u0 u0))) (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 #s(literal -1/2 binary32) (*.f32 u0 u0)) #s(literal 1 binary32))))
#s(approx (log (- 1 (* u0 u0))) (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 #s(literal -1/3 binary32) (*.f32 u0 u0)) #s(literal 1/2 binary32))) #s(literal 1 binary32))))
#s(approx (log (- 1 (* u0 u0))) (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 #s(literal -1/4 binary32) (*.f32 u0 u0)) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32))))
#s(approx (- 1 (* u0 u0)) #s(literal 1 binary32))
#s(approx (- 1 (* u0 u0)) (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0))))
#s(approx (* u0 u0) (*.f32 u0 u0))
#s(approx (log (+ 1 u0)) u0)
#s(approx (log (+ 1 u0)) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) u0))))
#s(approx (log (+ 1 u0)) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (-.f32 (*.f32 #s(literal 1/3 binary32) u0) #s(literal 1/2 binary32))))))
#s(approx (log (+ 1 u0)) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (-.f32 (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal -1/4 binary32) u0))) #s(literal 1/2 binary32))))))
#s(approx (+ 1 u0) #s(literal 1 binary32))
#s(approx (+ 1 u0) (+.f32 #s(literal 1 binary32) u0))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/3 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 u0 (fma.f32 #s(literal 1/3 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 u0 (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi)))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (fma.f32 #s(literal 1/2 binary32) (/.f32 u0 sin2phi) (/.f32 #s(literal 1 binary32) sin2phi)))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (fma.f32 u0 (fma.f32 #s(literal 1/3 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 #s(literal 1/2 binary32) sin2phi))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (fma.f32 #s(literal 1/3 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))))
#s(approx (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) (/.f32 #s(literal 1/3 binary32) sin2phi))
#s(approx (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))))
#s(approx (/ u0 sin2phi) (/.f32 u0 sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))))
#s(approx (neg (log (- 1 u0))) (*.f32 #s(literal -1 binary32) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (neg (log (- 1 u0))) (-.f32 (/.f32 #s(literal 1 binary32) u0) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (neg (log (- 1 u0))) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (/.f32 #s(literal 1 binary32) u0)) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (neg (log (- 1 u0))) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (+.f32 (/.f32 #s(literal 1 binary32) u0) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0))))) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 #s(literal 1/4 binary32) (pow.f32 u0 #s(literal 4 binary32))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 #s(literal 1/4 binary32) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 #s(literal 1/4 binary32) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 #s(literal 1/4 binary32) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (*.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 u0 u0) u0)))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 #s(literal 1/4 binary32) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0)))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 #s(literal 1/4 binary32) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 #s(literal 1/4 binary32) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0)))))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (*.f32 #s(literal 1/4 binary32) (*.f32 u0 u0)))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/4 binary32) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0)))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/4 binary32) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0))))))
#s(approx (+ (* 1/4 u0) 1/3) (*.f32 #s(literal 1/4 binary32) u0))
#s(approx (+ (* 1/4 u0) 1/3) (*.f32 u0 (+.f32 #s(literal 1/4 binary32) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))) cos2phi)))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (-.f32 (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)) (/.f32 (*.f32 (*.f32 alphax alphax) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))) cos2phi)))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi (*.f32 u0 u0)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)) (/.f32 (*.f32 (*.f32 alphax alphax) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))) cos2phi))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (-.f32 (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi (*.f32 (*.f32 u0 u0) u0)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi (*.f32 u0 u0))) (/.f32 (*.f32 (*.f32 alphax alphax) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))) cos2phi)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))) cos2phi))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)) (/.f32 (*.f32 (*.f32 alphax alphax) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))) cos2phi)))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi (*.f32 u0 u0))) (/.f32 (*.f32 (*.f32 alphax alphax) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))) cos2phi))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)) (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi (*.f32 u0 u0))) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi (*.f32 (*.f32 u0 u0) u0))) (/.f32 (*.f32 (*.f32 alphax alphax) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))) cos2phi)))))
#s(approx (/ (log (- 1 u0)) cos2phi) (/.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))) cos2phi))
#s(approx (/ (log (- 1 u0)) cos2phi) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (neg.f32 (log.f32 u0)) cos2phi) (/.f32 (log.f32 #s(literal -1 binary32)) cos2phi)) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0))))
#s(approx (/ (log (- 1 u0)) cos2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (neg.f32 (log.f32 u0)) cos2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) cos2phi) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0)))) u0) (/.f32 (log.f32 #s(literal -1 binary32)) cos2phi))))
#s(approx (/ (log (- 1 u0)) cos2phi) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (neg.f32 (log.f32 u0)) cos2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0)))) (*.f32 u0 u0)) (/.f32 (log.f32 #s(literal -1 binary32)) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0))))
#s(approx (log (- 1 u0)) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))))
#s(approx (log (- 1 u0)) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))) (/.f32 #s(literal 1 binary32) u0)))
#s(approx (log (- 1 u0)) (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))) u0)))))
#s(approx (log (- 1 u0)) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0))) (*.f32 u0 u0))))) (/.f32 #s(literal 1 binary32) u0)))
#s(approx (- 1 u0) (*.f32 #s(literal -1 binary32) u0))
#s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))
#s(approx (* u0 (- (/ 1 u0) 1)) (*.f32 #s(literal -1 binary32) u0))
#s(approx (* u0 (- (/ 1 u0) 1)) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))
#s(approx (- (/ 1 u0) 1) #s(literal -1 binary32))
#s(approx (- (/ 1 u0) 1) (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (neg.f32 (log.f32 u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (fma.f32 #s(literal -2 binary32) (/.f32 (neg.f32 (log.f32 u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 (log.f32 #s(literal -1 binary32)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (neg.f32 (log.f32 u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))) (fma.f32 #s(literal -2 binary32) (/.f32 (neg.f32 (log.f32 u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 (log.f32 #s(literal -1 binary32)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (neg.f32 (log.f32 u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))) (fma.f32 #s(literal -2 binary32) (/.f32 (neg.f32 (log.f32 u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 (log.f32 #s(literal -1 binary32)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (-.f32 (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (-.f32 (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (/.f32 #s(literal 1 binary32) u0)) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (-.f32 (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (/.f32 #s(literal 1 binary32) u0))) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (-.f32 (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (+.f32 (/.f32 #s(literal 1 binary32) u0) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0)))))) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0)))) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0)))) (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (/.f32 #s(literal 1 binary32) u0))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))) u0)))) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0))) (*.f32 u0 u0))))) (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (/.f32 #s(literal 1 binary32) u0))))
#s(approx (log (- 1 (* u0 u0))) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0)))))
#s(approx (log (- 1 (* u0 u0))) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0)))) (/.f32 #s(literal 1 binary32) (*.f32 u0 u0))))
#s(approx (log (- 1 (* u0 u0))) (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)))) (*.f32 u0 u0))))))
#s(approx (log (- 1 (* u0 u0))) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -2 binary32) (neg.f32 (log.f32 u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)))) (pow.f32 u0 #s(literal 4 binary32)))))) (/.f32 #s(literal 1 binary32) (*.f32 u0 u0))))
#s(approx (- 1 (* u0 u0)) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0)))
#s(approx (- 1 (* u0 u0)) (*.f32 (*.f32 u0 u0) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)) #s(literal 1 binary32))))
#s(approx (log (+ 1 u0)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0))))
#s(approx (log (+ 1 u0)) (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (/.f32 #s(literal 1 binary32) u0)))
#s(approx (log (+ 1 u0)) (-.f32 (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (/.f32 #s(literal 1 binary32) u0)) (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0))))
#s(approx (log (+ 1 u0)) (-.f32 (fma.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)) (+.f32 (/.f32 #s(literal 1 binary32) u0) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0))))) (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0))))
#s(approx (+ 1 u0) u0)
#s(approx (+ 1 u0) (*.f32 u0 (+.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) u0))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal 1/4 binary32) (/.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 (*.f32 u0 u0) u0)) sin2phi)))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0)) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi (*.f32 u0 u0))))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0)) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi (*.f32 u0 u0))) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi (*.f32 (*.f32 u0 u0) u0))))))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 u0 u0) u0) sin2phi)))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 sin2phi u0))))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 sin2phi u0)) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sin2phi (*.f32 u0 u0))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) sin2phi))))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 sin2phi u0)) (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) sin2phi) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 sin2phi (*.f32 u0 u0))) (/.f32 #s(literal 1 binary32) (*.f32 sin2phi (*.f32 (*.f32 u0 u0) u0))))))))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 u0 u0) sin2phi)))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (*.f32 (*.f32 u0 u0) (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 sin2phi u0))))))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 sin2phi u0)) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sin2phi (*.f32 u0 u0))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) sin2phi))))))
#s(approx (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) (*.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi)))
#s(approx (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 sin2phi u0))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) u0)) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (neg (log (- 1 u0))) (log.f32 (/.f32 #s(literal -1 binary32) u0)))
#s(approx (neg (log (- 1 u0))) (-.f32 (/.f32 #s(literal 1 binary32) u0) (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (neg (log (- 1 u0))) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (/.f32 #s(literal 1 binary32) u0)) (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (neg (log (- 1 u0))) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0))) u0)) #s(literal 1 binary32)) u0)) (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 #s(literal 1/4 binary32) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)) u0)) #s(literal 1/3 binary32)) u0)))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))) u0)) #s(literal 1/4 binary32)))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/3 binary32) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0) (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)))) u0)) #s(literal 1/4 binary32)))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 #s(literal -1 binary32) u0))) cos2phi))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (-.f32 (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 #s(literal -1 binary32) u0))) cos2phi))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0))) (/.f32 (*.f32 alphax alphax) cos2phi)) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 #s(literal -1 binary32) u0))) cos2phi))))
#s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))) u0)) (/.f32 (*.f32 alphax alphax) cos2phi)) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 #s(literal -1 binary32) u0))) cos2phi))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 #s(literal -1 binary32) u0))) cos2phi)))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 #s(literal -1 binary32) u0))) cos2phi) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 #s(literal -1 binary32) u0))) cos2phi) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)) (/.f32 (*.f32 alphax alphax) cos2phi)) u0))))
#s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 #s(literal -1 binary32) u0))) cos2phi) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 cos2phi u0)))) u0) (/.f32 (*.f32 alphax alphax) cos2phi)) u0))))
#s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 #s(literal -1 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) cos2phi)))
#s(approx (/ (log (- 1 u0)) cos2phi) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) cos2phi)) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0))))
#s(approx (/ (log (- 1 u0)) cos2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) cos2phi) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) cos2phi) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0)))) u0))))
#s(approx (/ (log (- 1 u0)) cos2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) cos2phi) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 cos2phi (*.f32 u0 u0))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 cos2phi u0)) (/.f32 #s(literal 1 binary32) cos2phi))) u0))))
#s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0))))
#s(approx (log (- 1 u0)) (-.f32 (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0))) (/.f32 #s(literal 1 binary32) u0)))
#s(approx (log (- 1 u0)) (fma.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))) u0))))
#s(approx (log (- 1 u0)) (fma.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 u0)) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))) u0))))
#s(approx (- 1 u0) (*.f32 #s(literal -1 binary32) (*.f32 u0 (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) u0)))))
#s(approx (* u0 (- (/ 1 u0) 1)) (*.f32 #s(literal -1 binary32) (*.f32 u0 (-.f32 #s(literal 1 binary32) (/.f32 #s(literal 1 binary32) u0)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0))) (*.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (*.f32 #s(literal -2 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))) (*.f32 #s(literal -2 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) u0)) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))) (*.f32 #s(literal -2 binary32) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (-.f32 (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0))) (*.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (-.f32 (fma.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (/.f32 #s(literal 1 binary32) u0)) (*.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (-.f32 (fma.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (/.f32 #s(literal 1 binary32) u0))) (*.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (-.f32 (fma.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0))) u0)) #s(literal 1 binary32)) u0))) (*.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (-.f32 (*.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0))) (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (-.f32 (*.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0))) (fma.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (/.f32 #s(literal 1 binary32) u0))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (-.f32 (fma.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))) u0))) (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (- (log (- 1 (* u0 u0))) (log (+ 1 u0))) (-.f32 (fma.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 u0)) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))) u0))) (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (log (- 1 (* u0 u0))) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (log (- 1 (* u0 u0))) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))) (/.f32 #s(literal 1 binary32) (*.f32 u0 u0))))
#s(approx (log (- 1 (* u0 u0))) (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)))) (*.f32 u0 u0))))))
#s(approx (log (- 1 (* u0 u0))) (-.f32 (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -2 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)))) (pow.f32 u0 #s(literal 4 binary32)))))) (/.f32 #s(literal 1 binary32) (*.f32 u0 u0))))
#s(approx (log (+ 1 u0)) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (log (+ 1 u0)) (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (/.f32 #s(literal 1 binary32) u0))))
#s(approx (log (+ 1 u0)) (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)) #s(literal 1 binary32)) u0)))))
#s(approx (log (+ 1 u0)) (+.f32 (log.f32 #s(literal -1 binary32)) (fma.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0)) #s(literal 1/2 binary32)) u0)) #s(literal 1 binary32)) u0)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) u0)) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) u0) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) u0)) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))) u0)) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0)))) u0) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0)) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))) u0) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))) u0) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 sin2phi u0)))) u0)) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) sin2phi))))))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 sin2phi u0)) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi) (/.f32 #s(literal 1 binary32) (*.f32 sin2phi (*.f32 u0 u0))))) u0)) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) sin2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi) (*.f32 cos2phi (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi) (*.f32 cos2phi (fma.f32 cos2phi (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))
#s(approx cos2phi cos2phi)
#s(approx (/ (log (- 1 u0)) cos2phi) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 cos2phi (-.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 cos2phi (-.f32 (*.f32 cos2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 cos2phi (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 cos2phi (fma.f32 cos2phi (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 cos2phi (fma.f32 cos2phi (fma.f32 cos2phi (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))))))) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))))) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 cos2phi (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 cos2phi (-.f32 (fma.f32 cos2phi (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))))) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 cos2phi (-.f32 (fma.f32 cos2phi (-.f32 (fma.f32 cos2phi (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))))))) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (pow.f32 sin2phi #s(literal 4 binary32))))) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))))) (/.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) cos2phi))) cos2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) cos2phi)))) cos2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (+.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) cos2phi))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) cos2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (-.f32 (fma.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi)))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphay alphay) cos2phi))) cos2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphay alphay) cos2phi)))) cos2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax))) cos2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)))) cos2phi)) cos2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)))) cos2phi) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))))) (*.f32 cos2phi cos2phi)))) cos2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)))) cos2phi) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 alphay #s(literal 6 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))))) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))))) (*.f32 cos2phi cos2phi))))) cos2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) cos2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) cos2phi) (*.f32 alphax alphax))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi))) cos2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) cos2phi) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))))))) (*.f32 cos2phi cos2phi)) (*.f32 alphax alphax)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)))) cos2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) cos2phi) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 alphay #s(literal 6 binary32)))))))) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))))))) (*.f32 cos2phi cos2phi)) (*.f32 alphax alphax))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi cos2phi))) (+.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) cos2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 alphay alphay))) cos2phi) (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (pow.f32 alphay #s(literal 4 binary32)))) cos2phi) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 alphay alphay))) cos2phi) (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) cos2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 #s(literal -1 binary32) (*.f32 cos2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphay alphay) cos2phi))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 alphay alphay))) cos2phi))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (pow.f32 alphay #s(literal 4 binary32)))) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 alphay alphay))) cos2phi))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0)))))))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)))) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0))))))))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))))) cos2phi) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay))))) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0))))))))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 alphay #s(literal 6 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))))) cos2phi) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))))) cos2phi) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay))))) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0))))))))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0))))))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay))) cos2phi) (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0)))))))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay))) cos2phi) (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0)))))))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 alphay #s(literal 6 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32)))) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (pow.f32 alphay #s(literal 4 binary32))))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (pow.f32 alphay #s(literal 4 binary32)))) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi u0)) (*.f32 alphay alphay)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi) (*.f32 alphay alphay))) cos2phi) (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0)))))))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi) (*.f32 sin2phi (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi) (*.f32 sin2phi (fma.f32 sin2phi (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))
#s(approx sin2phi sin2phi)
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 sin2phi (-.f32 (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 sin2phi (-.f32 (*.f32 sin2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 sin2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 sin2phi (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 sin2phi (fma.f32 sin2phi (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 sin2phi (fma.f32 sin2phi (fma.f32 sin2phi (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))))))) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))))) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 sin2phi (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 sin2phi (-.f32 (fma.f32 sin2phi (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))))) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 sin2phi (-.f32 (fma.f32 sin2phi (-.f32 (fma.f32 sin2phi (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))))))) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (pow.f32 cos2phi #s(literal 4 binary32))))) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 4 binary32)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))))) (/.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0))))))) sin2phi))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))))) sin2phi))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))) sin2phi))
#s(approx (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) (/.f32 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)) sin2phi))
#s(approx (* 1/3 (/ 1 sin2phi)) (/.f32 #s(literal 1/3 binary32) sin2phi))
#s(approx (/ 1 sin2phi) (/.f32 #s(literal 1 binary32) sin2phi))
#s(approx (* 1/2 (/ 1 sin2phi)) (/.f32 #s(literal 1/2 binary32) sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) sin2phi))) sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) sin2phi)))) sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (+.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) sin2phi))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) sin2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (-.f32 (fma.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi)))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphax alphax) sin2phi))) sin2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphax alphax) sin2phi)))) sin2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay))) sin2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)))) sin2phi)) sin2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)))) sin2phi) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))))) (*.f32 sin2phi sin2phi)))) sin2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)))) sin2phi) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 alphax #s(literal 6 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))))) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))))) (*.f32 sin2phi sin2phi))))) sin2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay)) sin2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) sin2phi) (*.f32 alphay alphay))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi))) sin2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) sin2phi) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))))))) (*.f32 sin2phi sin2phi)) (*.f32 alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)))) sin2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) sin2phi) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 alphax #s(literal 6 binary32)))))))) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))))))) (*.f32 sin2phi sin2phi)) (*.f32 alphay alphay))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) (*.f32 sin2phi sin2phi))) (+.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 alphax alphax))) sin2phi) (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (pow.f32 alphax #s(literal 4 binary32)))) sin2phi) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 alphax alphax))) sin2phi) (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) sin2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 #s(literal -1 binary32) (*.f32 sin2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay))))))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (*.f32 alphax alphax) sin2phi))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 4 binary32)) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 alphax alphax))) sin2phi))) sin2phi)))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (pow.f32 alphax #s(literal 4 binary32)))) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)))))) (*.f32 alphax alphax))) sin2phi))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0)))))))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)))) sin2phi) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0))))))))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))))) sin2phi) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax))))) sin2phi) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0))))))))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 alphax #s(literal 6 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))))) sin2phi) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))))) sin2phi) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax))))) sin2phi) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0))))))))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0))))))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax))) sin2phi) (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0)))))))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))) sin2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax))) sin2phi) (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0)))))))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 alphax #s(literal 6 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32)))) sin2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (pow.f32 alphax #s(literal 4 binary32))))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (pow.f32 alphax #s(literal 4 binary32)))) sin2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) (*.f32 cos2phi u0)) (*.f32 alphax alphax)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 4 binary32)) cos2phi) (*.f32 alphax alphax))) sin2phi) (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0)))))))) sin2phi)))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32))) sin2phi)))
#s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32)) sin2phi)))
#s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32)) sin2phi)))
#s(approx (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi))) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32)) sin2phi)))

eval58.0ms (1%)

Memory
-3.0MiB live, 97.2MiB allocated; 11ms collecting garbage
Compiler

Compiled 15 631 to 3 320 computations (78.8% saved)

prune64.0ms (1.1%)

Memory
-35.8MiB live, 108.2MiB allocated; 11ms collecting garbage
Pruning

71 alts after pruning (63 fresh and 8 done)

PrunedKeptTotal
New44521466
Fresh104252
Picked235
Done156
Total45871529
Accuracy
99.9%
Counts
529 → 71
Alt Table
Click to see full alt table
StatusAccuracyProgram
61.1%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0))) (log.f32 (+.f32 #s(literal 1 binary32) (fma.f32 u0 u0 (*.f32 #s(literal 1 binary32) u0)))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
88.6%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log1p.f32 u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
67.0%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log1p.f32 u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
60.7%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
48.9%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))))
50.6%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
49.6%
(/.f32 (neg.f32 (-.f32 (log.f32 #s(approx (- 1 (* u0 u0)) (*.f32 (*.f32 u0 u0) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)) #s(literal 1 binary32))))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
49.0%
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 #s(literal -1/3 binary32) (*.f32 u0 u0)) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
46.6%
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
61.0%
(/.f32 (neg.f32 (log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)) (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
63.7%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
38.1%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (+.f32 (cosh.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))) (sinh.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32)))))))
63.7%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
63.6%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))))
63.7%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
63.7%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
50.8%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) sin2phi) (*.f32 alphay alphay))))
20.6%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
63.0%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 (+.f32 (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay))) sin2phi)))
75.3%
(/.f32 (neg.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
61.2%
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
70.1%
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
68.7%
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0)))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
75.3%
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
57.4%
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
93.7%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
93.7%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
27.7%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
77.4%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
91.7%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(approx (+ (* 1/4 u0) 1/3) #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
87.5%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (/.f32 (fma.f32 cos2phi (*.f32 alphay alphay) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
40.2%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (/.f32 (+.f32 (pow.f32 (/.f32 cos2phi (*.f32 alphax alphax)) #s(literal 3 binary32)) (pow.f32 (/.f32 sin2phi (*.f32 alphay alphay)) #s(literal 3 binary32))) (fma.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 cos2phi (*.f32 alphax alphax)) (-.f32 (*.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 sin2phi (*.f32 alphay alphay))) (*.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
87.5%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
86.4%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))))
87.4%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
65.5%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
26.9%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
86.6%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))
73.0%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
87.4%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (/.f32 (+.f32 (pow.f32 (*.f32 #s(literal 1/2 binary32) u0) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (*.f32 #s(literal 1/2 binary32) u0) (*.f32 #s(literal 1/2 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 1/2 binary32) u0) #s(literal 1 binary32))))) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
87.4%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 #s(approx (+ (* 1/2 u0) 1) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
93.3%
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 #s(literal 1/4 binary32) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0)))))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
93.3%
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 #s(literal 1/4 binary32) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)) u0)) #s(literal 1/3 binary32)) u0)))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
87.3%
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
49.0%
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi))
20.7%
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi))
21.0%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 #s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi))))) u0))
92.7%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 #s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)))))) (/.f32 #s(literal 1/3 binary32) #s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))) u0 (/.f32 #s(literal 1/2 binary32) #s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))) u0 (/.f32 #s(literal 1 binary32) #s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))) u0))
27.8%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) cos2phi)) u0))
75.3%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))
70.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
66.0%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 #s(literal 1/2 binary32) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
70.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))))) sin2phi)))) u0))
57.8%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
27.7%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi)))) u0))
66.0%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0))
70.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0))))))) sin2phi))) u0))
57.8%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
51.3%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
51.3%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
20.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
20.8%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi))))
27.8%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
27.5%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
27.0%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)))) cos2phi))))
24.5%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0)) cos2phi))))
20.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 #s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi))))
70.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay))) sin2phi)))
70.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphay alphay) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi))))))
24.5%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
26.9%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 u0 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))))
Compiler

Compiled 4 714 to 3 991 computations (15.3% saved)

series91.0ms (1.6%)

Memory
2.2MiB live, 142.4MiB allocated; 8ms collecting garbage
Counts
50 → 274
Calls
Call 1
Inputs
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
#s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0))
(*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)
(fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32))
(fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32))
(fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32))
#s(literal 1/4 binary32)
u0
#s(literal 1/3 binary32)
#s(literal 1/2 binary32)
#s(literal 1 binary32)
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay)))
(/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))
(+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax)))
sin2phi
(/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))
(*.f32 (*.f32 alphay alphay) cos2phi)
(*.f32 alphay alphay)
alphay
cos2phi
(*.f32 alphax alphax)
alphax
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
(*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0)
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi)))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))
(/.f32 (*.f32 alphay alphay) sin2phi)
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0))
(*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0)
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))
(fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi))
(/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)
(*.f32 (*.f32 alphay alphay) u0)
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))))
#s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))
(*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))
(*.f32 u0 u0)
(+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))
(/.f32 #s(literal 1 binary32) u0)
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
(/.f32 cos2phi (*.f32 alphax alphax))
(/.f32 sin2phi (*.f32 alphay alphay))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))
(*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
(+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))
(/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))
(/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))
Outputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (/ (* (pow alphax 2) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (* (pow alphax 2) (+ (* -1 (/ (* (pow alphax 2) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* sin2phi (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (* (pow alphax 2) (+ (* (pow alphax 2) (+ (* -1 (/ (* (pow sin2phi 2) (log (- 1 u0))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 2) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))) (/ (* sin2phi (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) #s(hole binary32 (/ (* (pow alphay 2) cos2phi) (pow alphax 2))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) #s(hole binary32 (/ (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)) (pow alphax 2))))
#s(approx (/ (* (* alphay alphay) cos2phi) (* alphax alphax)) #s(hole binary32 (/ (* (pow alphay 2) cos2phi) (pow alphax 2))))
#s(approx (* alphax alphax) #s(hole binary32 (pow alphax 2)))
#s(approx alphax #s(hole binary32 alphax))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))) (* (pow alphax 2) (* u0 (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))) (* (pow alphax 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (* (pow alphax 2) (* u0 (- (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))) (* (pow alphax 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (* (pow alphax 2) (+ (* u0 (- (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))) (* (pow alphax 2) (* u0 (- (* u0 (+ (* -1/2 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow sin2phi 3) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4))))))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (+ (* (pow alphax 2) (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (+ (* (pow alphax 2) (- (+ (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (* (pow alphax 2) (- (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (+ (* (pow alphax 2) (- (+ (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (* (pow alphax 2) (- (+ (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* (pow alphax 2) (- (* u0 (+ (* -1/2 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow sin2phi 3) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi))))))
#s(approx (/ cos2phi (* alphax alphax)) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) #s(hole binary32 (/ 1 (pow alphax 2))))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) #s(hole binary32 (/ (+ 1 (/ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))) (pow alphax 2))))
#s(approx (/ 1 (* alphax alphax)) #s(hole binary32 (/ 1 (pow alphax 2))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (+ (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2))) (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) #s(hole binary32 sin2phi))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) #s(hole binary32 (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2)))) (pow alphax 2)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2)))) (pow alphax 2)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))) (pow alphax 4))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2)))) (pow alphax 2)) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow sin2phi 4))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4)))) (pow alphax 6)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))) (pow alphax 4)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (pow alphax 2)) (/ (pow alphay 2) sin2phi))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (pow alphax 2)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (pow alphax 4)) (/ (pow alphay 2) sin2phi)))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (pow alphax 2)) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow sin2phi 4))))))) (pow alphax 6)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (pow alphax 4)) (/ (pow alphay 2) sin2phi))))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (+ (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2))) (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4))))))))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) #s(hole binary32 (/ sin2phi (* (pow alphay 2) cos2phi))))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) #s(hole binary32 (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (/ (* (pow alphay 2) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (* (pow alphay 2) (+ (* -1 (/ (* (pow alphay 2) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* cos2phi (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (* (pow alphay 2) (+ (* (pow alphay 2) (+ (* -1 (/ (* (pow cos2phi 2) (log (- 1 u0))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 2) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))) (/ (* cos2phi (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (* (* alphay alphay) cos2phi) #s(hole binary32 (* (pow alphay 2) cos2phi)))
#s(approx (* alphay alphay) #s(hole binary32 (pow alphay 2)))
#s(approx alphay #s(hole binary32 alphay))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (* (pow alphay 2) (* u0 (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (* (pow alphay 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (* (pow alphay 2) (* u0 (- (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (* (pow alphay 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (* (pow alphay 2) (+ (* u0 (- (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))) (* (pow alphay 2) (* u0 (- (* u0 (+ (* -1/2 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow cos2phi 3) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4))))))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (+ (* (pow alphay 2) (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (+ (* (pow alphay 2) (- (+ (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (* (pow alphay 2) (- (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (+ (* (pow alphay 2) (- (+ (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (* (pow alphay 2) (- (+ (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* (pow alphay 2) (- (* u0 (+ (* -1/2 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow cos2phi 3) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)))))
#s(approx (/ (* alphay alphay) sin2phi) #s(hole binary32 (/ (pow alphay 2) sin2phi)))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) #s(hole binary32 (* (pow alphay 2) (+ (* 1/2 (/ u0 sin2phi)) (/ 1 sin2phi)))))
#s(approx (/ (* (* alphay alphay) u0) sin2phi) #s(hole binary32 (/ (* (pow alphay 2) u0) sin2phi)))
#s(approx (* (* alphay alphay) u0) #s(hole binary32 (* (pow alphay 2) u0)))
#s(approx (/ sin2phi (* alphay alphay)) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) #s(hole binary32 (/ (+ (/ sin2phi cos2phi) (/ (pow alphay 2) (pow alphax 2))) (pow alphay 2))))
#s(approx (/ sin2phi (* (* alphay alphay) cos2phi)) #s(hole binary32 (/ sin2phi (* (pow alphay 2) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (+ (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2))) (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) #s(hole binary32 (* (pow alphay 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2)))) (pow alphay 2)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2)))) (pow alphay 2)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))) (pow alphay 4))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2)))) (pow alphay 2)) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow cos2phi 4))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4)))) (pow alphay 6)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))) (pow alphay 4)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (pow alphay 2)) (/ (pow alphax 2) cos2phi))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (pow alphay 2)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (pow alphay 4)) (/ (pow alphax 2) cos2phi)))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (pow alphay 2)) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow cos2phi 4))))))) (pow alphay 6)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (pow alphay 4)) (/ (pow alphax 2) cos2phi))))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (+ (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2))) (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 u0))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* 1/3 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 u0))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* 1/3 u0)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 1))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (+ 1 (* 1/2 u0))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (+ 1 (* u0 (+ 1/2 (* 1/3 u0))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0))))))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 1/2))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (+ 1/2 (* 1/3 u0))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0))))))
#s(approx (+ (* 1/4 u0) 1/3) #s(hole binary32 1/3))
#s(approx (+ (* 1/4 u0) 1/3) #s(hole binary32 (+ 1/3 (* 1/4 u0))))
#s(approx u0 #s(hole binary32 u0))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (/ (pow alphay 2) sin2phi)))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (+ (* 1/2 (/ (* (pow alphay 2) u0) sin2phi)) (/ (pow alphay 2) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (+ (* u0 (+ (* 1/3 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/2 (/ (pow alphay 2) sin2phi)))) (/ (pow alphay 2) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) #s(hole binary32 (/ (pow alphay 2) sin2phi)))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) #s(hole binary32 (+ (* 1/2 (/ (* (pow alphay 2) u0) sin2phi)) (/ (pow alphay 2) sin2phi))))
#s(approx (* (+ (* 1/2 u0) 1) u0) #s(hole binary32 u0))
#s(approx (* (+ (* 1/2 u0) 1) u0) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (* (* u0 u0) (+ 1/2 (/ 1 u0))) #s(hole binary32 u0))
#s(approx (* (* u0 u0) (+ 1/2 (/ 1 u0))) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (* u0 u0) #s(hole binary32 (pow u0 2)))
#s(approx (+ 1/2 (/ 1 u0)) #s(hole binary32 (/ 1 u0)))
#s(approx (+ 1/2 (/ 1 u0)) #s(hole binary32 (/ (+ 1 (* 1/2 u0)) u0)))
#s(approx (/ 1 u0) #s(hole binary32 (/ 1 u0)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/3 (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* -1 (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (/ 1 u0) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (/ 1 u0)) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (+ (/ 1 u0) (* 1/3 (/ 1 (pow u0 3))))) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* 1/4 (pow u0 4))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* (pow u0 4) (+ 1/4 (* 1/3 (/ 1 u0))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* (pow u0 4) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (* 1/3 (/ 1 u0)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* (pow u0 4) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (+ (* 1/3 (/ 1 u0)) (/ 1 (pow u0 3))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* 1/4 (pow u0 3))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* (pow u0 3) (+ 1/4 (* 1/3 (/ 1 u0))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* (pow u0 3) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (* 1/3 (/ 1 u0)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* (pow u0 3) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (+ (* 1/3 (/ 1 u0)) (/ 1 (pow u0 3))))))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (* 1/4 (pow u0 2))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (* (pow u0 2) (+ 1/4 (* 1/3 (/ 1 u0))))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (* (pow u0 2) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (* 1/3 (/ 1 u0)))))))
#s(approx (+ (* 1/4 u0) 1/3) #s(hole binary32 (* 1/4 u0)))
#s(approx (+ (* 1/4 u0) 1/3) #s(hole binary32 (* u0 (+ 1/4 (* 1/3 (/ 1 u0))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* 1/4 (/ (pow u0 4) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (+ (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* 1/4 (/ (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (+ (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* 1/4 (/ (* (pow alphay 2) (pow u0 3)) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ (pow alphay 2) sin2phi)) (* 1/3 (/ (pow alphay 2) (* sin2phi u0)))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ (pow alphay 2) sin2phi)) (+ (* 1/3 (/ (pow alphay 2) (* sin2phi u0))) (* 1/2 (/ (pow alphay 2) (* sin2phi (pow u0 2)))))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ (pow alphay 2) sin2phi)) (+ (* 1/3 (/ (pow alphay 2) (* sin2phi u0))) (+ (* 1/2 (/ (pow alphay 2) (* sin2phi (pow u0 2)))) (/ (pow alphay 2) (* sin2phi (pow u0 3)))))))))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) #s(hole binary32 (* 1/2 (/ (* (pow alphay 2) u0) sin2phi))))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) #s(hole binary32 (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (/ (pow alphay 2) (* sin2phi u0))))))
#s(approx (* (+ (* 1/2 u0) 1) u0) #s(hole binary32 (* 1/2 (pow u0 2))))
#s(approx (* (+ (* 1/2 u0) 1) u0) #s(hole binary32 (* (pow u0 2) (+ 1/2 (/ 1 u0)))))
#s(approx (* (* u0 u0) (+ 1/2 (/ 1 u0))) #s(hole binary32 (* 1/2 (pow u0 2))))
#s(approx (* (* u0 u0) (+ 1/2 (/ 1 u0))) #s(hole binary32 (* (pow u0 2) (+ 1/2 (/ 1 u0)))))
#s(approx (+ 1/2 (/ 1 u0)) #s(hole binary32 1/2))
#s(approx (+ 1/2 (/ 1 u0)) #s(hole binary32 (+ 1/2 (/ 1 u0))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (- (* -1 (/ (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) u0)) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (log (/ -1 u0))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (/ 1 u0) (* -1 (log (/ -1 u0))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (/ 1 u0)) (* -1 (log (/ -1 u0))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (* -1 (/ (- (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) u0)) 1) u0)) (* -1 (log (/ -1 u0))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* (pow u0 4) (+ 1/4 (* -1 (/ (- (* -1 (/ (+ 1/2 (/ 1 u0)) u0)) 1/3) u0))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ 1/3 (* 1/2 (/ 1 u0))) u0)) 1/4)))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ 1/3 (+ (* 1/2 (/ 1 u0)) (/ 1 (pow u0 2)))) u0)) 1/4)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (* -1 (/ (- (* -1 (/ (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ (* 1/2 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ (/ 1/2 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) u0)) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* -1 (* (pow u0 3) (+ (* -1/3 (/ (pow alphay 2) (* sin2phi u0))) (* -1/4 (/ (pow alphay 2) sin2phi)))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* -1 (* (pow u0 3) (+ (* -1 (/ (+ (* 1/3 (/ (pow alphay 2) sin2phi)) (* 1/2 (/ (pow alphay 2) (* sin2phi u0)))) u0)) (* -1/4 (/ (pow alphay 2) sin2phi)))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* -1 (* (pow u0 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (pow alphay 2) (* sin2phi u0))) (* -1/2 (/ (pow alphay 2) sin2phi))) u0)) (* 1/3 (/ (pow alphay 2) sin2phi))) u0)) (* -1/4 (/ (pow alphay 2) sin2phi)))))))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) #s(hole binary32 (* -1 (* u0 (+ (* -1 (/ (pow alphay 2) (* sin2phi u0))) (* -1/2 (/ (pow alphay 2) sin2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (* cos2phi (+ (* -1 (/ (* (pow alphay 6) (* cos2phi (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (* cos2phi (+ (* cos2phi (+ (* -1 (/ (* (pow alphay 6) (log (- 1 u0))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 8) (* cos2phi (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))) (/ (* (pow alphay 4) (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx cos2phi #s(hole binary32 cos2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* cos2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* cos2phi (+ (* cos2phi (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* cos2phi (+ (* cos2phi (+ (* cos2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow alphay 8) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))))) (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* cos2phi (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* cos2phi (- (+ (* cos2phi (- (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* cos2phi (- (+ (* cos2phi (- (+ (* cos2phi (- (* u0 (+ (* -1/2 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow alphay 8) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4))))) (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3))))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) #s(hole binary32 (/ (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 2)))) (+ (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi)) (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 3)))))) cos2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) #s(hole binary32 (* cos2phi (+ (/ sin2phi cos2phi) (/ (pow alphay 2) (pow alphax 2))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) (pow cos2phi 2)))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6)))) (pow cos2phi 3)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) (pow cos2phi 2))))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2)) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi) (pow alphax 2))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (pow cos2phi 2)) (pow alphax 2)))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (pow cos2phi 3)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (pow cos2phi 2)) (pow alphax 2))))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (+ (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)) (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 3)))))) cos2phi)))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi))) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) cos2phi))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (pow alphay 2))) cos2phi)) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) cos2phi))) (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (pow alphay 4))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (pow alphay 2))) cos2phi)) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) #s(hole binary32 (* -1 (* cos2phi (+ (* -1 (/ sin2phi cos2phi)) (* -1 (/ (pow alphay 2) (pow alphax 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4)))) cos2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))))) cos2phi)) (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6)))) cos2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) cos2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))))) cos2phi)) (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) cos2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2)))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) cos2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4)))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) cos2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2)))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (* sin2phi (+ (* -1 (/ (* (pow alphax 6) (* sin2phi (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (* sin2phi (+ (* sin2phi (+ (* -1 (/ (* (pow alphax 6) (log (- 1 u0))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 8) (* sin2phi (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))) (/ (* (pow alphax 4) (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx sin2phi #s(hole binary32 sin2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* sin2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* sin2phi (+ (* sin2phi (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* sin2phi (+ (* sin2phi (+ (* sin2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow alphax 8) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))))) (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* sin2phi (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* sin2phi (- (+ (* sin2phi (- (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* sin2phi (- (+ (* sin2phi (- (+ (* sin2phi (- (* u0 (+ (* -1/2 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow alphax 8) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4))))) (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3))))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (/ (* (pow alphay 2) (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0))))))) sin2phi)))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) #s(hole binary32 (/ (+ (* 1/2 (* (pow alphay 2) u0)) (pow alphay 2)) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 2)))) (+ (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi)) (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 3)))))) sin2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) #s(hole binary32 (* sin2phi (+ 1 (/ (* (pow alphay 2) cos2phi) (* (pow alphax 2) sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) (pow sin2phi 2)))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6)))) (pow sin2phi 3)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) (pow sin2phi 2))))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2)) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi) (pow alphay 2))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (pow sin2phi 2)) (pow alphay 2)))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (pow sin2phi 3)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (pow sin2phi 2)) (pow alphay 2))))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (+ (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)) (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 3)))))) sin2phi)))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) #s(hole binary32 (* sin2phi (+ (/ 1 (* (pow alphax 2) sin2phi)) (/ 1 (* (pow alphay 2) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi))) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) sin2phi))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (pow alphax 2))) sin2phi)) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) sin2phi))) (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (pow alphax 4))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (pow alphax 2))) sin2phi)) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ (* (pow alphay 2) cos2phi) (* (pow alphax 2) sin2phi))) 1)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4)))) sin2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))))) sin2phi)) (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6)))) sin2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) sin2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))))) sin2phi)) (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) sin2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2)))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) sin2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4)))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) sin2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2)))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* -1 (/ (* (pow alphay 2) (- (* u0 (- (* u0 (- (* -1/4 u0) 1/3)) 1/2)) 1)) sin2phi))))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) #s(hole binary32 (* -1 (/ (+ (* -1 (pow alphay 2)) (* -1/2 (* (pow alphay 2) u0))) sin2phi))))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
Calls

15 calls:

TimeVariablePointExpression
8.0ms
alphay
@inf
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (+ (* 1/4 u0) 1/3) 1/4 u0 1/3 1/2 1 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax)) (* (* alphay alphay) cos2phi) (* alphay alphay) alphay cos2phi (* alphax alphax) alphax (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/ (* alphay alphay) sin2phi) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/ (* (* alphay alphay) u0) sin2phi) (* (* alphay alphay) u0) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* 1/2 u0) 1) u0) (* (* u0 u0) (+ 1/2 (/ 1 u0))) (* u0 u0) (+ 1/2 (/ 1 u0)) (/ 1 u0) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))
6.0ms
sin2phi
@-inf
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (+ (* 1/4 u0) 1/3) 1/4 u0 1/3 1/2 1 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax)) (* (* alphay alphay) cos2phi) (* alphay alphay) alphay cos2phi (* alphax alphax) alphax (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/ (* alphay alphay) sin2phi) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/ (* (* alphay alphay) u0) sin2phi) (* (* alphay alphay) u0) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* 1/2 u0) 1) u0) (* (* u0 u0) (+ 1/2 (/ 1 u0))) (* u0 u0) (+ 1/2 (/ 1 u0)) (/ 1 u0) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))
6.0ms
cos2phi
@-inf
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (+ (* 1/4 u0) 1/3) 1/4 u0 1/3 1/2 1 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax)) (* (* alphay alphay) cos2phi) (* alphay alphay) alphay cos2phi (* alphax alphax) alphax (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/ (* alphay alphay) sin2phi) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/ (* (* alphay alphay) u0) sin2phi) (* (* alphay alphay) u0) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* 1/2 u0) 1) u0) (* (* u0 u0) (+ 1/2 (/ 1 u0))) (* u0 u0) (+ 1/2 (/ 1 u0)) (/ 1 u0) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))
6.0ms
alphay
@-inf
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (+ (* 1/4 u0) 1/3) 1/4 u0 1/3 1/2 1 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax)) (* (* alphay alphay) cos2phi) (* alphay alphay) alphay cos2phi (* alphax alphax) alphax (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/ (* alphay alphay) sin2phi) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/ (* (* alphay alphay) u0) sin2phi) (* (* alphay alphay) u0) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* 1/2 u0) 1) u0) (* (* u0 u0) (+ 1/2 (/ 1 u0))) (* u0 u0) (+ 1/2 (/ 1 u0)) (/ 1 u0) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))
6.0ms
alphay
@0
((/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (+ (* 1/4 u0) 1/3) 1/4 u0 1/3 1/2 1 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax)) (* (* alphay alphay) cos2phi) (* alphay alphay) alphay cos2phi (* alphax alphax) alphax (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/ (* alphay alphay) sin2phi) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/ (* (* alphay alphay) u0) sin2phi) (* (* alphay alphay) u0) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg (log (- 1 u0))) (* (+ (* 1/2 u0) 1) u0) (* (* u0 u0) (+ 1/2 (/ 1 u0))) (* u0 u0) (+ 1/2 (/ 1 u0)) (/ 1 u0) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)) (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))

rewrite218.0ms (3.9%)

Memory
17.3MiB live, 254.8MiB allocated; 27ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0168524274
0174123946
0814722864
Stop Event
iter-limit
node-limit
iter-limit
Counts
324 → 378
Calls
Call 1
Inputs
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
#s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0))
(*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)
(fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32))
(fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32))
(fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32))
#s(literal 1/4 binary32)
u0
#s(literal 1/3 binary32)
#s(literal 1/2 binary32)
#s(literal 1 binary32)
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay)))
(/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))
(+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax)))
sin2phi
(/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))
(*.f32 (*.f32 alphay alphay) cos2phi)
(*.f32 alphay alphay)
alphay
cos2phi
(*.f32 alphax alphax)
alphax
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
(*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0)
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi)))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))
(/.f32 (*.f32 alphay alphay) sin2phi)
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0))
(*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0)
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))
(fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi))
(/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)
(*.f32 (*.f32 alphay alphay) u0)
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))))
#s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))
(*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))
(*.f32 u0 u0)
(+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))
(/.f32 #s(literal 1 binary32) u0)
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
(/.f32 cos2phi (*.f32 alphax alphax))
(/.f32 sin2phi (*.f32 alphay alphay))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))
(*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
(+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))
(/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))
(/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (/ (* (pow alphax 2) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (* (pow alphax 2) (+ (* -1 (/ (* (pow alphax 2) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* sin2phi (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphax 2) (+ (* -1 (/ (log (- 1 u0)) cos2phi)) (* (pow alphax 2) (+ (* (pow alphax 2) (+ (* -1 (/ (* (pow sin2phi 2) (log (- 1 u0))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 2) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))) (/ (* sin2phi (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2)))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) #s(hole binary32 (/ (* (pow alphay 2) cos2phi) (pow alphax 2))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) #s(hole binary32 (/ (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)) (pow alphax 2))))
#s(approx (/ (* (* alphay alphay) cos2phi) (* alphax alphax)) #s(hole binary32 (/ (* (pow alphay 2) cos2phi) (pow alphax 2))))
#s(approx (* alphax alphax) #s(hole binary32 (pow alphax 2)))
#s(approx alphax #s(hole binary32 alphax))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))) (* (pow alphax 2) (* u0 (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))) (* (pow alphax 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (* (pow alphax 2) (* u0 (- (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi))) (* (pow alphax 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (* (pow alphax 2) (+ (* u0 (- (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))) (* (pow alphax 2) (* u0 (- (* u0 (+ (* -1/2 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow sin2phi 3) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4))))))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (/ 1 cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (+ (* (pow alphax 2) (- (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (+ (* (pow alphax 2) (- (+ (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (* (pow alphax 2) (- (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphax 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 cos2phi)) (* 1/3 (/ 1 cos2phi)))) (* 1/2 (/ 1 cos2phi)))) (+ (* (pow alphax 2) (- (+ (* u0 (+ (* -1/2 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ sin2phi (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* sin2phi u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (* (pow alphax 2) (- (+ (* u0 (+ (* 1/2 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow sin2phi 2) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3)))))))) (* (pow alphax 2) (- (* u0 (+ (* -1/2 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow sin2phi 3) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow sin2phi 3) (* (pow alphay 6) (pow cos2phi 4)))))) (* -1 (/ (pow sin2phi 2) (* (pow alphay 4) (pow cos2phi 3))))))) (/ sin2phi (* (pow alphay 2) (pow cos2phi 2))))) (/ 1 cos2phi))))))
#s(approx (/ cos2phi (* alphax alphax)) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) #s(hole binary32 (/ 1 (pow alphax 2))))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) #s(hole binary32 (/ (+ 1 (/ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))) (pow alphax 2))))
#s(approx (/ 1 (* alphax alphax)) #s(hole binary32 (/ 1 (pow alphax 2))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (+ (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2))) (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) #s(hole binary32 sin2phi))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) #s(hole binary32 (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2)))) (pow alphax 2)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2)))) (pow alphax 2)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))) (pow alphax 4))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2)))) (pow alphax 2)) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow sin2phi 4))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4)))) (pow alphax 6)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))) (pow alphax 4)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (pow alphax 2)) (/ (pow alphay 2) sin2phi))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (pow alphax 2)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (pow alphax 4)) (/ (pow alphay 2) sin2phi)))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow sin2phi 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow sin2phi 2))))))) (pow alphax 2)) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow sin2phi 4))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow sin2phi 4))))))) (pow alphax 6)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow sin2phi 3))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow sin2phi 3))))))) (pow alphax 4)) (/ (pow alphay 2) sin2phi))))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 3)))) (+ (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) (pow sin2phi 2))) (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 4))))))))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) #s(hole binary32 (/ sin2phi (* (pow alphay 2) cos2phi))))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) #s(hole binary32 (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (/ (* (pow alphay 2) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) (pow sin2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (* (pow alphay 2) (+ (* -1 (/ (* (pow alphay 2) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* cos2phi (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* (pow alphay 2) (+ (* -1 (/ (log (- 1 u0)) sin2phi)) (* (pow alphay 2) (+ (* (pow alphay 2) (+ (* -1 (/ (* (pow cos2phi 2) (log (- 1 u0))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 2) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))) (/ (* cos2phi (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2)))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (* (* alphay alphay) cos2phi) #s(hole binary32 (* (pow alphay 2) cos2phi)))
#s(approx (* alphay alphay) #s(hole binary32 (pow alphay 2)))
#s(approx alphay #s(hole binary32 alphay))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (* (pow alphay 2) (* u0 (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (* (pow alphay 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (* (pow alphay 2) (* u0 (- (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (* (pow alphay 2) (+ (* u0 (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (* (pow alphay 2) (+ (* u0 (- (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))) (* (pow alphay 2) (* u0 (- (* u0 (+ (* -1/2 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow cos2phi 3) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4))))))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (+ (* (pow alphay 2) (- (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (+ (* (pow alphay 2) (- (+ (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (* (pow alphay 2) (- (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (+ (* (pow alphay 2) (- (+ (* u0 (+ (* -1/2 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ cos2phi (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* cos2phi u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (* (pow alphay 2) (- (+ (* u0 (+ (* 1/2 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow cos2phi 2) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3)))))))) (* (pow alphay 2) (- (* u0 (+ (* -1/2 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow cos2phi 3) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow cos2phi 3) (* (pow alphax 6) (pow sin2phi 4)))))) (* -1 (/ (pow cos2phi 2) (* (pow alphax 4) (pow sin2phi 3))))))) (/ cos2phi (* (pow alphax 2) (pow sin2phi 2))))) (/ 1 sin2phi))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* (pow alphay 2) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)))))
#s(approx (/ (* alphay alphay) sin2phi) #s(hole binary32 (/ (pow alphay 2) sin2phi)))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) #s(hole binary32 (* (pow alphay 2) (+ (* 1/2 (/ u0 sin2phi)) (/ 1 sin2phi)))))
#s(approx (/ (* (* alphay alphay) u0) sin2phi) #s(hole binary32 (/ (* (pow alphay 2) u0) sin2phi)))
#s(approx (* (* alphay alphay) u0) #s(hole binary32 (* (pow alphay 2) u0)))
#s(approx (/ sin2phi (* alphay alphay)) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) #s(hole binary32 (/ (+ (/ sin2phi cos2phi) (/ (pow alphay 2) (pow alphax 2))) (pow alphay 2))))
#s(approx (/ sin2phi (* (* alphay alphay) cos2phi)) #s(hole binary32 (/ sin2phi (* (pow alphay 2) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (+ (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) (pow cos2phi 2))) (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) #s(hole binary32 (* (pow alphay 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2)))) (pow alphay 2)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2)))) (pow alphay 2)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))) (pow alphay 4))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2)))) (pow alphay 2)) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow cos2phi 4))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4)))) (pow alphay 6)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))) (pow alphay 4)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (pow alphay 2)) (/ (pow alphax 2) cos2phi))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (pow alphay 2)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (pow alphay 4)) (/ (pow alphax 2) cos2phi)))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (- (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow cos2phi 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow cos2phi 2))))))) (pow alphay 2)) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow cos2phi 4))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow cos2phi 4))))))) (pow alphay 6)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow cos2phi 3))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow cos2phi 3))))))) (pow alphay 4)) (/ (pow alphax 2) cos2phi))))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 3)))) (+ (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) (pow cos2phi 2))) (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 4))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 u0))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* 1/3 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 u0))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* 1/3 u0)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* u0 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 1))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (+ 1 (* 1/2 u0))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (+ 1 (* u0 (+ 1/2 (* 1/3 u0))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0))))))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 1/2))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (+ 1/2 (* 1/3 u0))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0))))))
#s(approx (+ (* 1/4 u0) 1/3) #s(hole binary32 1/3))
#s(approx (+ (* 1/4 u0) 1/3) #s(hole binary32 (+ 1/3 (* 1/4 u0))))
#s(approx u0 #s(hole binary32 u0))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* u0 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* 1/2 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* 1/3 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (/ (pow alphay 2) sin2phi)))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (+ (* 1/2 (/ (* (pow alphay 2) u0) sin2phi)) (/ (pow alphay 2) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (+ (* u0 (+ (* 1/3 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/2 (/ (pow alphay 2) sin2phi)))) (/ (pow alphay 2) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) #s(hole binary32 (/ (pow alphay 2) sin2phi)))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) #s(hole binary32 (+ (* 1/2 (/ (* (pow alphay 2) u0) sin2phi)) (/ (pow alphay 2) sin2phi))))
#s(approx (* (+ (* 1/2 u0) 1) u0) #s(hole binary32 u0))
#s(approx (* (+ (* 1/2 u0) 1) u0) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (* (* u0 u0) (+ 1/2 (/ 1 u0))) #s(hole binary32 u0))
#s(approx (* (* u0 u0) (+ 1/2 (/ 1 u0))) #s(hole binary32 (* u0 (+ 1 (* 1/2 u0)))))
#s(approx (* u0 u0) #s(hole binary32 (pow u0 2)))
#s(approx (+ 1/2 (/ 1 u0)) #s(hole binary32 (/ 1 u0)))
#s(approx (+ 1/2 (/ 1 u0)) #s(hole binary32 (/ (+ 1 (* 1/2 u0)) u0)))
#s(approx (/ 1 u0) #s(hole binary32 (/ 1 u0)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (log -1) (* -1 (log (/ 1 u0)))) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/3 (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (* -1 (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (/ 1 u0) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (/ 1 u0)) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (+ (/ 1 u0) (* 1/3 (/ 1 (pow u0 3))))) (+ (log -1) (* -1 (log (/ 1 u0)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* 1/4 (pow u0 4))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* (pow u0 4) (+ 1/4 (* 1/3 (/ 1 u0))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* (pow u0 4) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (* 1/3 (/ 1 u0)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* (pow u0 4) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (+ (* 1/3 (/ 1 u0)) (/ 1 (pow u0 3))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* 1/4 (pow u0 3))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* (pow u0 3) (+ 1/4 (* 1/3 (/ 1 u0))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* (pow u0 3) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (* 1/3 (/ 1 u0)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* (pow u0 3) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (+ (* 1/3 (/ 1 u0)) (/ 1 (pow u0 3))))))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (* 1/4 (pow u0 2))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (* (pow u0 2) (+ 1/4 (* 1/3 (/ 1 u0))))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(hole binary32 (* (pow u0 2) (+ 1/4 (+ (/ 1/2 (pow u0 2)) (* 1/3 (/ 1 u0)))))))
#s(approx (+ (* 1/4 u0) 1/3) #s(hole binary32 (* 1/4 u0)))
#s(approx (+ (* 1/4 u0) 1/3) #s(hole binary32 (* u0 (+ 1/4 (* 1/3 (/ 1 u0))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* 1/4 (/ (pow u0 4) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (+ (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* 1/4 (/ (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (/ 1/3 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (* 1/2 (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (+ (/ 1 (* (pow u0 3) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* 1/4 (/ (* (pow alphay 2) (pow u0 3)) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ (pow alphay 2) sin2phi)) (* 1/3 (/ (pow alphay 2) (* sin2phi u0)))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ (pow alphay 2) sin2phi)) (+ (* 1/3 (/ (pow alphay 2) (* sin2phi u0))) (* 1/2 (/ (pow alphay 2) (* sin2phi (pow u0 2)))))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ (pow alphay 2) sin2phi)) (+ (* 1/3 (/ (pow alphay 2) (* sin2phi u0))) (+ (* 1/2 (/ (pow alphay 2) (* sin2phi (pow u0 2)))) (/ (pow alphay 2) (* sin2phi (pow u0 3)))))))))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) #s(hole binary32 (* 1/2 (/ (* (pow alphay 2) u0) sin2phi))))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) #s(hole binary32 (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (/ (pow alphay 2) (* sin2phi u0))))))
#s(approx (* (+ (* 1/2 u0) 1) u0) #s(hole binary32 (* 1/2 (pow u0 2))))
#s(approx (* (+ (* 1/2 u0) 1) u0) #s(hole binary32 (* (pow u0 2) (+ 1/2 (/ 1 u0)))))
#s(approx (* (* u0 u0) (+ 1/2 (/ 1 u0))) #s(hole binary32 (* 1/2 (pow u0 2))))
#s(approx (* (* u0 u0) (+ 1/2 (/ 1 u0))) #s(hole binary32 (* (pow u0 2) (+ 1/2 (/ 1 u0)))))
#s(approx (+ 1/2 (/ 1 u0)) #s(hole binary32 1/2))
#s(approx (+ 1/2 (/ 1 u0)) #s(hole binary32 (+ 1/2 (/ 1 u0))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (/ 1/2 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (- (* -1 (/ (+ (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) u0)) (/ (log (/ -1 u0)) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (log (/ -1 u0))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (/ 1 u0) (* -1 (log (/ -1 u0))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (+ (/ 1/2 (pow u0 2)) (/ 1 u0)) (* -1 (log (/ -1 u0))))))
#s(approx (neg (log (- 1 u0))) #s(hole binary32 (- (* -1 (/ (- (* -1 (/ (+ 1/2 (* 1/3 (/ 1 u0))) u0)) 1) u0)) (* -1 (log (/ -1 u0))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) #s(hole binary32 (* (pow u0 4) (+ 1/4 (* -1 (/ (- (* -1 (/ (+ 1/2 (/ 1 u0)) u0)) 1/3) u0))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ 1/3 (* 1/2 (/ 1 u0))) u0)) 1/4)))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ 1/3 (+ (* 1/2 (/ 1 u0)) (/ 1 (pow u0 2)))) u0)) 1/4)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* (pow u0 4) (+ (* -1 (/ (- (* -1 (/ (+ (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/2 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* (pow u0 3) (+ (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ (* 1/2 (/ 1 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))) u0)) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (* (pow u0 3) (- (* -1 (/ (+ (/ 1/2 (* u0 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (+ (/ 1 (* (pow u0 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))) (* 1/3 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))) u0)) (* 1/4 (/ 1 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* -1 (* (pow u0 3) (+ (* -1/3 (/ (pow alphay 2) (* sin2phi u0))) (* -1/4 (/ (pow alphay 2) sin2phi)))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* -1 (* (pow u0 3) (+ (* -1 (/ (+ (* 1/3 (/ (pow alphay 2) sin2phi)) (* 1/2 (/ (pow alphay 2) (* sin2phi u0)))) u0)) (* -1/4 (/ (pow alphay 2) sin2phi)))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* -1 (* (pow u0 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (pow alphay 2) (* sin2phi u0))) (* -1/2 (/ (pow alphay 2) sin2phi))) u0)) (* 1/3 (/ (pow alphay 2) sin2phi))) u0)) (* -1/4 (/ (pow alphay 2) sin2phi)))))))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) #s(hole binary32 (* -1 (* u0 (+ (* -1 (/ (pow alphay 2) (* sin2phi u0))) (* -1/2 (/ (pow alphay 2) sin2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (* cos2phi (+ (* -1 (/ (* (pow alphay 6) (* cos2phi (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 4) (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi)) (* cos2phi (+ (* cos2phi (+ (* -1 (/ (* (pow alphay 6) (log (- 1 u0))) (* (pow alphax 4) (pow sin2phi 3)))) (/ (* (pow alphay 8) (* cos2phi (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 4))))) (/ (* (pow alphay 4) (log (- 1 u0))) (* (pow alphax 2) (pow sin2phi 2))))))))
#s(approx cos2phi #s(hole binary32 cos2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* cos2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* cos2phi (+ (* cos2phi (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* cos2phi (+ (* cos2phi (+ (* cos2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow alphay 8) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))))) (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* cos2phi (- (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2)))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* cos2phi (- (+ (* cos2phi (- (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* cos2phi (- (+ (* cos2phi (- (+ (* cos2phi (- (* u0 (+ (* -1/2 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4)))) (* -1/4 (/ (* (pow alphay 8) u0) (* (pow alphax 6) (pow sin2phi 4)))))))) (/ (pow alphay 8) (* (pow alphax 6) (pow sin2phi 4))))) (* u0 (+ (* 1/2 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) u0) (* (pow alphax 4) (pow sin2phi 3)))) (* 1/3 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3))))))))) (* -1 (/ (pow alphay 6) (* (pow alphax 4) (pow sin2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2)))) (* -1/4 (/ (* (pow alphay 4) u0) (* (pow alphax 2) (pow sin2phi 2))))))))) (/ (pow alphay 4) (* (pow alphax 2) (pow sin2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphay 2) sin2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphay 2) u0) sin2phi)) (* 1/3 (/ (pow alphay 2) sin2phi)))))) (/ (pow alphay 2) sin2phi)))))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) #s(hole binary32 (/ (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphax 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 2)))) (+ (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi)) (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 3)))))) cos2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) #s(hole binary32 (* cos2phi (+ (/ sin2phi cos2phi) (/ (pow alphay 2) (pow alphax 2))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) (pow cos2phi 2)))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6)))) (pow cos2phi 3)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) (pow cos2phi 2))))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (pow alphax 2)) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi) (pow alphax 2))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (pow cos2phi 2)) (pow alphax 2)))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphax 2)) (* u0 (+ (* 1/4 (* (pow alphax 2) u0)) (* 1/3 (pow alphax 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) cos2phi) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (pow cos2phi 3)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))) (* 1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))))) (pow cos2phi 2)) (pow alphax 2))))) (+ (* -1 (/ (* (pow alphax 6) (pow sin2phi 2)) (* (pow alphay 4) (pow cos2phi 2)))) (+ (/ (* (pow alphax 4) sin2phi) (* (pow alphay 2) cos2phi)) (/ (* (pow alphax 8) (pow sin2phi 3)) (* (pow alphay 6) (pow cos2phi 3)))))) cos2phi)))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (* (pow alphay 2) cos2phi))) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (* (pow alphay 4) cos2phi))) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (pow alphay 2))) cos2phi)) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 8) (* (pow sin2phi 3) (log (- 1 u0)))) (* (pow alphay 6) cos2phi))) (/ (* (pow alphax 6) (* (pow sin2phi 2) (log (- 1 u0)))) (pow alphay 4))) cos2phi)) (/ (* (pow alphax 4) (* sin2phi (log (- 1 u0)))) (pow alphay 2))) cos2phi)) (* (pow alphax 2) (log (- 1 u0)))) cos2phi))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) #s(hole binary32 (* -1 (* cos2phi (+ (* -1 (/ sin2phi cos2phi)) (* -1 (/ (pow alphay 2) (pow alphax 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2)))) cos2phi)) (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4)))) cos2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))))) cos2phi)) (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))))) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6)))) cos2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))))) cos2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))))) cos2phi)) (* u0 (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) cos2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2)))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* u0 (+ (* -1/3 (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) (* -1/4 (/ (* (pow alphax 8) (* (pow sin2phi 3) u0)) (pow alphay 6))))))) (/ (* (pow alphax 8) (pow sin2phi 3)) (pow alphay 6))) cos2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* u0 (+ (* -1/3 (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) (* -1/4 (/ (* (pow alphax 6) (* (pow sin2phi 2) u0)) (pow alphay 4)))))))) (/ (* (pow alphax 6) (pow sin2phi 2)) (pow alphay 4))) cos2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* u0 (+ (* -1/3 (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) (* -1/4 (/ (* (pow alphax 4) (* sin2phi u0)) (pow alphay 2)))))))) (/ (* (pow alphax 4) sin2phi) (pow alphay 2))) cos2phi)) (+ (* -1 (pow alphax 2)) (* u0 (+ (* -1/2 (pow alphax 2)) (* u0 (+ (* -1/3 (pow alphax 2)) (* -1/4 (* (pow alphax 2) u0)))))))) cos2phi))))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (* sin2phi (+ (* -1 (/ (* (pow alphax 6) (* sin2phi (log (- 1 u0)))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 4) (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi)) (* sin2phi (+ (* sin2phi (+ (* -1 (/ (* (pow alphax 6) (log (- 1 u0))) (* (pow alphay 4) (pow cos2phi 3)))) (/ (* (pow alphax 8) (* sin2phi (log (- 1 u0)))) (* (pow alphay 6) (pow cos2phi 4))))) (/ (* (pow alphax 4) (log (- 1 u0))) (* (pow alphay 2) (pow cos2phi 2))))))))
#s(approx sin2phi #s(hole binary32 sin2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* sin2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* sin2phi (+ (* sin2phi (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (+ (* sin2phi (+ (* sin2phi (+ (* sin2phi (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow alphax 8) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))))) (* u0 (- (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* u0 (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))))) (* u0 (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* sin2phi (- (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2)))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* sin2phi (- (+ (* sin2phi (- (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (+ (* sin2phi (- (+ (* sin2phi (- (+ (* sin2phi (- (* u0 (+ (* -1/2 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* u0 (+ (* -1/3 (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4)))) (* -1/4 (/ (* (pow alphax 8) u0) (* (pow alphay 6) (pow cos2phi 4)))))))) (/ (pow alphax 8) (* (pow alphay 6) (pow cos2phi 4))))) (* u0 (+ (* 1/2 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 6) u0) (* (pow alphay 4) (pow cos2phi 3)))) (* 1/3 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3))))))))) (* -1 (/ (pow alphax 6) (* (pow alphay 4) (pow cos2phi 3)))))) (* u0 (+ (* -1/2 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* u0 (+ (* -1/3 (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2)))) (* -1/4 (/ (* (pow alphax 4) u0) (* (pow alphay 2) (pow cos2phi 2))))))))) (/ (pow alphax 4) (* (pow alphay 2) (pow cos2phi 2))))) (+ (* u0 (+ (* 1/2 (/ (pow alphax 2) cos2phi)) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) u0) cos2phi)) (* 1/3 (/ (pow alphax 2) cos2phi)))))) (/ (pow alphax 2) cos2phi)))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (/ (* (pow alphay 2) (+ 1 (* u0 (+ 1/2 (* u0 (+ 1/3 (* 1/4 u0))))))) sin2phi)))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) #s(hole binary32 (/ (+ (* 1/2 (* (pow alphay 2) u0)) (pow alphay 2)) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (/ (+ (* -1 (* (pow alphay 2) (log (- 1 u0)))) (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) (pow sin2phi 2)))) (+ (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi)) (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) (pow sin2phi 3)))))) sin2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) #s(hole binary32 (* sin2phi (+ 1 (/ (* (pow alphay 2) cos2phi) (* (pow alphax 2) sin2phi))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) (pow sin2phi 2)))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (/ (+ (* u0 (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2))) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi) (+ (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6)))) (pow sin2phi 3)) (/ (* u0 (- (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) (pow sin2phi 2))))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (pow alphay 2)) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi) (pow alphay 2))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (pow sin2phi 2)) (pow alphay 2)))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (/ (- (+ (* u0 (+ (* 1/2 (pow alphay 2)) (* u0 (+ (* 1/4 (* (pow alphay 2) u0)) (* 1/3 (pow alphay 2)))))) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) sin2phi) (+ (/ (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (pow sin2phi 3)) (+ (/ (* u0 (+ (* 1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* 1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))) (* 1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))))) (pow sin2phi 2)) (pow alphay 2))))) (+ (* -1 (/ (* (pow alphay 6) (pow cos2phi 2)) (* (pow alphax 4) (pow sin2phi 2)))) (+ (/ (* (pow alphay 4) cos2phi) (* (pow alphax 2) sin2phi)) (/ (* (pow alphay 8) (pow cos2phi 3)) (* (pow alphax 6) (pow sin2phi 3)))))) sin2phi)))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) #s(hole binary32 (* sin2phi (+ (/ 1 (* (pow alphax 2) sin2phi)) (/ 1 (* (pow alphay 2) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (* (pow alphax 2) sin2phi))) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (* (pow alphax 4) sin2phi))) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (pow alphax 2))) sin2phi)) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow alphay 8) (* (pow cos2phi 3) (log (- 1 u0)))) (* (pow alphax 6) sin2phi))) (/ (* (pow alphay 6) (* (pow cos2phi 2) (log (- 1 u0)))) (pow alphax 4))) sin2phi)) (/ (* (pow alphay 4) (* cos2phi (log (- 1 u0)))) (pow alphax 2))) sin2phi)) (* (pow alphay 2) (log (- 1 u0)))) sin2phi))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ (* (pow alphay 2) cos2phi) (* (pow alphax 2) sin2phi))) 1)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2)))) sin2phi)) (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4)))) sin2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))))) sin2phi)) (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))))) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6)))) sin2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))))) sin2phi)) (* u0 (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))))) sin2phi)) (* u0 (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) sin2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2)))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(hole binary32 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* u0 (+ (* -1/2 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* u0 (+ (* -1/3 (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) (* -1/4 (/ (* (pow alphay 8) (* (pow cos2phi 3) u0)) (pow alphax 6))))))) (/ (* (pow alphay 8) (pow cos2phi 3)) (pow alphax 6))) sin2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* u0 (+ (* -1/3 (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) (* -1/4 (/ (* (pow alphay 6) (* (pow cos2phi 2) u0)) (pow alphax 4)))))))) (/ (* (pow alphay 6) (pow cos2phi 2)) (pow alphax 4))) sin2phi)) (* u0 (+ (* -1/2 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* u0 (+ (* -1/3 (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) (* -1/4 (/ (* (pow alphay 4) (* cos2phi u0)) (pow alphax 2)))))))) (/ (* (pow alphay 4) cos2phi) (pow alphax 2))) sin2phi)) (+ (* -1 (pow alphay 2)) (* u0 (+ (* -1/2 (pow alphay 2)) (* u0 (+ (* -1/3 (pow alphay 2)) (* -1/4 (* (pow alphay 2) u0)))))))) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(hole binary32 (* -1 (/ (* (pow alphay 2) (- (* u0 (- (* u0 (- (* -1/4 u0) 1/3)) 1/2)) 1)) sin2phi))))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) #s(hole binary32 (* -1 (/ (+ (* -1 (pow alphay 2)) (* -1/2 (* (pow alphay 2) u0))) sin2phi))))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
Outputs
(/.f32 (neg.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0))) (neg.f32 #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay)))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
#s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0))
(*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)
(/.f32 (-.f32 (*.f32 (*.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0) (*.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0)) #s(literal 1 binary32)) (-.f32 (*.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0) #s(literal 1 binary32)))
(/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (*.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0) (*.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0) #s(literal 1 binary32)))))
(fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32))
(+.f32 (*.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0) #s(literal 1 binary32))
(/.f32 (-.f32 (*.f32 (*.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0) (*.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0)) #s(literal 1/4 binary32)) (-.f32 (*.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0) #s(literal 1/2 binary32)))
(/.f32 (+.f32 (pow.f32 (*.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0) #s(literal 3 binary32)) #s(literal 1/8 binary32)) (fma.f32 (*.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0) (*.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0) (-.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0) #s(literal 1/2 binary32)))))
(fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32))
(+.f32 (*.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0) #s(literal 1/2 binary32))
(/.f32 (-.f32 (*.f32 (*.f32 #s(literal 1/4 binary32) u0) (*.f32 #s(literal 1/4 binary32) u0)) #s(literal 1/9 binary32)) (-.f32 (*.f32 #s(literal 1/4 binary32) u0) #s(literal 1/3 binary32)))
(/.f32 (+.f32 (pow.f32 (*.f32 #s(literal 1/4 binary32) u0) #s(literal 3 binary32)) #s(literal 1/27 binary32)) (fma.f32 (*.f32 #s(literal 1/4 binary32) u0) (*.f32 #s(literal 1/4 binary32) u0) (-.f32 #s(literal 1/9 binary32) (*.f32 (*.f32 #s(literal 1/4 binary32) u0) #s(literal 1/3 binary32)))))
(fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32))
(+.f32 (*.f32 #s(literal 1/4 binary32) u0) #s(literal 1/3 binary32))
#s(literal 1/4 binary32)
u0
#s(literal 1/3 binary32)
#s(literal 1/2 binary32)
#s(literal 1 binary32)
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay)))
(/.f32 (neg.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax)))) (neg.f32 (*.f32 alphay alphay)))
(/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))
(+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax)) (*.f32 alphay alphay)))
(/.f32 (-.f32 (*.f32 sin2phi sin2phi) (*.f32 (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax)) (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax)))) (-.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))))
(/.f32 (fma.f32 (*.f32 sin2phi sin2phi) sin2phi (pow.f32 (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax)) #s(literal 3 binary32))) (fma.f32 sin2phi sin2phi (-.f32 (*.f32 (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax)) (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))))))
(+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax)))
sin2phi
(*.f32 (/.f32 (*.f32 alphay alphay) alphax) (/.f32 cos2phi alphax))
(/.f32 (neg.f32 (*.f32 (*.f32 alphay alphay) cos2phi)) (neg.f32 (*.f32 alphax alphax)))
(/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))
(*.f32 (*.f32 alphay alphay) cos2phi)
(*.f32 (pow.f32 alphay #s(literal 1 binary32)) (pow.f32 alphay #s(literal 1 binary32)))
(*.f32 (fabs.f32 alphay) (fabs.f32 alphay))
(*.f32 (neg.f32 alphay) (neg.f32 alphay))
(*.f32 alphay alphay)
(pow.f32 alphay #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32)))
alphay
cos2phi
(*.f32 (pow.f32 alphax #s(literal 1 binary32)) (pow.f32 alphax #s(literal 1 binary32)))
(*.f32 (fabs.f32 alphax) (fabs.f32 alphax))
(*.f32 (neg.f32 alphax) (neg.f32 alphax))
(*.f32 alphax alphax)
(pow.f32 alphax #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 alphax) #s(literal 2 binary32)))
alphax
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
(*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0)
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi)))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))
(/.f32 (neg.f32 (*.f32 alphay alphay)) (neg.f32 sin2phi))
(/.f32 (*.f32 alphay alphay) sin2phi)
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0))
(*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0)
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))
(/.f32 (-.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi))) (*.f32 (/.f32 (*.f32 alphay alphay) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi))) (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)) (/.f32 (*.f32 alphay alphay) sin2phi)))
(/.f32 (+.f32 (pow.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)) #s(literal 3 binary32)) (pow.f32 (/.f32 (*.f32 alphay alphay) sin2phi) #s(literal 3 binary32))) (fma.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)) (-.f32 (*.f32 (/.f32 (*.f32 alphay alphay) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)) (*.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)) (/.f32 (*.f32 alphay alphay) sin2phi)))))
(fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi))
(+.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)) (/.f32 (*.f32 alphay alphay) sin2phi))
(/.f32 (neg.f32 (*.f32 (*.f32 alphay alphay) u0)) (neg.f32 sin2phi))
(/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)
(*.f32 (*.f32 alphay alphay) u0)
(/.f32 (neg.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))))) (neg.f32 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))))
#s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))
(*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))
(*.f32 (pow.f32 u0 #s(literal 1 binary32)) (pow.f32 u0 #s(literal 1 binary32)))
(*.f32 (fabs.f32 u0) (fabs.f32 u0))
(*.f32 (neg.f32 u0) (neg.f32 u0))
(*.f32 u0 u0)
(pow.f32 u0 #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 u0) #s(literal 2 binary32)))
(/.f32 (-.f32 #s(literal 1/4 binary32) (*.f32 (/.f32 #s(literal 1 binary32) u0) (/.f32 #s(literal 1 binary32) u0))) (-.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))
(/.f32 (+.f32 #s(literal 1/8 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 3 binary32))) (+.f32 #s(literal 1/4 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1 binary32) u0) (/.f32 #s(literal 1 binary32) u0)) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))))
(+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))
(/.f32 #s(literal -1 binary32) (neg.f32 u0))
(/.f32 #s(literal 1 binary32) u0)
(pow.f32 u0 #s(literal -1 binary32))
(/.f32 (-.f32 (*.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 cos2phi (*.f32 alphax alphax))) (*.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 sin2phi (*.f32 alphay alphay)))) (-.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (+.f32 (pow.f32 (/.f32 cos2phi (*.f32 alphax alphax)) #s(literal 3 binary32)) (pow.f32 (/.f32 sin2phi (*.f32 alphay alphay)) #s(literal 3 binary32))) (fma.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 cos2phi (*.f32 alphax alphax)) (-.f32 (*.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 sin2phi (*.f32 alphay alphay))) (*.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
(/.f32 (fma.f32 cos2phi (*.f32 alphay alphay) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)))
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
(/.f32 (neg.f32 cos2phi) (neg.f32 (*.f32 alphax alphax)))
(/.f32 cos2phi (*.f32 alphax alphax))
(/.f32 (neg.f32 sin2phi) (neg.f32 (*.f32 alphay alphay)))
(/.f32 sin2phi (*.f32 alphay alphay))
(/.f32 (neg.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0))) (neg.f32 #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))
(*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
(/.f32 (-.f32 (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))) (*.f32 (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
(/.f32 (+.f32 (pow.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) #s(literal 3 binary32)) (pow.f32 (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)) #s(literal 3 binary32))) (fma.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (-.f32 (*.f32 (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (*.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 (fma.f32 #s(literal 1 binary32) (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) cos2phi)))
(+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))
(/.f32 #s(literal -1 binary32) (neg.f32 (*.f32 alphax alphax)))
(/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))
(pow.f32 (*.f32 alphax alphax) #s(literal -1 binary32))
(pow.f32 alphax #s(literal -2 binary32))
(/.f32 (neg.f32 sin2phi) (neg.f32 (*.f32 (*.f32 alphay alphay) cos2phi)))
(/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi) (*.f32 (*.f32 alphax alphax) (fma.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi))))) (/.f32 (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax)))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) (/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax)))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax)))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (/.f32 (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 alphax alphax)))
#s(approx (/ (* (* alphay alphay) cos2phi) (* alphax alphax)) (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax)))
#s(approx (* alphax alphax) (*.f32 alphax alphax))
#s(approx alphax alphax)
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphax alphax) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi)) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (*.f32 (*.f32 alphax alphax) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) u0) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 #s(literal 1 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi)) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) u0) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 #s(literal 1 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))) (*.f32 (*.f32 alphax alphax) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi))))))))) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi))))))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (fma.f32 (*.f32 alphax alphax) (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (fma.f32 (*.f32 alphax alphax) (-.f32 (fma.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) u0) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 #s(literal 1 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (fma.f32 (*.f32 alphax alphax) (-.f32 (fma.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 sin2phi u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))) (*.f32 (*.f32 alphax alphax) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) u0) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 (*.f32 alphax alphax) (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi))))))))) (/.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 sin2phi sin2phi) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (/.f32 #s(literal 1 binary32) cos2phi)))))
#s(approx (/ cos2phi (* alphax alphax)) (/.f32 cos2phi (*.f32 alphax alphax)))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (/.f32 cos2phi (*.f32 alphax alphax)))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax)))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 (+.f32 #s(literal 1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi))) (*.f32 alphax alphax)))
#s(approx (/ 1 (* alphax alphax)) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (+.f32 (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) sin2phi)
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 sin2phi sin2phi)))) (*.f32 alphax alphax))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 sin2phi sin2phi)))) (*.f32 alphax alphax)) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) (*.f32 #s(literal 1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 sin2phi sin2phi)))) (*.f32 alphax alphax)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi))))) (pow.f32 alphax #s(literal 6 binary32))) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) (*.f32 #s(literal 1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))))) (*.f32 alphax alphax)) (/.f32 (*.f32 alphay alphay) sin2phi))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))))) (*.f32 alphax alphax)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (/.f32 (*.f32 alphay alphay) sin2phi)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 sin2phi sin2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi u0)) (*.f32 sin2phi sin2phi))))))) (*.f32 alphax alphax)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi)))))))) (pow.f32 alphax #s(literal 6 binary32))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (/.f32 (*.f32 alphay alphay) sin2phi))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (+.f32 (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi))))))))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1 binary32) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi) (*.f32 (*.f32 alphay alphay) (fma.f32 (*.f32 alphay alphay) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi))))) (/.f32 (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay)))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay)))
#s(approx (* (* alphay alphay) cos2phi) (*.f32 (*.f32 alphay alphay) cos2phi))
#s(approx (* alphay alphay) (*.f32 alphay alphay))
#s(approx alphay alphay)
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphay alphay) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (*.f32 (*.f32 alphay alphay) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) u0) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 #s(literal 1 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) u0) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 #s(literal 1 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (*.f32 (*.f32 alphay alphay) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi))))))))) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi))))))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (fma.f32 (*.f32 alphay alphay) (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (fma.f32 (*.f32 alphay alphay) (-.f32 (fma.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) u0) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 #s(literal 1 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (fma.f32 (*.f32 alphay alphay) (-.f32 (fma.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 cos2phi u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))) (*.f32 (*.f32 alphay alphay) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) u0) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 (*.f32 alphay alphay) (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi))))))))) (/.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi))))))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 cos2phi cos2phi) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (/.f32 #s(literal 1 binary32) sin2phi)))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi))))
#s(approx (/ (* alphay alphay) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (*.f32 (*.f32 alphay alphay) (fma.f32 #s(literal 1/2 binary32) (/.f32 u0 sin2phi) (/.f32 #s(literal 1 binary32) sin2phi))))
#s(approx (/ (* (* alphay alphay) u0) sin2phi) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi))
#s(approx (* (* alphay alphay) u0) (*.f32 (*.f32 alphay alphay) u0))
#s(approx (/ sin2phi (* alphay alphay)) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay)))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 (+.f32 (/.f32 sin2phi cos2phi) (/.f32 (*.f32 alphay alphay) (*.f32 alphax alphax))) (*.f32 alphay alphay)))
#s(approx (/ sin2phi (* (* alphay alphay) cos2phi)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (+.f32 (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi))))))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (*.f32 (*.f32 alphay alphay) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 cos2phi cos2phi)))) (*.f32 alphay alphay))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 cos2phi cos2phi)))) (*.f32 alphay alphay)) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) (*.f32 #s(literal 1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 cos2phi cos2phi)))) (*.f32 alphay alphay)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi))))) (pow.f32 alphay #s(literal 6 binary32))) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) (*.f32 #s(literal 1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))))) (*.f32 alphay alphay)) (/.f32 (*.f32 alphax alphax) cos2phi))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))))) (*.f32 alphay alphay)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (/.f32 (*.f32 alphax alphax) cos2phi)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 cos2phi cos2phi)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi u0)) (*.f32 cos2phi cos2phi))))))) (*.f32 alphay alphay)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi)))))))) (pow.f32 alphay #s(literal 6 binary32))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (/.f32 (*.f32 alphax alphax) cos2phi))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (+.f32 (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/3 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (neg (log (- 1 u0))) u0)
#s(approx (neg (log (- 1 u0))) (*.f32 u0 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) u0))))
#s(approx (neg (log (- 1 u0))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (-.f32 #s(literal 1/2 binary32) (*.f32 #s(literal -1/3 binary32) u0))))))
#s(approx (neg (log (- 1 u0))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (-.f32 #s(literal 1/3 binary32) (*.f32 #s(literal -1/4 binary32) u0))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 u0 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) u0))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (-.f32 #s(literal 1/2 binary32) (*.f32 #s(literal -1/3 binary32) u0))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (-.f32 #s(literal 1/3 binary32) (*.f32 #s(literal -1/4 binary32) u0))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) #s(literal 1 binary32))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) u0)))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (+.f32 #s(literal 1 binary32) (*.f32 u0 (-.f32 #s(literal 1/2 binary32) (*.f32 #s(literal -1/3 binary32) u0)))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (-.f32 #s(literal 1/3 binary32) (*.f32 #s(literal -1/4 binary32) u0)))))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(literal 1/2 binary32))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (-.f32 #s(literal 1/2 binary32) (*.f32 #s(literal -1/3 binary32) u0)))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (-.f32 #s(literal 1/3 binary32) (*.f32 #s(literal -1/4 binary32) u0)))))
#s(approx (+ (* 1/4 u0) 1/3) #s(literal 1/3 binary32))
#s(approx (+ (* 1/4 u0) 1/3) (-.f32 #s(literal 1/3 binary32) (*.f32 #s(literal -1/4 binary32) u0)))
#s(approx u0 u0)
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/3 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 u0 (fma.f32 #s(literal 1/3 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 u0 (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi)))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/.f32 (*.f32 alphay alphay) sin2phi))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))
#s(approx (* (+ (* 1/2 u0) 1) u0) u0)
#s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 u0 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) u0))))
#s(approx (* (* u0 u0) (+ 1/2 (/ 1 u0))) u0)
#s(approx (* (* u0 u0) (+ 1/2 (/ 1 u0))) (*.f32 u0 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) u0))))
#s(approx (* u0 u0) (*.f32 u0 u0))
#s(approx (+ 1/2 (/ 1 u0)) (/.f32 #s(literal 1 binary32) u0))
#s(approx (+ 1/2 (/ 1 u0)) (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 #s(literal -1/2 binary32) u0)) u0))
#s(approx (/ 1 u0) (/.f32 #s(literal 1 binary32) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal 1 binary32) (neg.f32 (log.f32 u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal 1 binary32) (neg.f32 (log.f32 u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal 1 binary32) (neg.f32 (log.f32 u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal 1 binary32) (neg.f32 (log.f32 u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))))
#s(approx (neg (log (- 1 u0))) (*.f32 #s(literal -1 binary32) (-.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal 1 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (neg (log (- 1 u0))) (-.f32 (/.f32 #s(literal 1 binary32) u0) (-.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal 1 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (neg (log (- 1 u0))) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (/.f32 #s(literal 1 binary32) u0)) (-.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal 1 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (neg (log (- 1 u0))) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (-.f32 (/.f32 #s(literal 1 binary32) u0) (*.f32 #s(literal -1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0))))) (-.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal 1 binary32) (neg.f32 (log.f32 u0))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 u0 u0) (*.f32 u0 u0))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 (*.f32 (*.f32 u0 u0) (*.f32 u0 u0)) (-.f32 #s(literal 1/4 binary32) (*.f32 #s(literal -1/3 binary32) (/.f32 #s(literal 1 binary32) u0)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 (*.f32 (*.f32 u0 u0) (*.f32 u0 u0)) (+.f32 #s(literal 1/4 binary32) (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (*.f32 #s(literal -1/3 binary32) (/.f32 #s(literal 1 binary32) u0))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 (*.f32 (*.f32 u0 u0) (*.f32 u0 u0)) (+.f32 #s(literal 1/4 binary32) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0)))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (*.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 u0 u0) u0)))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (*.f32 (*.f32 (*.f32 u0 u0) u0) (-.f32 #s(literal 1/4 binary32) (*.f32 #s(literal -1/3 binary32) (/.f32 #s(literal 1 binary32) u0)))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 #s(literal 1/4 binary32) (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (*.f32 #s(literal -1/3 binary32) (/.f32 #s(literal 1 binary32) u0))))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 #s(literal 1/4 binary32) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0)))))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (*.f32 #s(literal 1/4 binary32) (*.f32 u0 u0)))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (*.f32 (*.f32 u0 u0) (-.f32 #s(literal 1/4 binary32) (*.f32 #s(literal -1/3 binary32) (/.f32 #s(literal 1 binary32) u0)))))
#s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/4 binary32) (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (*.f32 #s(literal -1/3 binary32) (/.f32 #s(literal 1 binary32) u0))))))
#s(approx (+ (* 1/4 u0) 1/3) (*.f32 #s(literal 1/4 binary32) u0))
#s(approx (+ (* 1/4 u0) 1/3) (*.f32 u0 (-.f32 #s(literal 1/4 binary32) (*.f32 #s(literal -1/3 binary32) (/.f32 #s(literal 1 binary32) u0)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 u0 u0) (*.f32 u0 u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 (*.f32 u0 u0) (*.f32 u0 u0)) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 (*.f32 u0 u0) (*.f32 u0 u0)) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal -1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 (*.f32 u0 u0) (*.f32 u0 u0)) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal -1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (-.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal -1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal -1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (*.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 (*.f32 u0 u0) u0)) sin2phi)))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0)) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi (*.f32 u0 u0))))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0)) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi (*.f32 u0 u0))) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi (*.f32 (*.f32 u0 u0) u0))))))))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0)))))
#s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)))
#s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))
#s(approx (* (* u0 u0) (+ 1/2 (/ 1 u0))) (*.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)))
#s(approx (* (* u0 u0) (+ 1/2 (/ 1 u0))) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))
#s(approx (+ 1/2 (/ 1 u0)) #s(literal 1/2 binary32))
#s(approx (+ 1/2 (/ 1 u0)) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) u0)) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0) (/.f32 (log.f32 (/.f32 #s(literal -1 binary32) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))
#s(approx (neg (log (- 1 u0))) (log.f32 (/.f32 #s(literal -1 binary32) u0)))
#s(approx (neg (log (- 1 u0))) (-.f32 (/.f32 #s(literal 1 binary32) u0) (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (neg (log (- 1 u0))) (-.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (/.f32 #s(literal 1 binary32) u0)) (*.f32 #s(literal -1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (neg (log (- 1 u0))) (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 #s(literal 1/2 binary32) (*.f32 #s(literal -1/3 binary32) (/.f32 #s(literal 1 binary32) u0))) u0)) #s(literal 1 binary32)) u0) (*.f32 #s(literal 1 binary32) (log.f32 (/.f32 #s(literal -1 binary32) u0)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 (*.f32 (*.f32 u0 u0) (*.f32 u0 u0)) (-.f32 #s(literal 1/4 binary32) (*.f32 #s(literal 1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)) u0)) #s(literal 1/3 binary32)) u0)))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 #s(literal 1/3 binary32) (*.f32 #s(literal -1/2 binary32) (/.f32 #s(literal 1 binary32) u0))) u0)) #s(literal 1/4 binary32)))))
#s(approx (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/3 binary32) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0) (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)))) u0)) #s(literal 1/4 binary32)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 (*.f32 u0 u0) (*.f32 u0 u0)) (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal -1/2 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) u0) (*.f32 #s(literal -1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) u0) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))) u0) (*.f32 #s(literal -1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal -1 binary32) (/.f32 (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal -1/3 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))))) u0) (*.f32 #s(literal -1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0)))) u0) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0)) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))) u0) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))) u0) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (*.f32 #s(literal -1 binary32) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0)) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi) (*.f32 cos2phi (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi) (*.f32 cos2phi (fma.f32 cos2phi (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi))))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))
#s(approx cos2phi cos2phi)
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 cos2phi (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 cos2phi (fma.f32 cos2phi (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) u0) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 #s(literal 1 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 cos2phi (fma.f32 cos2phi (fma.f32 cos2phi (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi))))))))) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi)))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) u0) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 #s(literal 1 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 cos2phi (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))))))) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 cos2phi (-.f32 (fma.f32 cos2phi (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) u0) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))) (*.f32 #s(literal 1 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))))) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 cos2phi (-.f32 (fma.f32 cos2phi (-.f32 (fma.f32 cos2phi (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) u0) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi))))))))) (/.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (*.f32 sin2phi sin2phi))))) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) u0) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi))))) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) u0) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi))))))))) (/.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 sin2phi sin2phi)))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphay alphay) sin2phi))))) (/.f32 (*.f32 alphay alphay) sin2phi))))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))) cos2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) cos2phi))) cos2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) cos2phi)))) cos2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi cos2phi))) (+.f32 (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) cos2phi))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (*.f32 cos2phi (+.f32 (/.f32 sin2phi cos2phi) (/.f32 (*.f32 alphay alphay) (*.f32 alphax alphax)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax))) cos2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)))) cos2phi)) cos2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)))) cos2phi) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))))))) (*.f32 #s(literal 1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)))))) (*.f32 cos2phi cos2phi)))) cos2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)))) cos2phi) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 alphay #s(literal 6 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))))) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))))))) (*.f32 #s(literal 1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)))))) (*.f32 cos2phi cos2phi))))) cos2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) cos2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) cos2phi) (*.f32 alphax alphax))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi))) cos2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) cos2phi) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)))))))) (*.f32 cos2phi cos2phi)) (*.f32 alphax alphax)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi cos2phi))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)))) cos2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) cos2phi) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 alphay #s(literal 6 binary32)))))))) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)))))))) (*.f32 cos2phi cos2phi)) (*.f32 alphax alphax))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi cos2phi))) (+.f32 (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) cos2phi))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi)) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 alphay alphay))) cos2phi) (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) cos2phi)) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)))) cos2phi) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 alphay alphay))) cos2phi) (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) cos2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 #s(literal -1 binary32) (*.f32 cos2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) (*.f32 #s(literal -1 binary32) (*.f32 cos2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (*.f32 #s(literal -1 binary32) (*.f32 cos2phi (fma.f32 #s(literal -1 binary32) (/.f32 sin2phi cos2phi) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphay alphay) (*.f32 alphax alphax)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0)))))))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)))) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0))))))))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))))) cos2phi) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0))))))))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 alphay #s(literal 6 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))))) cos2phi) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)))))) cos2phi) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0))))))))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0))))))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi u0)) (*.f32 alphay alphay))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))) cos2phi) (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0)))))))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)))) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi u0)) (*.f32 alphay alphay)))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))) cos2phi) (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0)))))))) cos2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 sin2phi sin2phi) sin2phi) u0)) (pow.f32 alphay #s(literal 6 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (pow.f32 alphay #s(literal 6 binary32)))) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) u0)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay))))))))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi sin2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)))) cos2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi u0)) (*.f32 alphay alphay)))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))) cos2phi) (fma.f32 #s(literal -1 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphax alphax) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphax alphax) u0)))))))) cos2phi)))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (*.f32 #s(literal -1 binary32) (*.f32 cos2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi) (*.f32 sin2phi (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi) (*.f32 sin2phi (fma.f32 sin2phi (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 sin2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi))))) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))
#s(approx sin2phi sin2phi)
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 sin2phi (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 sin2phi (fma.f32 sin2phi (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) u0) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 #s(literal 1 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)))))) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (fma.f32 sin2phi (fma.f32 sin2phi (fma.f32 sin2phi (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi))))))))) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi)))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) u0) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 #s(literal 1 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi)))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 sin2phi (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))))))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 sin2phi (-.f32 (fma.f32 sin2phi (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) u0) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))) (*.f32 #s(literal 1 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi))))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (fma.f32 sin2phi (-.f32 (fma.f32 sin2phi (-.f32 (fma.f32 sin2phi (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi)))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi)))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 8 binary32)) u0) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi))))))))) (/.f32 (pow.f32 alphax #s(literal 8 binary32)) (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (*.f32 cos2phi cos2phi))))) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphax #s(literal 6 binary32)) u0) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))))))) (*.f32 #s(literal -1 binary32) (/.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi))))) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) u0) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))))))))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi)))) (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphax alphax) cos2phi) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))) (/.f32 (*.f32 alphax alphax) cos2phi))))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (-.f32 #s(literal 1/3 binary32) (*.f32 #s(literal -1/4 binary32) u0))))))) sin2phi))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 alphay alphay)) sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) sin2phi))) sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) sin2phi)))) sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi sin2phi))) (+.f32 (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) sin2phi))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (*.f32 sin2phi (+.f32 #s(literal 1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay))) sin2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay)) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)))) sin2phi)) sin2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)))) sin2phi) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))))))) (*.f32 #s(literal 1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)))))) (*.f32 sin2phi sin2phi)))) sin2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay)) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)))) sin2phi) (+.f32 (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 alphax #s(literal 6 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))))) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))))))) (*.f32 #s(literal 1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)))))) (*.f32 sin2phi sin2phi))))) sin2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay)) sin2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) sin2phi) (*.f32 alphay alphay))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi))) sin2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) sin2phi) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)))))))) (*.f32 sin2phi sin2phi)) (*.f32 alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi sin2phi))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)))) sin2phi))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (-.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) sin2phi) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 alphax #s(literal 6 binary32)))))))) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)) (+.f32 (/.f32 (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)))))))) (*.f32 sin2phi sin2phi)) (*.f32 alphay alphay))))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) (*.f32 sin2phi sin2phi))) (+.f32 (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) (*.f32 (*.f32 sin2phi sin2phi) sin2phi)))))) sin2phi))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)))))
#s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alphay alphay) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)) sin2phi)) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 alphax alphax))) sin2phi) (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (pow.f32 alphax #s(literal 6 binary32)) sin2phi)) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)))) sin2phi) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (*.f32 alphax alphax))) sin2phi) (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0)))) sin2phi)))
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 #s(literal -1 binary32) (*.f32 sin2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay))))))
#s(approx (/ (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (* alphay alphay)) (*.f32 #s(literal -1 binary32) (*.f32 sin2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay))))))
#s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) (*.f32 #s(literal -1 binary32) (*.f32 sin2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi))) #s(literal 1 binary32)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0)))))))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)))) sin2phi) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0))))))))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))))) sin2phi) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))) sin2phi) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0))))))))) sin2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 alphax #s(literal 6 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))))) sin2phi) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)))))) sin2phi) (*.f32 u0 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))) sin2phi) (*.f32 u0 (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0))))))))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0))))))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi u0)) (*.f32 alphax alphax))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))) sin2phi) (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0)))))))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)))) sin2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi u0)) (*.f32 alphax alphax)))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))) sin2phi) (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0)))))))) sin2phi)))
#s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 (*.f32 cos2phi cos2phi) cos2phi) u0)) (pow.f32 alphax #s(literal 6 binary32)))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 8 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (pow.f32 alphax #s(literal 6 binary32)))) sin2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 (*.f32 cos2phi cos2phi) u0)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax))))))))) (/.f32 (*.f32 (pow.f32 alphay #s(literal 6 binary32)) (*.f32 cos2phi cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphax alphax)))) sin2phi) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)) (*.f32 #s(literal -1/4 binary32) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) (*.f32 cos2phi u0)) (*.f32 alphax alphax)))))))) (/.f32 (*.f32 (*.f32 (*.f32 alphay alphay) (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))) sin2phi) (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal -1/3 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/4 binary32) (*.f32 (*.f32 alphay alphay) u0)))))))) sin2phi)))
#s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32))) sin2phi)))
#s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (*.f32 alphay alphay) (*.f32 #s(literal -1/2 binary32) (*.f32 (*.f32 alphay alphay) u0))) sin2phi)))
#s(approx (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (*.f32 #s(literal -1 binary32) (*.f32 sin2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay))))))

eval49.0ms (0.9%)

Memory
-7.0MiB live, 84.2MiB allocated; 7ms collecting garbage
Compiler

Compiled 14 145 to 2 658 computations (81.2% saved)

prune80.0ms (1.4%)

Memory
33.0MiB live, 130.4MiB allocated; 8ms collecting garbage
Pruning

75 alts after pruning (63 fresh and 12 done)

PrunedKeptTotal
New40417421
Fresh124658
Picked145
Done088
Total41775492
Accuracy
99.9%
Counts
492 → 75
Alt Table
Click to see full alt table
StatusAccuracyProgram
61.1%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0))) (log.f32 (+.f32 #s(literal 1 binary32) (fma.f32 u0 u0 (*.f32 #s(literal 1 binary32) u0)))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
88.6%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log1p.f32 u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
67.0%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log1p.f32 u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
60.7%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
48.9%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))))
50.6%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
49.6%
(/.f32 (neg.f32 (-.f32 (log.f32 #s(approx (- 1 (* u0 u0)) (*.f32 (*.f32 u0 u0) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)) #s(literal 1 binary32))))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
49.0%
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 #s(literal -1/3 binary32) (*.f32 u0 u0)) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
46.6%
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
61.0%
(/.f32 (neg.f32 (log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)) (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
63.7%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
38.1%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (+.f32 (cosh.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))) (sinh.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32)))))))
63.7%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
63.6%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))))
63.7%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
63.7%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
50.8%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) sin2phi) (*.f32 alphay alphay))))
20.6%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
63.0%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 (+.f32 (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay))) sin2phi)))
61.2%
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
68.7%
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0)))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
75.3%
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
57.4%
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
93.7%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
70.1%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) sin2phi) (*.f32 alphay alphay))))
27.7%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
77.4%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
53.8%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
27.8%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))))))
71.1%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alphay alphay) cos2phi))))))))
91.7%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(approx (+ (* 1/4 u0) 1/3) #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
91.7%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(approx (+ (* 1/4 u0) 1/3) #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
73.0%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
87.5%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (/.f32 (fma.f32 cos2phi (*.f32 alphay alphay) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
87.5%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
87.4%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
65.5%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
26.9%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
93.3%
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 #s(literal 1/4 binary32) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)) u0)) #s(literal 1/3 binary32)) u0)))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
93.1%
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 (*.f32 (*.f32 u0 u0) (*.f32 u0 u0)) (-.f32 #s(literal 1/4 binary32) (*.f32 #s(literal 1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)) u0)) #s(literal 1/3 binary32)) u0)))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
75.3%
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
63.9%
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
87.3%
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (/.f32 (-.f32 #s(literal 1/4 binary32) (*.f32 (/.f32 #s(literal 1 binary32) u0) (/.f32 #s(literal 1 binary32) u0))) (-.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
87.1%
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (/.f32 (+.f32 #s(literal 1/8 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 3 binary32))) (+.f32 #s(literal 1/4 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1 binary32) u0) (/.f32 #s(literal 1 binary32) u0)) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
87.3%
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))) (/.f32 (fma.f32 cos2phi (*.f32 alphay alphay) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
87.3%
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
75.2%
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) #s(approx (+ 1/2 (/ 1 u0)) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
49.0%
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi))
20.7%
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi))
92.7%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 #s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)))))) (/.f32 #s(literal 1/3 binary32) #s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))) u0 (/.f32 #s(literal 1/2 binary32) #s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))) u0 (/.f32 #s(literal 1 binary32) #s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))) u0))
27.8%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) cos2phi)) u0))
75.3%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))
70.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
66.0%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 #s(literal 1/2 binary32) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
57.8%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
27.7%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi)))) u0))
66.0%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0))
70.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (-.f32 #s(literal 1/3 binary32) (*.f32 #s(literal -1/4 binary32) u0))))))) sin2phi))) u0))
57.8%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
57.4%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))) sin2phi))) u0))
66.1%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 alphay alphay)) sin2phi)))) u0))
66.0%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0))))))) u0))
51.3%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
51.3%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
20.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
20.8%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi))))
27.8%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
27.5%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
27.0%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)))) cos2phi))))
24.5%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0)) cos2phi))))
20.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 #s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi))))
70.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay))) sin2phi)))
70.6%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphay alphay) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi))))))
24.5%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
26.9%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 u0 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))))
Compiler

Compiled 4 429 to 2 962 computations (33.1% saved)

regimes380.0ms (6.8%)

Memory
-33.6MiB live, 535.3MiB allocated; 43ms collecting garbage
Counts
106 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) #s(literal 1 binary32))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 #s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) sin2phi) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 alphay alphay)) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 #s(literal 1/2 binary32) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0)))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))) sin2phi))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0))))))) u0))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 u0 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))))
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (-.f32 #s(literal 1/3 binary32) (*.f32 #s(literal -1/4 binary32) u0))))))) sin2phi))) u0))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) #s(approx (+ 1/2 (/ 1 u0)) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))))) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0))))))) sin2phi))) u0))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))))))
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 #s(approx (+ (* 1/2 u0) 1) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(literal 1/3 binary32) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(approx (+ (* 1/4 u0) 1/3) #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 (+.f32 (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay))) sin2phi)))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log1p.f32 u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 #s(approx (- 1 u0) (*.f32 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32)) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)) (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (/.f32 (fma.f32 cos2phi (*.f32 alphay alphay) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(approx (+ (* 1/4 u0) 1/3) #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))) (/.f32 (fma.f32 cos2phi (*.f32 alphay alphay) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) cos2phi)) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay)) sin2phi)) u0))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (-.f32 (log.f32 #s(approx (- 1 (* u0 u0)) (*.f32 (*.f32 u0 u0) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)) #s(literal 1 binary32))))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log1p.f32 u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphay alphay) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 #s(literal -1/3 binary32) (*.f32 u0 u0)) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (/.f32 (-.f32 #s(literal 1/4 binary32) (*.f32 (/.f32 #s(literal 1 binary32) u0) (/.f32 #s(literal 1 binary32) u0))) (-.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 (neg.f32 (log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0)) (+.f32 #s(literal 1 binary32) (fma.f32 u0 u0 (*.f32 #s(literal 1 binary32) u0)))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alphay alphay) cos2phi))))))))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))))
(/.f32 (neg.f32 (-.f32 (log.f32 #s(approx (- 1 (* u0 u0)) (*.f32 (*.f32 u0 u0) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)) #s(literal 1 binary32))))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0))) (log.f32 (+.f32 #s(literal 1 binary32) (fma.f32 u0 u0 (*.f32 #s(literal 1 binary32) u0)))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 (*.f32 (*.f32 u0 u0) (*.f32 u0 u0)) (-.f32 #s(literal 1/4 binary32) (*.f32 #s(literal 1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)) u0)) #s(literal 1/3 binary32)) u0)))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 #s(literal 1/4 binary32) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)) u0)) #s(literal 1/3 binary32)) u0)))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (/.f32 (+.f32 (pow.f32 (*.f32 #s(literal 1/2 binary32) u0) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (*.f32 #s(literal 1/2 binary32) u0) (*.f32 #s(literal 1/2 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 1/2 binary32) u0) #s(literal 1 binary32))))) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 #s(literal 1/4 binary32) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0)))))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (+.f32 (cosh.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))) (sinh.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 #s(literal 1/3 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 #s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (/.f32 (+.f32 #s(literal 1/8 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 3 binary32))) (+.f32 #s(literal 1/4 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1 binary32) u0) (/.f32 #s(literal 1 binary32) u0)) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 #s(approx (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (*.f32 (*.f32 alphax alphax) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 (*.f32 alphay alphay) (*.f32 cos2phi cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi))))) u0))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (/.f32 (+.f32 (pow.f32 (/.f32 cos2phi (*.f32 alphax alphax)) #s(literal 3 binary32)) (pow.f32 (/.f32 sin2phi (*.f32 alphay alphay)) #s(literal 3 binary32))) (fma.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 cos2phi (*.f32 alphax alphax)) (-.f32 (*.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 sin2phi (*.f32 alphay alphay))) (*.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 #s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)))))) (/.f32 #s(literal 1/3 binary32) #s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))) u0 (/.f32 #s(literal 1/2 binary32) #s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))) u0 (/.f32 #s(literal 1 binary32) #s(approx (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 (/.f32 #s(literal 1/3 binary32) (*.f32 u0 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) (*.f32 #s(literal 1/4 binary32) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))))))))
Outputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
Calls

14 calls:

28.0ms
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
28.0ms
alphay
27.0ms
cos2phi
27.0ms
u0
27.0ms
(*.f32 alphax alphax)
Results
AccuracySegmentsBranch
93.7%1(*.f32 alphay alphay)
93.7%1(/.f32 sin2phi (*.f32 alphay alphay))
93.7%1(*.f32 alphax alphax)
93.7%1(/.f32 cos2phi (*.f32 alphax alphax))
93.7%1(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
97.9%2(-.f32 #s(literal 1 binary32) u0)
97.9%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
97.9%2(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
93.7%1(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
93.7%1alphax
93.7%1alphay
97.9%2u0
93.7%1cos2phi
93.7%1sin2phi
Compiler

Compiled 53 to 100 computations (-88.7% saved)

regimes102.0ms (1.8%)

Memory
6.3MiB live, 146.3MiB allocated; 6ms collecting garbage
Counts
101 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) #s(literal 1 binary32))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 #s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) sin2phi) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 alphay alphay)) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 #s(literal 1/2 binary32) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0)))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))) sin2phi))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0))))))) u0))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 u0 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))))
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (-.f32 #s(literal 1/3 binary32) (*.f32 #s(literal -1/4 binary32) u0))))))) sin2phi))) u0))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) #s(approx (+ 1/2 (/ 1 u0)) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))))) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0))))))) sin2phi))) u0))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))))))
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 #s(approx (+ (* 1/2 u0) 1) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(literal 1/3 binary32) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(approx (+ (* 1/4 u0) 1/3) #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 (+.f32 (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay))) sin2phi)))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log1p.f32 u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 #s(approx (- 1 u0) (*.f32 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32)) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)) (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (/.f32 (fma.f32 cos2phi (*.f32 alphay alphay) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(approx (+ (* 1/4 u0) 1/3) #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))) (/.f32 (fma.f32 cos2phi (*.f32 alphay alphay) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) cos2phi)) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay)) sin2phi)) u0))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (-.f32 (log.f32 #s(approx (- 1 (* u0 u0)) (*.f32 (*.f32 u0 u0) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)) #s(literal 1 binary32))))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log1p.f32 u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (*.f32 (*.f32 alphay alphay) (*.f32 u0 (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphax alphax) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 cos2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi))) (/.f32 #s(literal 1 binary32) cos2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi) (*.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 (*.f32 u0 u0) (-.f32 (*.f32 #s(literal -1/3 binary32) (*.f32 u0 u0)) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 #s(literal 1/2 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (/.f32 (-.f32 #s(literal 1/4 binary32) (*.f32 (/.f32 #s(literal 1 binary32) u0) (/.f32 #s(literal 1 binary32) u0))) (-.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 (neg.f32 (log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0)) (+.f32 #s(literal 1 binary32) (fma.f32 u0 u0 (*.f32 #s(literal 1 binary32) u0)))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 alphay alphay) cos2phi))))))))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))))
(/.f32 (neg.f32 (-.f32 (log.f32 #s(approx (- 1 (* u0 u0)) (*.f32 (*.f32 u0 u0) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)) #s(literal 1 binary32))))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0))) (log.f32 (+.f32 #s(literal 1 binary32) (fma.f32 u0 u0 (*.f32 #s(literal 1 binary32) u0)))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 (*.f32 (*.f32 u0 u0) (*.f32 u0 u0)) (-.f32 #s(literal 1/4 binary32) (*.f32 #s(literal 1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)) u0)) #s(literal 1/3 binary32)) u0)))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 #s(literal 1/4 binary32) (*.f32 #s(literal -1 binary32) (/.f32 (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)) u0)) #s(literal 1/3 binary32)) u0)))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (/.f32 (+.f32 (pow.f32 (*.f32 #s(literal 1/2 binary32) u0) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (*.f32 #s(literal 1/2 binary32) u0) (*.f32 #s(literal 1/2 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 (*.f32 #s(literal 1/2 binary32) u0) #s(literal 1 binary32))))) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) (*.f32 (pow.f32 u0 #s(literal 4 binary32)) (+.f32 #s(literal 1/4 binary32) (+.f32 (/.f32 #s(literal 1/2 binary32) (*.f32 u0 u0)) (fma.f32 #s(literal 1/3 binary32) (/.f32 #s(literal 1 binary32) u0) (/.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 u0) u0)))))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (+.f32 (cosh.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))) (sinh.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32)))))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 #s(literal 1/3 binary32) (/.f32 u0 (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax)))) (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 #s(approx (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1/3 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0 (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (/.f32 (+.f32 #s(literal 1/8 binary32) (pow.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 3 binary32))) (+.f32 #s(literal 1/4 binary32) (-.f32 (*.f32 (/.f32 #s(literal 1 binary32) u0) (/.f32 #s(literal 1 binary32) u0)) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
Outputs
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log1p.f32 u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
Calls

4 calls:

25.0ms
(log.f32 (-.f32 #s(literal 1 binary32) u0))
25.0ms
(-.f32 #s(literal 1 binary32) u0)
24.0ms
u0
22.0ms
(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
Results
AccuracySegmentsBranch
97.9%2(-.f32 #s(literal 1 binary32) u0)
97.9%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
97.9%2(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
97.9%2u0
Compiler

Compiled 13 to 29 computations (-123.1% saved)

regimes78.0ms (1.4%)

Memory
22.1MiB live, 118.3MiB allocated; 5ms collecting garbage
Counts
77 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) #s(literal 1 binary32))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 #s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) sin2phi) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 alphay alphay)) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 #s(literal 1/2 binary32) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0)))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))) sin2phi))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0))))))) u0))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 u0 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))))
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (-.f32 #s(literal 1/3 binary32) (*.f32 #s(literal -1/4 binary32) u0))))))) sin2phi))) u0))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) #s(approx (+ 1/2 (/ 1 u0)) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))))) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0))))))) sin2phi))) u0))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))))))
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 #s(approx (+ (* 1/2 u0) 1) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(literal 1/3 binary32) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(approx (+ (* 1/4 u0) 1/3) #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 (+.f32 (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay))) sin2phi)))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log1p.f32 u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 #s(approx (- 1 u0) (*.f32 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32)) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)) (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (/.f32 (fma.f32 cos2phi (*.f32 alphay alphay) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(approx (+ (* 1/4 u0) 1/3) #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))) (/.f32 (fma.f32 cos2phi (*.f32 alphay alphay) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) cos2phi)) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay)) sin2phi)) u0))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (-.f32 (log.f32 #s(approx (- 1 (* u0 u0)) (*.f32 (*.f32 u0 u0) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)) #s(literal 1 binary32))))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))))))
Outputs
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
Calls

4 calls:

20.0ms
(-.f32 #s(literal 1 binary32) u0)
19.0ms
u0
18.0ms
(log.f32 (-.f32 #s(literal 1 binary32) u0))
18.0ms
(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
Results
AccuracySegmentsBranch
97.9%2(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
97.9%2u0
97.9%2(-.f32 #s(literal 1 binary32) u0)
97.9%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
Compiler

Compiled 13 to 29 computations (-123.1% saved)

regimes79.0ms (1.4%)

Memory
-26.2MiB live, 117.2MiB allocated; 9ms collecting garbage
Counts
75 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) #s(literal 1 binary32))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 #s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) sin2phi) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 alphay alphay)) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 #s(literal 1/2 binary32) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0)))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))) sin2phi))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0))))))) u0))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 u0 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))))
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (-.f32 #s(literal 1/3 binary32) (*.f32 #s(literal -1/4 binary32) u0))))))) sin2phi))) u0))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) #s(approx (+ 1/2 (/ 1 u0)) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))))) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0))))))) sin2phi))) u0))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))))))
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 #s(approx (+ (* 1/2 u0) 1) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(literal 1/3 binary32) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(approx (+ (* 1/4 u0) 1/3) #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 (+.f32 (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay))) sin2phi)))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log1p.f32 u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 #s(approx (- 1 u0) (*.f32 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32)) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (/.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0)) (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (/.f32 (fma.f32 cos2phi (*.f32 alphay alphay) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(approx (+ (* 1/4 u0) 1/3) #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))) (/.f32 (fma.f32 cos2phi (*.f32 alphay alphay) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/.f32 (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphax alphax) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphax alphax) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphax alphax))))) (*.f32 alphax alphax)) cos2phi)) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (*.f32 alphay alphay) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))))) (*.f32 alphay alphay)) sin2phi)) u0))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (-.f32 (log.f32 #s(approx (- 1 (* u0 u0)) (*.f32 (*.f32 u0 u0) (-.f32 (/.f32 #s(literal 1 binary32) (*.f32 u0 u0)) #s(literal 1 binary32))))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
Outputs
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
Calls

4 calls:

20.0ms
u0
19.0ms
(log.f32 (-.f32 #s(literal 1 binary32) u0))
18.0ms
(-.f32 #s(literal 1 binary32) u0)
16.0ms
(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
Results
AccuracySegmentsBranch
97.9%2(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
97.9%2u0
97.9%2(-.f32 #s(literal 1 binary32) u0)
97.9%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
Compiler

Compiled 13 to 29 computations (-123.1% saved)

regimes66.0ms (1.2%)

Memory
7.4MiB live, 100.9MiB allocated; 4ms collecting garbage
Counts
64 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) #s(literal 1 binary32))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 #s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) sin2phi) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 alphay alphay)) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 #s(literal 1/2 binary32) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0)))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))) sin2phi))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0))))))) u0))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 u0 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))))
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (-.f32 #s(literal 1/3 binary32) (*.f32 #s(literal -1/4 binary32) u0))))))) sin2phi))) u0))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) #s(approx (+ 1/2 (/ 1 u0)) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))))) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0))))))) sin2phi))) u0))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))))))
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 #s(approx (+ (* 1/2 u0) 1) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(literal 1/3 binary32) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(approx (+ (* 1/4 u0) 1/3) #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(approx (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 (+.f32 (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay))) sin2phi)))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log1p.f32 u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 #s(approx (- 1 u0) (*.f32 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32)) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
Outputs
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 #s(literal 1/3 binary32) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
Calls

4 calls:

17.0ms
(-.f32 #s(literal 1 binary32) u0)
16.0ms
u0
15.0ms
(log.f32 (-.f32 #s(literal 1 binary32) u0))
15.0ms
(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
Results
AccuracySegmentsBranch
97.3%2(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
97.3%2u0
97.3%2(-.f32 #s(literal 1 binary32) u0)
97.3%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
Compiler

Compiled 13 to 29 computations (-123.1% saved)

regimes183.0ms (3.3%)

Memory
48.5MiB live, 230.0MiB allocated; 15ms collecting garbage
Counts
50 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) #s(literal 1 binary32))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 #s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) sin2phi) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 alphay alphay)) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 #s(literal 1/2 binary32) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0)))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))) sin2phi))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0))))))) u0))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 u0 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))))
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (-.f32 #s(literal 1/3 binary32) (*.f32 #s(literal -1/4 binary32) u0))))))) sin2phi))) u0))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) #s(approx (+ 1/2 (/ 1 u0)) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))))) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 (*.f32 alphay alphay) (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0))))))) sin2phi))) u0))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))))))
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 #s(approx (+ (* 1/2 u0) 1) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0)))) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 (+.f32 #s(literal 1/2 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/4 binary32) u0)))) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
Outputs
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
Calls

14 calls:

15.0ms
alphay
15.0ms
(*.f32 alphay alphay)
14.0ms
(log.f32 (-.f32 #s(literal 1 binary32) u0))
13.0ms
sin2phi
12.0ms
u0
Results
AccuracySegmentsBranch
91.7%2(/.f32 sin2phi (*.f32 alphay alphay))
87.5%1(*.f32 alphax alphax)
87.5%1(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
87.5%1alphax
91.6%2sin2phi
87.5%1(*.f32 alphay alphay)
87.5%1(/.f32 cos2phi (*.f32 alphax alphax))
91.4%2(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
87.5%1alphay
87.5%1cos2phi
96.2%2(-.f32 #s(literal 1 binary32) u0)
96.2%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
96.2%2(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
96.2%2u0
Compiler

Compiled 53 to 100 computations (-88.7% saved)

regimes76.0ms (1.4%)

Memory
-2.9MiB live, 92.3MiB allocated; 11ms collecting garbage
Counts
37 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) #s(literal 1 binary32))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 #s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) sin2phi) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 alphay alphay)) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 #s(literal 1/2 binary32) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0)))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))) sin2phi))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0))))))) u0))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (*.f32 u0 (-.f32 (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) cos2phi))))))
(/.f32 (neg.f32 (-.f32 #s(approx (log (- 1 (* u0 u0))) (*.f32 #s(literal -1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #s(literal 1 binary32) u0)))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) u0 #s(literal 1/3 binary32)) u0 #s(literal 1/2 binary32)) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))) sin2phi) (*.f32 alphay alphay))))
(/.f32 (neg.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphay alphay) (/.f32 cos2phi (*.f32 alphax alphax)) sin2phi) (*.f32 alphay alphay))))
Outputs
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
Calls

7 calls:

15.0ms
(-.f32 #s(literal 1 binary32) u0)
11.0ms
u0
10.0ms
(/.f32 sin2phi (*.f32 alphay alphay))
9.0ms
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
9.0ms
sin2phi
Results
AccuracySegmentsBranch
90.9%2(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
91.1%2sin2phi
91.3%2(/.f32 sin2phi (*.f32 alphay alphay))
91.4%2(-.f32 #s(literal 1 binary32) u0)
91.4%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
91.4%2(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
91.4%2u0
Compiler

Compiled 27 to 51 computations (-88.9% saved)

regimes122.0ms (2.2%)

Memory
-26.2MiB live, 155.7MiB allocated; 14ms collecting garbage
Counts
31 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) #s(literal 1 binary32))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 #s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) sin2phi) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 alphay alphay)) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 #s(literal 1/2 binary32) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0)))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) (*.f32 u0 (-.f32 (/.f32 #s(literal 1 binary32) u0) #s(literal 1 binary32))))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))) sin2phi))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 alphay alphay) sin2phi) (/.f32 (*.f32 alphay alphay) (*.f32 sin2phi u0))))))) u0))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) cos2phi))
#s(approx (/ (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 (+.f32 #s(literal 1 binary32) u0) (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))))) sin2phi))
Outputs
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0)))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
Calls

14 calls:

11.0ms
(/.f32 cos2phi (*.f32 alphax alphax))
10.0ms
u0
10.0ms
alphay
9.0ms
(/.f32 sin2phi (*.f32 alphay alphay))
9.0ms
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
Results
AccuracySegmentsBranch
75.3%1(/.f32 cos2phi (*.f32 alphax alphax))
83.5%3(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
78.5%2cos2phi
75.3%1(*.f32 alphay alphay)
75.3%1alphay
75.3%1(*.f32 alphax alphax)
75.3%1alphax
83.5%2(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
84.9%2sin2phi
85.1%2(/.f32 sin2phi (*.f32 alphay alphay))
83.6%2(-.f32 #s(literal 1 binary32) u0)
83.6%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
83.6%2(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
83.6%2u0
Compiler

Compiled 53 to 100 computations (-88.7% saved)

regimes9.0ms (0.2%)

Memory
12.0MiB live, 12.0MiB allocated; 0ms collecting garbage
Counts
25 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) #s(literal 1 binary32))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 #s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) sin2phi) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 alphay alphay)) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 #s(literal 1/2 binary32) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0)))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (*.f32 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
Outputs
(/.f32 #s(approx (neg (log (- 1 u0))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 u0 (+.f32 #s(literal 1/2 binary32) (*.f32 #s(literal 1/3 binary32) u0)))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
Calls

1 calls:

7.0ms
(/.f32 sin2phi (*.f32 alphay alphay))
Results
AccuracySegmentsBranch
85.0%2(/.f32 sin2phi (*.f32 alphay alphay))
Compiler

Compiled 4 to 7 computations (-75% saved)

regimes27.0ms (0.5%)

Memory
-7.8MiB live, 37.3MiB allocated; 2ms collecting garbage
Counts
22 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) #s(literal 1 binary32))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 #s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) sin2phi) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 alphay alphay)) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 #s(literal 1/2 binary32) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0))
Outputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))
Calls

4 calls:

8.0ms
(-.f32 #s(literal 1 binary32) u0)
6.0ms
(/.f32 sin2phi (*.f32 alphay alphay))
6.0ms
sin2phi
6.0ms
(log.f32 (-.f32 #s(literal 1 binary32) u0))
Results
AccuracySegmentsBranch
83.6%2(-.f32 #s(literal 1 binary32) u0)
83.6%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
82.6%2sin2phi
82.8%2(/.f32 sin2phi (*.f32 alphay alphay))
Compiler

Compiled 12 to 27 computations (-125% saved)

regimes23.0ms (0.4%)

Memory
33.0MiB live, 33.0MiB allocated; 0ms collecting garbage
Counts
20 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) #s(literal 1 binary32))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 #s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphay alphay) (/ cos2phi (* alphax alphax))) sin2phi) sin2phi) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) #s(approx (+ (* 1/2 (/ (* (* alphay alphay) u0) sin2phi)) (/ (* alphay alphay) sin2phi)) (/.f32 (fma.f32 #s(literal 1/2 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 alphay alphay)) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) (fma.f32 u0 #s(approx (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi))) (/.f32 #s(literal 1/2 binary32) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
Outputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
Calls

4 calls:

6.0ms
u0
6.0ms
(-.f32 #s(literal 1 binary32) u0)
5.0ms
(log.f32 (-.f32 #s(literal 1 binary32) u0))
5.0ms
(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
Results
AccuracySegmentsBranch
83.6%2(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
83.6%2u0
83.6%2(-.f32 #s(literal 1 binary32) u0)
83.6%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
Compiler

Compiled 13 to 29 computations (-123.1% saved)

regimes55.0ms (1%)

Memory
-11.8MiB live, 79.0MiB allocated; 4ms collecting garbage
Counts
12 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) #s(literal 1 binary32))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphay alphay) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 #s(approx (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi)) (/.f32 (*.f32 (*.f32 alphax alphax) (log.f32 (-.f32 #s(literal 1 binary32) u0))) cos2phi))))
Outputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
Calls

14 calls:

5.0ms
(-.f32 #s(literal 1 binary32) u0)
5.0ms
(*.f32 alphay alphay)
4.0ms
u0
4.0ms
(/.f32 cos2phi (*.f32 alphax alphax))
4.0ms
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
Results
AccuracySegmentsBranch
65.5%1(*.f32 alphax alphax)
65.5%1alphax
65.5%1(/.f32 cos2phi (*.f32 alphax alphax))
65.5%1(*.f32 alphay alphay)
65.5%1alphay
65.5%1cos2phi
70.8%2(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
76.9%2sin2phi
76.7%2(/.f32 sin2phi (*.f32 alphay alphay))
71.3%2(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
71.6%2(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
71.6%2u0
71.6%2(-.f32 #s(literal 1 binary32) u0)
71.6%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
Compiler

Compiled 53 to 100 computations (-88.7% saved)

regimes3.0ms (0.1%)

Memory
5.9MiB live, 5.9MiB allocated; 0ms collecting garbage
Counts
8 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) #s(literal 1 binary32))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
Outputs
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
Calls

1 calls:

3.0ms
sin2phi
Results
AccuracySegmentsBranch
76.8%2sin2phi
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes23.0ms (0.4%)

Memory
-14.6MiB live, 33.0MiB allocated; 5ms collecting garbage
Counts
7 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) #s(literal 1 binary32))) cos2phi))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
Outputs
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (fma.f32 #s(literal 1/2 binary32) u0 #s(literal 1 binary32)) u0)) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
Calls

8 calls:

4.0ms
(log.f32 (-.f32 #s(literal 1 binary32) u0))
3.0ms
(-.f32 #s(literal 1 binary32) u0)
3.0ms
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
2.0ms
sin2phi
2.0ms
(/.f32 sin2phi (*.f32 alphay alphay))
Results
AccuracySegmentsBranch
64.2%2(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
64.5%2(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
57.8%1(-.f32 #s(literal 1 binary32) u0)
57.8%1(log.f32 (-.f32 #s(literal 1 binary32) u0))
57.8%1(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
57.8%1u0
69.2%2(/.f32 sin2phi (*.f32 alphay alphay))
69.5%2sin2phi
Compiler

Compiled 42 to 66 computations (-57.1% saved)

regimes19.0ms (0.3%)

Memory
31.3MiB live, 31.3MiB allocated; 0ms collecting garbage
Counts
6 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (*.f32 (*.f32 alphay alphay) #s(approx (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 #s(approx (log (- 1 u0)) (*.f32 #s(literal -1 binary32) u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) (/.f32 (log.f32 #s(approx (- 1 u0) #s(literal 1 binary32))) cos2phi))))
Outputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 #s(approx (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1/2 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) u0) (/ 1 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) #s(approx (* (* alphay alphay) (+ (* u0 (+ (* u0 (+ (* 1/4 (/ u0 sin2phi)) (* 1/3 (/ 1 sin2phi)))) (* 1/2 (/ 1 sin2phi)))) (/ 1 sin2phi))) (/.f32 (*.f32 alphay alphay) sin2phi))) u0))
Calls

8 calls:

2.0ms
sin2phi
2.0ms
alphay
2.0ms
(*.f32 alphax alphax)
2.0ms
(/.f32 sin2phi (*.f32 alphay alphay))
2.0ms
cos2phi
Results
AccuracySegmentsBranch
57.8%1(*.f32 alphay alphay)
57.8%1alphay
57.8%1(*.f32 alphax alphax)
57.8%1(/.f32 cos2phi (*.f32 alphax alphax))
57.8%1alphax
57.8%1cos2phi
66.8%2(/.f32 sin2phi (*.f32 alphay alphay))
67.2%2sin2phi
Compiler

Compiled 16 to 46 computations (-187.5% saved)

regimes16.0ms (0.3%)

Memory
-12.9MiB live, 33.0MiB allocated; 2ms collecting garbage
Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
Outputs
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) #s(approx (neg (* (* alphax alphax) (/ (log (- 1 u0)) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) u0) cos2phi)))
Calls

14 calls:

2.0ms
(/.f32 sin2phi (*.f32 alphay alphay))
1.0ms
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
1.0ms
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
1.0ms
(*.f32 alphay alphay)
1.0ms
(-.f32 #s(literal 1 binary32) u0)
Results
AccuracySegmentsBranch
24.5%1(-.f32 #s(literal 1 binary32) u0)
24.5%1(log.f32 (-.f32 #s(literal 1 binary32) u0))
24.5%1(*.f32 alphax alphax)
24.5%1alphax
24.5%1(/.f32 cos2phi (*.f32 alphax alphax))
24.5%1(*.f32 alphay alphay)
24.5%1alphay
24.5%1cos2phi
24.5%1(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
24.5%1u0
24.5%1(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
24.5%1(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
24.5%1(/.f32 sin2phi (*.f32 alphay alphay))
24.5%1sin2phi
Compiler

Compiled 53 to 100 computations (-88.7% saved)

bsearch1.0ms (0%)

Memory
1.2MiB live, 1.2MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
0.0ms
0.026068352162837982
0.02945357747375965
Compiler

Compiled 20 to 23 computations (-15% saved)

bsearch1.0ms (0%)

Memory
1.1MiB live, 1.1MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.04249930754303932
-0.03736039251089096
Compiler

Compiled 20 to 23 computations (-15% saved)

bsearch1.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.026414131745696068
-0.024491241201758385
Compiler

Compiled 20 to 23 computations (-15% saved)

bsearch1.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.026414131745696068
-0.024491241201758385
Compiler

Compiled 20 to 23 computations (-15% saved)

bsearch1.0ms (0%)

Memory
1.0MiB live, 1.0MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.017891423776745796
-0.016695091500878334
Compiler

Compiled 20 to 23 computations (-15% saved)

bsearch1.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
0.0ms
0.002914516255259514
0.0032718752045184374
Compiler

Compiled 20 to 23 computations (-15% saved)

bsearch0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
0.0ms
0.005331928376108408
0.005949823185801506
Compiler

Compiled 20 to 23 computations (-15% saved)

bsearch0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.00015425159654114395
0.0006174271111376584
Compiler

Compiled 19 to 23 computations (-21.1% saved)

bsearch0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.00015425159654114395
0.0006174271111376584
Compiler

Compiled 19 to 23 computations (-21.1% saved)

bsearch0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.00046609772834926844
-0.0004485062963794917
Compiler

Compiled 20 to 23 computations (-15% saved)

bsearch0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.00046609772834926844
-0.0004485062963794917
Compiler

Compiled 20 to 23 computations (-15% saved)

bsearch0.0ms (0%)

Memory
0.4MiB live, 0.4MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
0.0ms
1.0459747285429706e-14
1.2287659632197537e-14
Compiler

Compiled 20 to 23 computations (-15% saved)

bsearch0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
0.0ms
1.0459747285429706e-14
1.2287659632197537e-14
Compiler

Compiled 20 to 23 computations (-15% saved)

bsearch0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
0.0ms
1.0459747285429706e-14
1.2287659632197537e-14
Compiler

Compiled 20 to 23 computations (-15% saved)

bsearch0.0ms (0%)

Memory
0.3MiB live, 0.3MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
0.0ms
1.0459747285429706e-14
1.2287659632197537e-14
Compiler

Compiled 20 to 23 computations (-15% saved)

derivations516.0ms (9.2%)

Memory
25.2MiB live, 341.2MiB allocated; 62ms collecting garbage
Stop Event
fuel
Compiler

Compiled 359 to 188 computations (47.6% saved)

preprocess169.0ms (3%)

Memory
-28.4MiB live, 292.0MiB allocated; 33ms collecting garbage
Remove

(abs alphay)

(abs alphax)

Compiler

Compiled 3 546 to 2 739 computations (22.8% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...