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

Time bar (total: 7.3s)

start0.0ms (0%)

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

analyze430.0ms (5.9%)

Memory
48.2MiB live, 667.0MiB allocated; 197ms 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 (18.3%)

Memory
38.0MiB live, 2 107.9MiB allocated; 254ms collecting garbage
Samples
559.0ms5 793×0valid
466.0ms2 461×1valid
1.0ms2valid
Precisions
Click to see histograms. Total time spent on operations: 715.0ms
ival-log: 226.0ms (31.6% of total)
ival-div!: 189.0ms (26.4% of total)
ival-mult!: 84.0ms (11.8% of total)
adjust: 72.0ms (10.1% of total)
ival-neg: 53.0ms (7.4% of total)
ival-sub!: 35.0ms (4.9% of total)
ival-add!: 21.0ms (2.9% of total)
ival-<=: 18.0ms (2.5% of total)
ival-and: 16.0ms (2.2% of total)
ival-assert: 2.0ms (0.3% of total)
Bogosity

preprocess38.0ms (0.5%)

Memory
-43.9MiB live, 10.9MiB allocated; 4ms collecting garbage
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
090366
1223356
2425356
3758354
41231354
52075354
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
60.9%
(/.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)

series31.0ms (0.4%)

Memory
23.1MiB live, 69.8MiB allocated; 2ms 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
3.0ms
cos2phi
@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)

rewrite224.0ms (3.1%)

Memory
12.0MiB live, 243.9MiB allocated; 16ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05143653
05273489
132373425
087783361
Stop Event
iter-limit
node-limit
iter-limit
Counts
104 → 166
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 (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 (-.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 (fma.f32 (/.f32 sin2phi alphay) alphax (*.f32 alphay (/.f32 cos2phi alphax))) (*.f32 alphay alphax))
(/.f32 (fma.f32 (/.f32 sin2phi alphay) (neg.f32 (*.f32 alphax alphax)) (*.f32 alphay (neg.f32 cos2phi))) (*.f32 alphay (neg.f32 (*.f32 alphax alphax))))
(/.f32 (fma.f32 (/.f32 sin2phi alphay) (*.f32 alphax alphax) (*.f32 alphay cos2phi)) (*.f32 alphay (*.f32 alphax alphax)))
(/.f32 (fma.f32 (neg.f32 sin2phi) alphax (*.f32 (neg.f32 (*.f32 alphay alphay)) (/.f32 cos2phi alphax))) (*.f32 (neg.f32 (*.f32 alphay alphay)) alphax))
(/.f32 (fma.f32 (neg.f32 sin2phi) (neg.f32 (*.f32 alphax alphax)) (*.f32 (neg.f32 (*.f32 alphay alphay)) (neg.f32 cos2phi))) (*.f32 (neg.f32 (*.f32 alphay alphay)) (neg.f32 (*.f32 alphax alphax))))
(/.f32 (fma.f32 (neg.f32 sin2phi) (*.f32 alphax alphax) (*.f32 (neg.f32 (*.f32 alphay alphay)) cos2phi)) (*.f32 (neg.f32 (*.f32 alphay alphay)) (*.f32 alphax alphax)))
(/.f32 (fma.f32 sin2phi alphax (*.f32 (*.f32 alphay alphay) (/.f32 cos2phi alphax))) (*.f32 (*.f32 alphay alphay) alphax))
(/.f32 (fma.f32 sin2phi (neg.f32 (*.f32 alphax alphax)) (*.f32 (*.f32 alphay alphay) (neg.f32 cos2phi))) (*.f32 (*.f32 alphay alphay) (neg.f32 (*.f32 alphax alphax))))
(/.f32 (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphay alphay) (*.f32 alphax alphax)))
(/.f32 (fma.f32 (/.f32 cos2phi alphax) alphay (*.f32 alphax (/.f32 sin2phi alphay))) (*.f32 alphax alphay))
(/.f32 (fma.f32 (/.f32 cos2phi alphax) (neg.f32 (*.f32 alphay alphay)) (*.f32 alphax (neg.f32 sin2phi))) (*.f32 alphax (neg.f32 (*.f32 alphay alphay))))
(/.f32 (fma.f32 (/.f32 cos2phi alphax) (*.f32 alphay alphay) (*.f32 alphax sin2phi)) (*.f32 alphax (*.f32 alphay alphay)))
(/.f32 (fma.f32 (neg.f32 cos2phi) alphay (*.f32 (neg.f32 (*.f32 alphax alphax)) (/.f32 sin2phi alphay))) (*.f32 (neg.f32 (*.f32 alphax alphax)) alphay))
(/.f32 (fma.f32 (neg.f32 cos2phi) (neg.f32 (*.f32 alphay alphay)) (*.f32 (neg.f32 (*.f32 alphax alphax)) (neg.f32 sin2phi))) (*.f32 (neg.f32 (*.f32 alphax alphax)) (neg.f32 (*.f32 alphay alphay))))
(/.f32 (fma.f32 (neg.f32 cos2phi) (*.f32 alphay alphay) (*.f32 (neg.f32 (*.f32 alphax alphax)) sin2phi)) (*.f32 (neg.f32 (*.f32 alphax alphax)) (*.f32 alphay alphay)))
(/.f32 (fma.f32 cos2phi alphay (*.f32 (*.f32 alphax alphax) (/.f32 sin2phi alphay))) (*.f32 (*.f32 alphax alphax) alphay))
(/.f32 (fma.f32 cos2phi (neg.f32 (*.f32 alphay alphay)) (*.f32 (*.f32 alphax alphax) (neg.f32 sin2phi))) (*.f32 (*.f32 alphax alphax) (neg.f32 (*.f32 alphay alphay))))
(/.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 (*.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 (/.f32 cos2phi alphax) alphax)
(/.f32 (neg.f32 cos2phi) (neg.f32 (*.f32 alphax alphax)))
(/.f32 cos2phi (*.f32 alphax alphax))
cos2phi
(*.f32 (neg.f32 (neg.f32 alphax)) (neg.f32 (neg.f32 alphax)))
(*.f32 (neg.f32 (fabs.f32 alphax)) (neg.f32 (fabs.f32 alphax)))
(*.f32 (fabs.f32 (fabs.f32 alphax)) (fabs.f32 (fabs.f32 alphax)))
(*.f32 (exp.f32 (log.f32 alphax)) (exp.f32 (log.f32 alphax)))
(*.f32 (neg.f32 alphax) (neg.f32 alphax))
(*.f32 (fabs.f32 alphax) (fabs.f32 alphax))
(*.f32 alphax alphax)
(pow.f32 (exp.f32 (log.f32 alphax)) #s(literal 2 binary32))
(pow.f32 (neg.f32 alphax) #s(literal 2 binary32))
(pow.f32 (fabs.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 (/.f32 sin2phi alphay) alphay)
(/.f32 (neg.f32 sin2phi) (neg.f32 (*.f32 alphay alphay)))
(/.f32 sin2phi (*.f32 alphay alphay))
sin2phi
(*.f32 (neg.f32 (neg.f32 alphay)) (neg.f32 (neg.f32 alphay)))
(*.f32 (neg.f32 (fabs.f32 alphay)) (neg.f32 (fabs.f32 alphay)))
(*.f32 (fabs.f32 (fabs.f32 alphay)) (fabs.f32 (fabs.f32 alphay)))
(*.f32 (exp.f32 (log.f32 alphay)) (exp.f32 (log.f32 alphay)))
(*.f32 (neg.f32 alphay) (neg.f32 alphay))
(*.f32 (fabs.f32 alphay) (fabs.f32 alphay))
(*.f32 alphay alphay)
(pow.f32 (exp.f32 (log.f32 alphay)) #s(literal 2 binary32))
(pow.f32 (neg.f32 alphay) #s(literal 2 binary32))
(pow.f32 (fabs.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 #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 #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))) (+ (/ 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 #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 #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))) (+ (/ 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)))

eval26.0ms (0.4%)

Memory
-20.1MiB live, 25.9MiB allocated; 2ms collecting garbage
Compiler

Compiled 2 531 to 840 computations (66.8% saved)

prune15.0ms (0.2%)

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

24 alts after pruning (23 fresh and 1 done)

PrunedKeptTotal
New12523148
Fresh000
Picked011
Done000
Total12524149
Accuracy
99.1%
Counts
149 → 24
Alt Table
Click to see full alt table
StatusAccuracyProgram
58.3%
(/.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))))
58.4%
(/.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.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (/.f32 sin2phi alphay) alphax (*.f32 alphay (/.f32 cos2phi alphax))) (*.f32 alphay alphax)))
60.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (/.f32 cos2phi alphax) (*.f32 alphay alphay) (*.f32 alphax sin2phi)) (*.f32 alphax (*.f32 alphay alphay))))
60.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
60.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 (/.f32 cos2phi alphax) alphax) (/.f32 sin2phi (*.f32 alphay alphay))))
60.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
35.7%
(/.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)))))))
60.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
60.8%
(/.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))))))
60.9%
(/.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))))
47.3%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
23.3%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
60.3%
(/.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)))
58.6%
(/.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))))
92.5%
(/.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))))
90.8%
(/.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))))
86.9%
(/.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.8%
(/.f32 #s(approx (neg (log (- 1 u0))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
92.5%
#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))
90.7%
#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))
86.8%
#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))
47.7%
#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))))
23.2%
#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 027 to 955 computations (7% saved)

series315.0ms (4.3%)

Memory
-3.4MiB live, 589.9MiB allocated; 154ms collecting garbage
Counts
44 → 529
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 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(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 (fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))
(fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi)
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) 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)))
(fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))
(*.f32 (*.f32 alphax alphax) sin2phi)
(*.f32 (*.f32 alphax alphax) (*.f32 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) #s(hole binary32 cos2phi))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) #s(hole binary32 (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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)))
#s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) #s(hole binary32 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))
#s(approx (* (* alphax alphax) sin2phi) #s(hole binary32 (* (pow alphax 2) sin2phi)))
#s(approx (* (* alphax alphax) (* alphay alphay)) #s(hole binary32 (* (pow alphax 2) (pow alphay 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) #s(hole binary32 (/ (* (pow alphax 2) sin2phi) (pow alphay 2))))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) #s(hole binary32 (* (pow alphax 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) #s(hole binary32 (* (pow alphax 2) sin2phi)))
#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))) (+ (/ 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 (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) #s(hole binary32 (/ (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)) (pow alphay 2))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (+ (* (* 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))) (+ (/ 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (/ (* (pow alphax 2) (* (pow alphay 2) u0)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* 1/2 (/ (* (pow alphax 2) (* (pow alphay 2) u0)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ (* (pow alphax 2) (* (pow alphay 2) u0)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))) (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) (* (pow alphay 2) u0)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* 1/3 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))) (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))
#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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (* (pow alphay 2) (+ (log -1) (* -1 (log (/ 1 u0)))))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (* (pow alphay 2) (+ (log -1) (* -1 (log (/ 1 u0)))))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (* (pow alphay 2) (+ (log -1) (* -1 (log (/ 1 u0)))))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (+ (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (* (pow u0 2) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (* (pow alphay 2) (+ (log -1) (* -1 (log (/ 1 u0)))))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (+ (* 1/3 (/ (* (pow alphax 2) (pow alphay 2)) (* (pow u0 3) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) (+ (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (* (pow u0 2) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))))
#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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (/ (* (pow alphax 2) (* (pow alphay 2) (log (/ -1 u0)))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (/ (* (pow alphax 2) (* (pow alphay 2) (log (/ -1 u0)))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))) (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* -1/2 (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))) u0)) (/ (* (pow alphax 2) (* (pow alphay 2) (log (/ -1 u0)))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* -1 (/ (+ (* 1/3 (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) u0))) u0)) (/ (* (pow alphax 2) (* (pow alphay 2) (log (/ -1 u0)))) (+ (* (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 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (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 (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (+ (* (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (+ (/ (* (pow alphax 2) sin2phi) cos2phi) (pow alphay 2)))))
#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 (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))) 1)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (* (pow alphax 2) sin2phi) cos2phi)) (* -1 (pow alphay 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (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 (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) #s(hole binary32 (* sin2phi (+ (/ cos2phi sin2phi) (/ (pow alphax 2) (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (+ (/ (* (pow alphay 2) cos2phi) sin2phi) (pow alphax 2)))))
#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 (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) #s(hole binary32 (* -1 (* sin2phi (+ (* -1 (/ cos2phi sin2phi)) (* -1 (/ (pow alphax 2) (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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) sin2phi)) (* -1 (pow alphax 2)))))))
Calls

15 calls:

TimeVariablePointExpression
101.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))) (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) sin2phi) (* (* alphax alphax) (* alphay alphay)))
32.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))) (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) sin2phi) (* (* alphax alphax) (* alphay alphay)))
19.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))) (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) sin2phi) (* (* alphax alphax) (* alphay alphay)))
19.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))) (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) sin2phi) (* (* alphax alphax) (* alphay alphay)))
18.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))) (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) sin2phi) (* (* alphax alphax) (* alphay alphay)))

rewrite528.0ms (7.3%)

Memory
-7.8MiB live, 443.4MiB allocated; 144ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0305943187
0313642413
01072541088
Stop Event
iter-limit
node-limit
iter-limit
Counts
573 → 614
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 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(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 (fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))
(fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi)
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) 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)))
(fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))
(*.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(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 (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) #s(hole binary32 cos2phi))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) #s(hole binary32 (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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)))
#s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) #s(hole binary32 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))
#s(approx (* (* alphax alphax) sin2phi) #s(hole binary32 (* (pow alphax 2) sin2phi)))
#s(approx (* (* alphax alphax) (* alphay alphay)) #s(hole binary32 (* (pow alphax 2) (pow alphay 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) #s(hole binary32 (/ (* (pow alphax 2) sin2phi) (pow alphay 2))))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) #s(hole binary32 (* (pow alphax 2) (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) #s(hole binary32 (* (pow alphax 2) sin2phi)))
#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))) (+ (/ 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 (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) #s(hole binary32 (/ (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)) (pow alphay 2))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (+ (* (* 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))) (+ (/ 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (/ (* (pow alphax 2) (* (pow alphay 2) u0)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* 1/2 (/ (* (pow alphax 2) (* (pow alphay 2) u0)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ (* (pow alphax 2) (* (pow alphay 2) u0)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))) (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) (* (pow alphay 2) u0)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* 1/3 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))) (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))
#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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (* (pow alphay 2) (+ (log -1) (* -1 (log (/ 1 u0)))))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (* (pow alphay 2) (+ (log -1) (* -1 (log (/ 1 u0)))))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (* (pow alphay 2) (+ (log -1) (* -1 (log (/ 1 u0)))))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (+ (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (* (pow u0 2) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (* (pow alphay 2) (+ (log -1) (* -1 (log (/ 1 u0)))))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (+ (* 1/3 (/ (* (pow alphax 2) (pow alphay 2)) (* (pow u0 3) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) (+ (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (* (pow u0 2) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))))
#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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (/ (* (pow alphax 2) (* (pow alphay 2) (log (/ -1 u0)))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (/ (* (pow alphax 2) (* (pow alphay 2) (log (/ -1 u0)))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))) (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* -1/2 (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))) u0)) (/ (* (pow alphax 2) (* (pow alphay 2) (log (/ -1 u0)))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* -1 (/ (+ (* 1/3 (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) u0))) u0)) (/ (* (pow alphax 2) (* (pow alphay 2) (log (/ -1 u0)))) (+ (* (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 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (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 (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (+ (* (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (+ (/ (* (pow alphax 2) sin2phi) cos2phi) (pow alphay 2)))))
#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 (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))) 1)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (* (pow alphax 2) sin2phi) cos2phi)) (* -1 (pow alphay 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (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 (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) #s(hole binary32 (* sin2phi (+ (/ cos2phi sin2phi) (/ (pow alphax 2) (pow alphay 2))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (+ (/ (* (pow alphay 2) cos2phi) sin2phi) (pow alphax 2)))))
#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 (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) #s(hole binary32 (* -1 (* sin2phi (+ (* -1 (/ cos2phi sin2phi)) (* -1 (/ (pow alphax 2) (pow alphay 2))))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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) sin2phi)) (* -1 (pow alphax 2)))))))
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 (neg.f32 alphay) (neg.f32 alphay))
(*.f32 (fabs.f32 alphay) (fabs.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 (neg.f32 alphax) (neg.f32 alphax))
(*.f32 (fabs.f32 alphax) (fabs.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 #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 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 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(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 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax)))
(/.f32 (neg.f32 (fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi)) (neg.f32 (*.f32 alphax alphax)))
(/.f32 (fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))
(+.f32 (/.f32 (*.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay))) (*.f32 alphax alphax)) (/.f32 cos2phi (*.f32 alphax alphax)))
(/.f32 (+.f32 (pow.f32 (*.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay))) #s(literal 3 binary32)) (*.f32 (*.f32 cos2phi cos2phi) cos2phi)) (fma.f32 (*.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay))) (*.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay))) (-.f32 (*.f32 cos2phi cos2phi) (*.f32 (*.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay))) cos2phi))))
(fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi)
(+.f32 (*.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay))) cos2phi)
(/.f32 (neg.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (neg.f32 (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) 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 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)))
(+.f32 (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.f32 (+.f32 (pow.f32 (*.f32 (*.f32 alphay alphay) cos2phi) #s(literal 3 binary32)) (pow.f32 (*.f32 (*.f32 alphax alphax) sin2phi) #s(literal 3 binary32))) (fma.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 (*.f32 alphay alphay) cos2phi) (-.f32 (*.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi)))))
(fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))
(+.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 (*.f32 alphax alphax) sin2phi))
(*.f32 (*.f32 alphax alphax) sin2phi)
(*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))
(pow.f32 (*.f32 alphax alphay) #s(literal 2 binary32))
#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 (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) (/.f32 cos2phi (*.f32 alphax alphax)))
#s(approx (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) (/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax)))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) cos2phi)
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax)))
#s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 alphay alphay) cos2phi))
#s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))
#s(approx (* (* alphax alphax) sin2phi) (*.f32 (*.f32 alphax alphax) sin2phi))
#s(approx (* (* alphax alphax) (* alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.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)))
#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 (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay)))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (*.f32 (*.f32 alphax alphax) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) sin2phi))
#s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax)))))
#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 (/ (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (* alphax alphax)) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay)))
#s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (/.f32 (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 alphay alphay)))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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)))) (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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay)))))
#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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (fma.f32 (*.f32 alphax alphax) 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 (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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))))) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))))) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))))) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (*.f32 (*.f32 u0 u0) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))))) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (*.f32 (*.f32 u0 u0) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))))
#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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 #s(literal -1 binary32) u0)))) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (+.f32 (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 #s(literal -1 binary32) u0)))) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))) u0) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 #s(literal -1 binary32) u0)))) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))) u0))) u0) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 #s(literal -1 binary32) u0)))) (fma.f32 (*.f32 alphax alphax) 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 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (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 (/ (+ (* (* alphax alphax) (/ 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 (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (*.f32 cos2phi (+.f32 #s(literal 1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (*.f32 (*.f32 alphax alphax) sin2phi) cos2phi) (*.f32 alphay alphay))))
#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 (/ (+ (* (* alphax alphax) (/ 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 (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (*.f32 #s(literal -1 binary32) (*.f32 cos2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi))) #s(literal 1 binary32)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* 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 (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 #s(literal -1 binary32) (*.f32 cos2phi (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) cos2phi) (*.f32 #s(literal -1 binary32) (*.f32 alphay alphay))))))
#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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (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 (/ (+ (* (* alphax alphax) (/ 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 (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (*.f32 sin2phi (+.f32 (/.f32 cos2phi sin2phi) (/.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) sin2phi) (*.f32 alphax alphax))))
#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 (/ (+ (* (* alphax alphax) (/ 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 (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (*.f32 #s(literal -1 binary32) (*.f32 sin2phi (fma.f32 #s(literal -1 binary32) (/.f32 cos2phi sin2phi) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* 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 (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 #s(literal -1 binary32) (*.f32 sin2phi (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) sin2phi) (*.f32 #s(literal -1 binary32) (*.f32 alphax alphax))))))

eval95.0ms (1.3%)

Memory
37.3MiB live, 80.6MiB allocated; 7ms collecting garbage
Compiler

Compiled 24 406 to 4 694 computations (80.8% saved)

prune97.0ms (1.3%)

Memory
-32.2MiB live, 65.5MiB allocated; 8ms collecting garbage
Pruning

64 alts after pruning (60 fresh and 4 done)

PrunedKeptTotal
New61350663
Fresh81018
Picked235
Done011
Total62364687
Accuracy
99.8%
Counts
687 → 64
Alt Table
Click to see full alt table
StatusAccuracyProgram
58.3%
(/.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))))
58.4%
(/.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.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (/.f32 sin2phi alphay) alphax (*.f32 alphay (/.f32 cos2phi alphax))) (*.f32 alphay alphax)))
60.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (pow.f32 (*.f32 alphax alphay) #s(literal 2 binary32))))
23.2%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
47.3%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
60.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 (/.f32 cos2phi alphax) alphax) (/.f32 sin2phi (*.f32 alphay alphay))))
60.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
60.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
60.8%
(/.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))))))
47.3%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
23.3%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
60.3%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))
60.9%
(/.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))))
47.2%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
92.4%
(/.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))))) (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
90.7%
(/.f32 (neg.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))))) (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
90.8%
(/.f32 (neg.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))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
75.7%
(/.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 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
58.6%
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
58.6%
(/.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))))
92.5%
(/.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))))
90.8%
(/.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))))
86.8%
(/.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))))
86.9%
(/.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.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 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
66.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.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 alphax alphax))))
85.3%
(/.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))))))
71.7%
(/.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))))))
86.8%
(/.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))))
86.8%
(/.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))))
86.9%
(/.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.8%
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 1/2 u0) 1) u0) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
76.0%
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
47.7%
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
64.5%
#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 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))))) u0))
81.1%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) #s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)) (/.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))
78.9%
#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 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))) sin2phi)) 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))
74.4%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.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))))) (/.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)) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
86.8%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.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))))) (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
44.9%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (/.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)))))))) u0))
70.5%
#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))))) (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))) u0))
70.5%
#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.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 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))
87.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 (*.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)))))))))) u0))
70.5%
#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))
87.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 #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))))))))) u0))
47.7%
#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))))
23.2%
#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))))
23.1%
#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))))
16.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) #s(literal 1 binary32))) cos2phi))))
27.7%
#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.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 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
26.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))))
23.3%
#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))))
26.0%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi)))))))
23.3%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (exp.f32 (*.f32 (log.f32 alphax) #s(literal 2 binary32))) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
23.2%
#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.5%
#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)))
87.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.4%
#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))))))
23.3%
#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)))
Compiler

Compiled 4 554 to 3 577 computations (21.5% saved)

series179.0ms (2.5%)

Memory
37.8MiB live, 178.1MiB allocated; 7ms collecting garbage
Counts
56 → 343
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 #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))))
(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 (*.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 (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)
#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))))
(*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))
(-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32))
(*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32)))
(-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))
(*.f32 #s(literal -1/3 binary32) u0)
#s(literal -1/3 binary32)
(/.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))))))
#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))
#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))
(*.f32 (*.f32 alphay alphay) 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))))) (*.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 (* 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (* 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (* 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 (* (* alphay alphay) cos2phi) #s(hole binary32 (* (pow alphay 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 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) #s(hole binary32 (* -1 u0)))
#s(approx (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) #s(hole binary32 (* u0 (- (* -1/2 u0) 1))))
#s(approx (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) #s(hole binary32 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1))))
#s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #s(hole binary32 -1))
#s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #s(hole binary32 (- (* -1/2 u0) 1)))
#s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #s(hole binary32 (- (* u0 (- (* -1/3 u0) 1/2)) 1)))
#s(approx (* u0 (- (* -1/3 u0) 1/2)) #s(hole binary32 (* -1/2 u0)))
#s(approx (* u0 (- (* -1/3 u0) 1/2)) #s(hole binary32 (* u0 (- (* -1/3 u0) 1/2))))
#s(approx (- (* -1/3 u0) 1/2) #s(hole binary32 -1/2))
#s(approx (- (* -1/3 u0) 1/2) #s(hole binary32 (- (* -1/3 u0) 1/2)))
#s(approx (* -1/3 u0) #s(hole binary32 (* -1/3 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) #s(hole binary32 (* -1/3 (pow u0 3))))
#s(approx (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) #s(hole binary32 (* -1 (* (pow u0 3) (+ 1/3 (* 1/2 (/ 1 u0)))))))
#s(approx (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) #s(hole binary32 (* (pow u0 3) (- (* -1 (/ (+ 1/2 (/ 1 u0)) u0)) 1/3))))
#s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #s(hole binary32 (* -1/3 (pow u0 2))))
#s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #s(hole binary32 (* -1 (* (pow u0 2) (+ 1/3 (* 1/2 (/ 1 u0)))))))
#s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #s(hole binary32 (* (pow u0 2) (- (* -1 (/ (+ 1/2 (/ 1 u0)) u0)) 1/3))))
#s(approx (* u0 (- (* -1/3 u0) 1/2)) #s(hole binary32 (* -1/3 (pow u0 2))))
#s(approx (* u0 (- (* -1/3 u0) 1/2)) #s(hole binary32 (* -1 (* (pow u0 2) (+ 1/3 (* 1/2 (/ 1 u0)))))))
#s(approx (- (* -1/3 u0) 1/2) #s(hole binary32 (* -1/3 u0)))
#s(approx (- (* -1/3 u0) 1/2) #s(hole binary32 (* -1 (* u0 (+ 1/3 (* 1/2 (/ 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) #s(hole binary32 (* -1 (* (pow u0 3) (+ 1/3 (+ (* 1/2 (/ 1 u0)) (/ 1 (pow u0 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 (* (* 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 (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) #s(hole binary32 (/ (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 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 (+ (* 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 (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 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))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (* 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (* 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (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 (/ (* 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
36.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)) (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) (- (* u0 (- (* -1/3 u0) 1/2)) 1) (* u0 (- (* -1/3 u0) 1/2)) (- (* -1/3 u0) 1/2) (* -1/3 u0) -1/3 (/ (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))) (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)) (* (* alphay alphay) cos2phi) (/ (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)))
24.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)) (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) (- (* u0 (- (* -1/3 u0) 1/2)) 1) (* u0 (- (* -1/3 u0) 1/2)) (- (* -1/3 u0) 1/2) (* -1/3 u0) -1/3 (/ (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))) (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)) (* (* alphay alphay) cos2phi) (/ (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)))
19.0ms
cos2phi
@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)) (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) (- (* u0 (- (* -1/3 u0) 1/2)) 1) (* u0 (- (* -1/3 u0) 1/2)) (- (* -1/3 u0) 1/2) (* -1/3 u0) -1/3 (/ (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))) (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)) (* (* alphay alphay) cos2phi) (/ (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)) (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) (- (* u0 (- (* -1/3 u0) 1/2)) 1) (* u0 (- (* -1/3 u0) 1/2)) (- (* -1/3 u0) 1/2) (* -1/3 u0) -1/3 (/ (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))) (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)) (* (* alphay alphay) cos2phi) (/ (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
@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)) (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) (- (* u0 (- (* -1/3 u0) 1/2)) 1) (* u0 (- (* -1/3 u0) 1/2)) (- (* -1/3 u0) 1/2) (* -1/3 u0) -1/3 (/ (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))) (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)) (* (* alphay alphay) cos2phi) (/ (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)))

rewrite290.0ms (4%)

Memory
-14.8MiB live, 458.0MiB allocated; 114ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0195325865
0202125529
0852424538
Stop Event
iter-limit
node-limit
iter-limit
Counts
399 → 449
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 #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))))
(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 (*.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 (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)
#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))))
(*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))
(-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32))
(*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32)))
(-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))
(*.f32 #s(literal -1/3 binary32) u0)
#s(literal -1/3 binary32)
(/.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))))))
#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))
#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))
(*.f32 (*.f32 alphay alphay) 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))))) (*.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 (* 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (* 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (* 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 (* (* alphay alphay) cos2phi) #s(hole binary32 (* (pow alphay 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 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) #s(hole binary32 (* -1 u0)))
#s(approx (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) #s(hole binary32 (* u0 (- (* -1/2 u0) 1))))
#s(approx (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) #s(hole binary32 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1))))
#s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #s(hole binary32 -1))
#s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #s(hole binary32 (- (* -1/2 u0) 1)))
#s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #s(hole binary32 (- (* u0 (- (* -1/3 u0) 1/2)) 1)))
#s(approx (* u0 (- (* -1/3 u0) 1/2)) #s(hole binary32 (* -1/2 u0)))
#s(approx (* u0 (- (* -1/3 u0) 1/2)) #s(hole binary32 (* u0 (- (* -1/3 u0) 1/2))))
#s(approx (- (* -1/3 u0) 1/2) #s(hole binary32 -1/2))
#s(approx (- (* -1/3 u0) 1/2) #s(hole binary32 (- (* -1/3 u0) 1/2)))
#s(approx (* -1/3 u0) #s(hole binary32 (* -1/3 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) #s(hole binary32 (* -1/3 (pow u0 3))))
#s(approx (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) #s(hole binary32 (* -1 (* (pow u0 3) (+ 1/3 (* 1/2 (/ 1 u0)))))))
#s(approx (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) #s(hole binary32 (* (pow u0 3) (- (* -1 (/ (+ 1/2 (/ 1 u0)) u0)) 1/3))))
#s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #s(hole binary32 (* -1/3 (pow u0 2))))
#s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #s(hole binary32 (* -1 (* (pow u0 2) (+ 1/3 (* 1/2 (/ 1 u0)))))))
#s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #s(hole binary32 (* (pow u0 2) (- (* -1 (/ (+ 1/2 (/ 1 u0)) u0)) 1/3))))
#s(approx (* u0 (- (* -1/3 u0) 1/2)) #s(hole binary32 (* -1/3 (pow u0 2))))
#s(approx (* u0 (- (* -1/3 u0) 1/2)) #s(hole binary32 (* -1 (* (pow u0 2) (+ 1/3 (* 1/2 (/ 1 u0)))))))
#s(approx (- (* -1/3 u0) 1/2) #s(hole binary32 (* -1/3 u0)))
#s(approx (- (* -1/3 u0) 1/2) #s(hole binary32 (* -1 (* u0 (+ 1/3 (* 1/2 (/ 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) #s(hole binary32 (* -1 (* (pow u0 3) (+ 1/3 (+ (* 1/2 (/ 1 u0)) (/ 1 (pow u0 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 (* (* 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 (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) #s(hole binary32 (/ (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 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 (+ (* 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 (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 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))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (* 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (* 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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 (* cos2phi (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi)))) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (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 (/ (* 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 (*.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)
(/.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))
cos2phi
(*.f32 (neg.f32 alphax) (neg.f32 alphax))
(*.f32 (fabs.f32 alphax) (fabs.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 (neg.f32 alphay) (neg.f32 alphay))
(*.f32 (fabs.f32 alphay) (fabs.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 #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))))
(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 (*.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 (neg.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))))) (neg.f32 cos2phi))
(/.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)
#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))))
(*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))
(/.f32 (-.f32 (pow.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 3 binary32)) #s(literal 1 binary32)) (fma.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) (+.f32 #s(literal 1 binary32) (*.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))))
(-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32))
(*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32)))
(/.f32 (-.f32 (pow.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 3 binary32)) #s(literal 1/8 binary32)) (fma.f32 (*.f32 #s(literal -1/3 binary32) u0) (*.f32 #s(literal -1/3 binary32) u0) (+.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32)))))
(-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))
(*.f32 #s(literal -1/3 binary32) u0)
#s(literal -1/3 binary32)
(/.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 #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 cos2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
#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 (*.f32 (*.f32 #s(literal 1/2 binary32) u0) (*.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 #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))
#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))
(*.f32 (*.f32 alphay alphay) 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))))) (*.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 (*.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 #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 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 (*.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 #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))))
(/.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 (*.f32 (*.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi)) (*.f32 #s(literal 1/4 binary32) (/.f32 u0 sin2phi))) (*.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))))
(/.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 (* 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ 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 (* 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ 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 (* 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 (* (* alphay alphay) cos2phi) (*.f32 (*.f32 alphay alphay) cos2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ 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 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) (*.f32 #s(literal -1 binary32) u0))
#s(approx (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32))))
#s(approx (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) (*.f32 u0 (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32))))
#s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #s(literal -1 binary32))
#s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)))
#s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) (-.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))
#s(approx (* u0 (- (* -1/3 u0) 1/2)) (*.f32 #s(literal -1/2 binary32) u0))
#s(approx (* u0 (- (* -1/3 u0) 1/2)) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))))
#s(approx (- (* -1/3 u0) 1/2) #s(literal -1/2 binary32))
#s(approx (- (* -1/3 u0) 1/2) (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32)))
#s(approx (* -1/3 u0) (*.f32 #s(literal -1/3 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ 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 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) (*.f32 #s(literal -1/3 binary32) (*.f32 (*.f32 u0 u0) u0)))
#s(approx (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))))
#s(approx (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) (*.f32 (*.f32 (*.f32 u0 u0) u0) (-.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))))
#s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) (*.f32 #s(literal -1/3 binary32) (*.f32 u0 u0)))
#s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))))
#s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) (*.f32 (*.f32 u0 u0) (-.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))))
#s(approx (* u0 (- (* -1/3 u0) 1/2)) (*.f32 #s(literal -1/3 binary32) (*.f32 u0 u0)))
#s(approx (* u0 (- (* -1/3 u0) 1/2)) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 u0 u0) (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) u0))))))
#s(approx (- (* -1/3 u0) 1/2) (*.f32 #s(literal -1/3 binary32) u0))
#s(approx (- (* -1/3 u0) 1/2) (*.f32 #s(literal -1 binary32) (*.f32 u0 (+.f32 #s(literal 1/3 binary32) (*.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ 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 (* u0 (- (* u0 (- (* -1/3 u0) 1/2)) 1)) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 (*.f32 u0 u0) u0) (+.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)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ 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 (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))) cos2phi))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ 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 (* 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ 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 (* 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ 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 (* 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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ 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 (* 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))))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ 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 (0.8%)

Memory
-4.3MiB live, 182.7MiB allocated; 18ms collecting garbage
Compiler

Compiled 13 496 to 3 048 computations (77.4% saved)

prune65.0ms (0.9%)

Memory
18.8MiB live, 161.1MiB allocated; 12ms collecting garbage
Pruning

68 alts after pruning (62 fresh and 6 done)

PrunedKeptTotal
New39123414
Fresh163955
Picked235
Done134
Total41068478
Accuracy
99.8%
Counts
478 → 68
Alt Table
Click to see full alt table
StatusAccuracyProgram
58.3%
(/.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))))
58.4%
(/.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.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (/.f32 sin2phi alphay) alphax (*.f32 alphay (/.f32 cos2phi alphax))) (*.f32 alphay alphax)))
60.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (pow.f32 (*.f32 alphax alphay) #s(literal 2 binary32))))
23.2%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
47.3%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
60.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 (/.f32 cos2phi alphax) alphax) (/.f32 sin2phi (*.f32 alphay alphay))))
60.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
60.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
60.8%
(/.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))))))
47.3%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
23.3%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
60.3%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))
47.2%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
90.8%
(/.f32 (neg.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))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
75.7%
(/.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 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
58.6%
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
58.6%
(/.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))))
92.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)) (/.f32 (fma.f32 cos2phi (*.f32 alphay alphay) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
44.3%
(/.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 (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)))))))
92.5%
(/.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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
69.9%
(/.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 sin2phi (*.f32 alphay alphay))))
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 (*.f32 alphax alphax))))
90.6%
(/.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 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))
90.8%
(/.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))))
86.9%
(/.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.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 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
66.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.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 alphax alphax))))
85.3%
(/.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))))))
71.7%
(/.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))))))
26.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 #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))))))
92.4%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (/.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))) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
71.7%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (/.f32 (-.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) u0) (*.f32 #s(literal 1/2 binary32) u0)) #s(literal 1 binary32)) (-.f32 (*.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))))))
92.0%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 #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))))) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
75.8%
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* (+ (* (+ (* 1/4 u0) 1/3) u0) 1/2) u0) 1) u0) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
86.9%
(/.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))))
62.6%
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 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))))))
76.0%
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
47.7%
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
81.1%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) #s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)) (/.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))
86.8%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.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))))) (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) u0))
44.9%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (/.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)))))))) u0))
70.5%
#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))))) (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))) 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.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 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))
87.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 (*.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)))))))))) u0))
67.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))
59.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) (fma.f32 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))) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
70.5%
#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))
59.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))
69.5%
#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 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)))) u0))
67.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.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 (*.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))
59.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))
47.7%
#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))))
23.2%
#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))))
23.1%
#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.7%
#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.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 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
26.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 u0 #s(approx (- (* -1/3 u0) 1/2) #s(literal -1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
23.3%
#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 #s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #s(literal -1 binary32)))) cos2phi))))
26.0%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi)))))))
23.3%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (exp.f32 (*.f32 (log.f32 alphax) #s(literal 2 binary32))) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
23.2%
#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.5%
#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.4%
#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))))))
23.3%
#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)))
Compiler

Compiled 5 015 to 3 992 computations (20.4% saved)

series185.0ms (2.5%)

Memory
-9.8MiB live, 458.5MiB allocated; 77ms collecting garbage
Counts
56 → 464
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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
#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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax)))
(/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))
(+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay)))
cos2phi
(/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))
(*.f32 (*.f32 alphax alphax) sin2phi)
(*.f32 alphax alphax)
alphax
sin2phi
(*.f32 alphay 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 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)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi)))))))
(neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi))))))
(*.f32 (*.f32 alphax alphax) #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 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi))))
(*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi)))
(-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi))
(*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi))
#s(literal -1/2 binary32)
(/.f32 u0 cos2phi)
(/.f32 #s(literal 1 binary32) cos2phi)
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.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)
(/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)))
#s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi))
(*.f32 (*.f32 alphay alphay) cos2phi)
(*.f32 (*.f32 alphax alphax) (*.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 (*.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)
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
(/.f32 cos2phi (*.f32 alphax alphax))
(/.f32 sin2phi (*.f32 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) sin2phi) (* alphay alphay))) (* alphax alphax)) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) #s(hole binary32 cos2phi))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) #s(hole binary32 (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2)))))
#s(approx (/ (* (* alphax alphax) sin2phi) (* alphay alphay)) #s(hole binary32 (/ (* (pow alphax 2) sin2phi) (pow alphay 2))))
#s(approx (* (* alphax alphax) sin2phi) #s(hole binary32 (* (pow alphax 2) sin2phi)))
#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 (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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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)))
#s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) #s(hole binary32 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))
#s(approx (* (* alphax alphax) (* alphay alphay)) #s(hole binary32 (* (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 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 (/ cos2phi (* alphax alphax)) #s(hole binary32 (/ cos2phi (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 (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) #s(hole binary32 (/ (* (pow alphax 2) sin2phi) (pow alphay 2))))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) #s(hole binary32 (* (pow alphax 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 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) #s(hole binary32 (* (pow alphax 2) sin2phi)))
#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 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 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) #s(hole binary32 (/ (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)) (pow alphay 2))))
#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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* 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 (/ (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 (/ sin2phi (* alphay alphay)) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (+ (* (* 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 (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 (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 (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) #s(hole binary32 (* -1 (/ u0 cos2phi))))
#s(approx (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) #s(hole binary32 (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)))))
#s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) #s(hole binary32 (/ -1 cos2phi)))
#s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) #s(hole binary32 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))))
#s(approx (* -1/2 (/ u0 cos2phi)) #s(hole binary32 (* -1/2 (/ u0 cos2phi))))
#s(approx (/ u0 cos2phi) #s(hole binary32 (/ u0 cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (/ (* (pow alphax 2) (* (pow alphay 2) u0)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* 1/2 (/ (* (pow alphax 2) (* (pow alphay 2) u0)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ (* (pow alphax 2) (* (pow alphay 2) u0)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))) (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) (* (pow alphay 2) u0)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* 1/3 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))) (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) 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 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 (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 (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 (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) #s(hole binary32 (* -1/2 (/ (pow u0 2) cos2phi))))
#s(approx (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) #s(hole binary32 (* -1 (* (pow u0 2) (+ (* 1/2 (/ 1 cos2phi)) (/ 1 (* cos2phi u0)))))))
#s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) #s(hole binary32 (* -1/2 (/ u0 cos2phi))))
#s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) #s(hole binary32 (* -1 (* u0 (+ (* 1/2 (/ 1 cos2phi)) (/ 1 (* cos2phi u0)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (* (pow alphay 2) (+ (log -1) (* -1 (log (/ 1 u0)))))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (* (pow alphay 2) (+ (log -1) (* -1 (log (/ 1 u0)))))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (* (pow alphay 2) (+ (log -1) (* -1 (log (/ 1 u0)))))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (+ (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (* (pow u0 2) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (* (pow alphay 2) (+ (log -1) (* -1 (log (/ 1 u0)))))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (+ (* 1/3 (/ (* (pow alphax 2) (pow alphay 2)) (* (pow u0 3) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) (+ (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (* (pow u0 2) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))))
#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 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 (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 (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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (/ (* (pow alphax 2) (* (pow alphay 2) (log (/ -1 u0)))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (/ (* (pow alphax 2) (* (pow alphay 2) (log (/ -1 u0)))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))) (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* -1/2 (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))) u0)) (/ (* (pow alphax 2) (* (pow alphay 2) (log (/ -1 u0)))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* -1 (/ (+ (* 1/3 (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) u0))) u0)) (/ (* (pow alphax 2) (* (pow alphay 2) (log (/ -1 u0)))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))))
#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 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 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 (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (/ (log (- 1 u0)) cos2phi)))
#s(approx (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) #s(hole binary32 (/ (* u0 (- (* -1/2 u0) 1)) cos2phi)))
#s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) #s(hole binary32 (/ (- (* -1/2 u0) 1) cos2phi)))
#s(approx (/ 1 cos2phi) #s(hole binary32 (/ 1 cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (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 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) #s(hole binary32 (* cos2phi (+ 1 (/ (* (pow alphax 2) sin2phi) (* (pow alphay 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))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (+ (/ (* (pow alphax 2) sin2phi) cos2phi) (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) 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 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))) 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 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 (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) #s(hole binary32 (* -1 (/ (* u0 (+ 1 (* 1/2 u0))) cos2phi))))
#s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (* (pow alphax 2) sin2phi) cos2phi)) (* -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 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 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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (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 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) #s(hole binary32 (* sin2phi (+ (/ cos2phi sin2phi) (/ (pow alphax 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 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (+ (/ (* (pow alphay 2) cos2phi) sin2phi) (pow alphax 2)))))
#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 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
#s(approx (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) #s(hole binary32 (* -1 (* sin2phi (+ (* -1 (/ cos2phi sin2phi)) (* -1 (/ (pow alphax 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 (* -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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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) sin2phi)) (* -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 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
20.0ms
u0
@-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) sin2phi) (* alphay alphay))) (* alphax alphax)) (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay)) (* (* alphax alphax) sin2phi) (* alphax alphax) alphax sin2phi (* alphay 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))) (/ (* alphay alphay) sin2phi) (/ (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) (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (* -1/2 (/ u0 cos2phi)) -1/2 (/ u0 cos2phi) (/ 1 cos2phi) (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (neg (log (- 1 u0))) (log (- 1 u0)) (- 1 u0) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphay alphay) cos2phi) (* (* alphax alphax) (* alphay alphay)) (/ (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))) (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))
19.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) sin2phi) (* alphay alphay))) (* alphax alphax)) (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay)) (* (* alphax alphax) sin2phi) (* alphax alphax) alphax sin2phi (* alphay 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))) (/ (* alphay alphay) sin2phi) (/ (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) (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (* -1/2 (/ u0 cos2phi)) -1/2 (/ u0 cos2phi) (/ 1 cos2phi) (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (neg (log (- 1 u0))) (log (- 1 u0)) (- 1 u0) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphay alphay) cos2phi) (* (* alphax alphax) (* alphay alphay)) (/ (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))) (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))
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) sin2phi) (* alphay alphay))) (* alphax alphax)) (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay)) (* (* alphax alphax) sin2phi) (* alphax alphax) alphax sin2phi (* alphay 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))) (/ (* alphay alphay) sin2phi) (/ (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) (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (* -1/2 (/ u0 cos2phi)) -1/2 (/ u0 cos2phi) (/ 1 cos2phi) (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (neg (log (- 1 u0))) (log (- 1 u0)) (- 1 u0) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphay alphay) cos2phi) (* (* alphax alphax) (* alphay alphay)) (/ (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))) (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))
15.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) sin2phi) (* alphay alphay))) (* alphax alphax)) (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay)) (* (* alphax alphax) sin2phi) (* alphax alphax) alphax sin2phi (* alphay 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))) (/ (* alphay alphay) sin2phi) (/ (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) (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (* -1/2 (/ u0 cos2phi)) -1/2 (/ u0 cos2phi) (/ 1 cos2phi) (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (neg (log (- 1 u0))) (log (- 1 u0)) (- 1 u0) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphay alphay) cos2phi) (* (* alphax alphax) (* alphay alphay)) (/ (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))) (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))
15.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) sin2phi) (* alphay alphay))) (* alphax alphax)) (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay)) (* (* alphax alphax) sin2phi) (* alphax alphax) alphax sin2phi (* alphay 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))) (/ (* alphay alphay) sin2phi) (/ (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) (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (* -1/2 (/ u0 cos2phi)) -1/2 (/ u0 cos2phi) (/ 1 cos2phi) (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (neg (log (- 1 u0))) (log (- 1 u0)) (- 1 u0) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphay alphay) cos2phi) (* (* alphax alphax) (* alphay alphay)) (/ (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))) (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))

rewrite326.0ms (4.5%)

Memory
7.6MiB live, 496.6MiB allocated; 131ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0244734014
0251033301
0924031812
Stop Event
iter-limit
node-limit
iter-limit
Counts
520 → 564
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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
#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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax)))
(/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))
(+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay)))
cos2phi
(/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))
(*.f32 (*.f32 alphax alphax) sin2phi)
(*.f32 alphax alphax)
alphax
sin2phi
(*.f32 alphay 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 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)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi)))))))
(neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi))))))
(*.f32 (*.f32 alphax alphax) #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 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi))))
(*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi)))
(-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi))
(*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi))
#s(literal -1/2 binary32)
(/.f32 u0 cos2phi)
(/.f32 #s(literal 1 binary32) cos2phi)
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.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)
(/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)))
#s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi))
(*.f32 (*.f32 alphay alphay) cos2phi)
(*.f32 (*.f32 alphax alphax) (*.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 (*.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)
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
(/.f32 cos2phi (*.f32 alphax alphax))
(/.f32 sin2phi (*.f32 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) sin2phi) (* alphay alphay))) (* alphax alphax)) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) #s(hole binary32 (/ (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2))) (pow alphax 2))))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) #s(hole binary32 cos2phi))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) #s(hole binary32 (+ cos2phi (/ (* (pow alphax 2) sin2phi) (pow alphay 2)))))
#s(approx (/ (* (* alphax alphax) sin2phi) (* alphay alphay)) #s(hole binary32 (/ (* (pow alphax 2) sin2phi) (pow alphay 2))))
#s(approx (* (* alphax alphax) sin2phi) #s(hole binary32 (* (pow alphax 2) sin2phi)))
#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 (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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (log (- 1 u0))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) #s(hole binary32 (/ cos2phi (pow alphax 2))))
#s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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)))
#s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) #s(hole binary32 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))
#s(approx (* (* alphax alphax) (* alphay alphay)) #s(hole binary32 (* (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 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 (/ cos2phi (* alphax alphax)) #s(hole binary32 (/ cos2phi (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 (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) #s(hole binary32 (/ (* (pow alphax 2) sin2phi) (pow alphay 2))))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) #s(hole binary32 (* (pow alphax 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 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphay 2) (log (- 1 u0))) sin2phi))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) #s(hole binary32 (+ (/ cos2phi (pow alphax 2)) (/ sin2phi (pow alphay 2)))))
#s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) #s(hole binary32 (* (pow alphax 2) sin2phi)))
#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 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 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) #s(hole binary32 (/ (+ sin2phi (/ (* (pow alphay 2) cos2phi) (pow alphax 2))) (pow alphay 2))))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) #s(hole binary32 (/ (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)) (pow alphay 2))))
#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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* 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 (/ (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 (/ sin2phi (* alphay alphay)) #s(hole binary32 (/ sin2phi (pow alphay 2))))
#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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (+ (* (* 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 (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 (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 (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) #s(hole binary32 (* -1 (/ u0 cos2phi))))
#s(approx (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) #s(hole binary32 (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)))))
#s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) #s(hole binary32 (/ -1 cos2phi)))
#s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) #s(hole binary32 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))))
#s(approx (* -1/2 (/ u0 cos2phi)) #s(hole binary32 (* -1/2 (/ u0 cos2phi))))
#s(approx (/ u0 cos2phi) #s(hole binary32 (/ u0 cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (/ (* (pow alphax 2) (* (pow alphay 2) u0)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* 1/2 (/ (* (pow alphax 2) (* (pow alphay 2) u0)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/3 (/ (* (pow alphax 2) (* (pow alphay 2) u0)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))) (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* u0 (+ (* u0 (+ (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* u0 (+ (* 1/4 (/ (* (pow alphax 2) (* (pow alphay 2) u0)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* 1/3 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))) (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) 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 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 (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 (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 (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) #s(hole binary32 (* -1/2 (/ (pow u0 2) cos2phi))))
#s(approx (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) #s(hole binary32 (* -1 (* (pow u0 2) (+ (* 1/2 (/ 1 cos2phi)) (/ 1 (* cos2phi u0)))))))
#s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) #s(hole binary32 (* -1/2 (/ u0 cos2phi))))
#s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) #s(hole binary32 (* -1 (* u0 (+ (* 1/2 (/ 1 cos2phi)) (/ 1 (* cos2phi u0)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (* -1 (/ (* (pow alphax 2) (* (pow alphay 2) (+ (log -1) (* -1 (log (/ 1 u0)))))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (* (pow alphay 2) (+ (log -1) (* -1 (log (/ 1 u0)))))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (* (pow alphay 2) (+ (log -1) (* -1 (log (/ 1 u0)))))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (+ (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (* (pow u0 2) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (* (pow alphax 2) (* (pow alphay 2) (+ (log -1) (* -1 (log (/ 1 u0)))))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (+ (* 1/3 (/ (* (pow alphax 2) (pow alphay 2)) (* (pow u0 3) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) (+ (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (* (pow u0 2) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))))
#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 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 (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 (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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (/ (* (pow alphax 2) (* (pow alphay 2) (log (/ -1 u0)))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (/ (* (pow alphax 2) (* (pow alphay 2) (log (/ -1 u0)))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))) (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* -1/2 (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))))) u0)) (/ (* (pow alphax 2) (* (pow alphay 2) (log (/ -1 u0)))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) #s(hole binary32 (+ (* -1 (/ (+ (* -1 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi)))) (* -1 (/ (+ (* 1/3 (/ (* (pow alphax 2) (pow alphay 2)) (* u0 (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) (* 1/2 (/ (* (pow alphax 2) (pow alphay 2)) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))) u0))) u0)) (/ (* (pow alphax 2) (* (pow alphay 2) (log (/ -1 u0)))) (+ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))))))
#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 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 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 (/ (log (- 1 u0)) cos2phi) #s(hole binary32 (/ (log (- 1 u0)) cos2phi)))
#s(approx (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) #s(hole binary32 (/ (* u0 (- (* -1/2 u0) 1)) cos2phi)))
#s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) #s(hole binary32 (/ (- (* -1/2 u0) 1) cos2phi)))
#s(approx (/ 1 cos2phi) #s(hole binary32 (/ 1 cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (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 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) #s(hole binary32 (* cos2phi (+ (/ 1 (pow alphax 2)) (/ sin2phi (* (pow alphay 2) cos2phi))))))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) #s(hole binary32 (* cos2phi (+ 1 (/ (* (pow alphax 2) sin2phi) (* (pow alphay 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))) cos2phi)))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ sin2phi (* alphay alphay)) (/ 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (+ (/ (* (pow alphax 2) sin2phi) cos2phi) (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) 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 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ sin2phi (* (pow alphay 2) cos2phi))) (/ 1 (pow alphax 2)))))))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) #s(hole binary32 (* -1 (* cos2phi (- (* -1 (/ (* (pow alphax 2) sin2phi) (* (pow alphay 2) cos2phi))) 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 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 (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) #s(hole binary32 (* -1 (/ (* u0 (+ 1 (* 1/2 u0))) cos2phi))))
#s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) #s(hole binary32 (* -1 (/ (+ 1 (* 1/2 u0)) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (* (pow alphax 2) sin2phi) cos2phi)) (* -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 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 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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (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 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) #s(hole binary32 (* sin2phi (+ (/ 1 (pow alphay 2)) (/ cos2phi (* (pow alphax 2) sin2phi))))))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) #s(hole binary32 (* sin2phi (+ (/ cos2phi sin2phi) (/ (pow alphax 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 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (+ (/ (* (pow alphay 2) cos2phi) sin2phi) (pow alphax 2)))))
#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 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
#s(approx (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) #s(hole binary32 (* -1 (* sin2phi (- (* -1 (/ cos2phi (* (pow alphax 2) sin2phi))) (/ 1 (pow alphay 2)))))))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) #s(hole binary32 (* -1 (* sin2phi (+ (* -1 (/ cos2phi sin2phi)) (* -1 (/ (pow alphax 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 (* -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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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) sin2phi)) (* -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 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
(/.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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.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 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
#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)
#s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax)))
(/.f32 (neg.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay)))) (neg.f32 (*.f32 alphax alphax)))
(/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay)) (*.f32 alphax alphax)))
(/.f32 (fma.f32 (*.f32 cos2phi cos2phi) cos2phi (pow.f32 (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay)) #s(literal 3 binary32))) (fma.f32 cos2phi cos2phi (-.f32 (*.f32 (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay)) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))))))
(+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay)))
cos2phi
(*.f32 (/.f32 (*.f32 alphax alphax) alphay) (/.f32 sin2phi alphay))
(/.f32 (neg.f32 (*.f32 (*.f32 alphax alphax) sin2phi)) (neg.f32 (*.f32 alphay alphay)))
(/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))
(*.f32 (*.f32 alphax alphax) sin2phi)
(*.f32 (neg.f32 alphax) (neg.f32 alphax))
(*.f32 (fabs.f32 alphax) (fabs.f32 alphax))
(*.f32 alphax alphax)
(pow.f32 alphax #s(literal 2 binary32))
(exp.f32 (*.f32 (log.f32 alphax) #s(literal 2 binary32)))
alphax
sin2phi
(*.f32 (neg.f32 alphay) (neg.f32 alphay))
(*.f32 (fabs.f32 alphay) (fabs.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)))) (*.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)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi)))))))
(neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi))))))
(*.f32 (*.f32 alphax alphax) #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 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi))))
(*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi)))
(/.f32 (-.f32 (pow.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) #s(literal 3 binary32)) (pow.f32 (/.f32 #s(literal 1 binary32) cos2phi) #s(literal 3 binary32))) (fma.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (fma.f32 (/.f32 #s(literal 1 binary32) cos2phi) (/.f32 #s(literal 1 binary32) cos2phi) (*.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi)))))
(-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi))
(*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi))
#s(literal -1/2 binary32)
(/.f32 (neg.f32 u0) (neg.f32 cos2phi))
(/.f32 u0 cos2phi)
(/.f32 #s(literal -1 binary32) (neg.f32 cos2phi))
(/.f32 #s(literal 1 binary32) cos2phi)
(pow.f32 cos2phi #s(literal -1 binary32))
(/.f32 (neg.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))) (neg.f32 (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.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)))
(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 (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi))) (neg.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)))
#s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi))
(*.f32 (*.f32 alphay alphay) cos2phi)
(*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))
(pow.f32 (*.f32 alphax alphay) #s(literal 2 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 (+.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 (neg.f32 u0) (neg.f32 u0))
(*.f32 (fabs.f32 u0) (fabs.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)
(/.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))
#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) sin2phi) (* alphay alphay))) (* alphax alphax)) (/.f32 cos2phi (*.f32 alphax alphax)))
#s(approx (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) (/.f32 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax)))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) cos2phi)
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))))
#s(approx (/ (* (* alphax alphax) sin2phi) (* alphay alphay)) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay)))
#s(approx (* (* alphax alphax) sin2phi) (*.f32 (*.f32 alphax alphax) sin2phi))
#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 (-.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 (* (* 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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax)))
#s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 alphay alphay) cos2phi))
#s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))
#s(approx (* (* alphax alphax) (* alphay alphay)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)))
#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 (/ cos2phi (* alphax alphax)) (/.f32 cos2phi (*.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 (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 (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay)))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (*.f32 (*.f32 alphax alphax) (+.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 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay)))
#s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) sin2phi))
#s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (+.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 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay)))
#s(approx (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) (/.f32 (+.f32 sin2phi (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) (*.f32 alphax alphax))) (*.f32 alphay alphay)))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 alphay alphay)))
#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 (-.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 (/ (* alphay alphay) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* 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 (/ (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 (/ sin2phi (* alphay alphay)) (/.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 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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) 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 (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 (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 (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) (*.f32 #s(literal -1 binary32) (/.f32 u0 cos2phi)))
#s(approx (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi))))
#s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 #s(literal -1 binary32) cos2phi))
#s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi)))
#s(approx (* -1/2 (/ u0 cos2phi)) (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)))
#s(approx (/ u0 cos2phi) (/.f32 u0 cos2phi))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 u0 (fma.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (*.f32 u0 (fma.f32 #s(literal 1/4 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (*.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) 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))) (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 (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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ 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 (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 (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 u0 u0) cos2phi)))
#s(approx (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 u0 u0) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0))))))
#s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)))
#s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (*.f32 #s(literal -1 binary32) (*.f32 u0 (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))))) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))))) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))))) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (*.f32 (*.f32 u0 u0) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) (+.f32 (log.f32 #s(literal -1 binary32)) (*.f32 #s(literal -1 binary32) (neg.f32 (log.f32 u0)))))) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (*.f32 (*.f32 (*.f32 u0 u0) u0) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (*.f32 (*.f32 u0 u0) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))))
#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 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 (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 (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ 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 (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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 #s(literal -1 binary32) u0)))) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (+.f32 (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 #s(literal -1 binary32) u0)))) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (*.f32 #s(literal -1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))) u0) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 #s(literal -1 binary32) u0)))) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (fma.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))) (*.f32 #s(literal -1 binary32) (/.f32 (fma.f32 #s(literal 1/3 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (*.f32 u0 (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))) (*.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))) u0))) u0) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) (log.f32 (/.f32 #s(literal -1 binary32) u0)))) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi)))))
#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 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 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 (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 (/ (log (- 1 u0)) cos2phi) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))
#s(approx (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) (/.f32 (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32))) cos2phi))
#s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)) cos2phi))
#s(approx (/ 1 cos2phi) (/.f32 #s(literal 1 binary32) cos2phi))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (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 (+ (/ 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))) (* alphax alphax)) (*.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 #s(literal 1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi)))))
#s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (*.f32 (*.f32 alphax alphax) sin2phi) cos2phi) (*.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 (*.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 (+ (/ 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 (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* 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 (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (*.f32 #s(literal -1 binary32) (*.f32 cos2phi (-.f32 (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 (*.f32 alphay alphay) cos2phi))) #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 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 (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 u0 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) u0))) cos2phi)))
#s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (*.f32 #s(literal -1 binary32) (/.f32 (+.f32 #s(literal 1 binary32) (*.f32 #s(literal 1/2 binary32) u0)) cos2phi)))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* 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 (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 #s(literal -1 binary32) (*.f32 cos2phi (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) cos2phi) (*.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 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 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 (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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (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 (+ (/ 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 (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* alphax alphax)) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)))))
#s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (*.f32 sin2phi (+.f32 (/.f32 cos2phi sin2phi) (/.f32 (*.f32 alphax alphax) (*.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 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) sin2phi) (*.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 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 (+ (/ 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 (/ (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (* 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 (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (*.f32 #s(literal -1 binary32) (*.f32 sin2phi (fma.f32 #s(literal -1 binary32) (/.f32 cos2phi sin2phi) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 alphax alphax) (*.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 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 (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* 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 (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 #s(literal -1 binary32) (*.f32 sin2phi (fma.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) cos2phi) sin2phi) (*.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 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)))

eval69.0ms (0.9%)

Memory
-0.1MiB live, 137.8MiB allocated; 25ms collecting garbage
Compiler

Compiled 17 363 to 3 380 computations (80.5% saved)

prune93.0ms (1.3%)

Memory
14.1MiB live, 206.4MiB allocated; 13ms collecting garbage
Pruning

77 alts after pruning (67 fresh and 10 done)

PrunedKeptTotal
New51021531
Fresh114657
Picked145
Done066
Total52277599
Accuracy
99.9%
Counts
599 → 77
Alt Table
Click to see full alt table
StatusAccuracyProgram
53.4%
(/.f32 (neg.f32 (/.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 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
58.3%
(/.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))))
89.8%
(/.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))))
25.8%
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #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)))))))
58.4%
(/.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))))
58.3%
(/.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 (exp.f32 (*.f32 (log.f32 alphax) #s(literal 2 binary32)))) (/.f32 sin2phi (*.f32 alphay alphay))))
58.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)))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
60.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (/.f32 sin2phi alphay) alphax (*.f32 alphay (/.f32 cos2phi alphax))) (*.f32 alphay alphax)))
23.2%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
47.3%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
60.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 (/.f32 cos2phi alphax) alphax) (/.f32 sin2phi (*.f32 alphay alphay))))
60.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
60.9%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
60.8%
(/.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))))))
47.3%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
23.3%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
60.3%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))
47.2%
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
27.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))))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
58.6%
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
22.7%
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
58.6%
(/.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.8%
(/.f32 #s(approx (neg (- (log (- 1 (* u0 u0))) (log (+ 1 u0)))) u0) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
44.3%
(/.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 (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)))))))
92.5%
(/.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 cos2phi (*.f32 (/.f32 (*.f32 alphax alphax) alphay) (/.f32 sin2phi alphay))) (*.f32 alphax alphax))))
69.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 #s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
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 #s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) cos2phi) (*.f32 alphax alphax))))
69.9%
(/.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 sin2phi (*.f32 alphay alphay))))
90.6%
(/.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 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))
90.8%
(/.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))))
90.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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
86.9%
(/.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 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
86.9%
(/.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))))
66.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.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 alphax alphax))))
85.3%
(/.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))))))
71.7%
(/.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))))))
26.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 #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))))))
92.4%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 (/.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))) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
92.0%
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 #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))))) u0)) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
75.7%
(/.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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
86.9%
(/.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))))
62.6%
(/.f32 #s(approx (neg (log (- 1 u0))) #s(approx (* (+ (* 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))))))
45.4%
#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))
23.3%
#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))
86.8%
#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)))))))
76.0%
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
47.7%
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) sin2phi)))
81.1%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.f32 (fma.f32 (fma.f32 #s(literal 1/4 binary32) #s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)) (/.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))
44.9%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (/.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)))))))) 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.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 #s(literal 1 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) u0))
67.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))
59.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) (fma.f32 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))) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
70.5%
#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))
59.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))
69.5%
#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 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)))) u0))
67.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.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 (*.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))
59.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))
59.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))) (/.f32 (exp.f32 (*.f32 (log.f32 alphay) #s(literal 2 binary32))) sin2phi))) u0))
47.7%
#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))))
23.2%
#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))))
23.1%
#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.7%
#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.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 u0 (-.f32 (*.f32 #s(literal -1/3 binary32) u0) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
26.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 u0 #s(approx (- (* -1/3 u0) 1/2) #s(literal -1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
23.3%
#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 #s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #s(literal -1 binary32)))) cos2phi))))
26.0%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi)))))))
25.9%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 (-.f32 (*.f32 #s(literal -1/2 binary32) u0) #s(literal 1 binary32)) cos2phi)))))))
23.3%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 #s(literal -1 binary32) cos2phi)))))))
25.2%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) #s(approx (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 u0 u0) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0))))))))))
23.3%
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (exp.f32 (*.f32 (log.f32 alphax) #s(literal 2 binary32))) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
23.2%
#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.5%
#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.4%
#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))))))
23.3%
#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)))
Compiler

Compiled 4 902 to 3 027 computations (38.2% saved)

regimes987.0ms (13.6%)

Memory
-91.3MiB live, 763.6MiB allocated; 977ms collecting garbage
Counts
118 → 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))
#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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 #s(literal -1 binary32) cos2phi)))))))
#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 #s(approx (log (- 1 u0)) (*.f32 u0 #s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #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 #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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 (-.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 #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 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 #s(approx (- (* -1/3 u0) 1/2) #s(literal -1/2 binary32))) #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))) #s(approx (* (+ (* 1/2 u0) 1) u0) 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) 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) 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 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.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))))) (*.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)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #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 (/ (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))
#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/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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
#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))))) (*.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/4 binary32) (/.f32 (*.f32 u0 u0) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))) 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))))
(/.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 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 #s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) cos2phi) (*.f32 alphax alphax))))
(/.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 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(/.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))))) (*.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))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 (/.f32 cos2phi alphax) alphax) (/.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 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) #s(approx (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 u0 u0) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0))))))))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.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))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
(/.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 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.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 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.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 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (/.f32 sin2phi alphay) alphax (*.f32 alphay (/.f32 cos2phi alphax))) (*.f32 alphay alphax)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (exp.f32 (*.f32 (log.f32 alphax) #s(literal 2 binary32))) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (/.f32 cos2phi alphax) (*.f32 alphay alphay) (*.f32 alphax sin2phi)) (*.f32 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)) (+.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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.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))) (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)))) u0))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.f32 (neg.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))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) 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 (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.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))))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.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 #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 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 (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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.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 (+.f32 cos2phi (*.f32 (/.f32 (*.f32 alphax alphax) alphay) (/.f32 sin2phi alphay))) (*.f32 alphax alphax))))
(/.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 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 #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))))) (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.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))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.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))))) (/.f32 #s(literal 1/2 binary32) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))) 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))) (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)))))))
(/.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 (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 (/.f32 (-.f32 (*.f32 (*.f32 #s(literal 1/2 binary32) u0) (*.f32 #s(literal 1/2 binary32) u0)) #s(literal 1 binary32)) (-.f32 (*.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 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (pow.f32 (*.f32 alphax alphay) #s(literal 2 binary32))))
(/.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))))) (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.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)))) (+.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))))) (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))) u0))
(/.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))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (fma.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))))) (/.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)) u0 (/.f32 #s(literal 1 binary32) (+.f32 (/.f32 sin2phi (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 alphax alphax))))) 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 (exp.f32 (*.f32 (log.f32 alphax) #s(literal 2 binary32)))) (/.f32 sin2phi (*.f32 alphay alphay))))
(/.f32 #s(approx (neg (log (- 1 u0))) (*.f32 #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))))) 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 (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 (fma.f32 #s(literal 1/4 binary32) (*.f32 (*.f32 alphay alphay) u0) (*.f32 #s(literal 1/3 binary32) (*.f32 alphay alphay))) sin2phi)) 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))) (*.f32 (/.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))) 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) #s(approx (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi)) (/.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 (/.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 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))))) 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 (*.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)))))))))) 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 (*.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))))))))) u0))
(/.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 (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)))) #s(approx (* (+ (* (+ (* (+ (* 1/4 (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax))))) (/ 1/3 (+ (/ 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)))))))))))
(/.f32 (neg.f32 (-.f32 (log.f32 (-.f32 #s(literal 1 binary32) (*.f32 u0 u0))) (log.f32 (+.f32 #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)))))))
(/.f32 (neg.f32 (/.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 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (*.f32 (/.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)))))))) u0))
Outputs
(/.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 (-.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))))
Calls

14 calls:

548.0ms
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
52.0ms
alphax
44.0ms
(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
44.0ms
(/.f32 cos2phi (*.f32 alphax alphax))
32.0ms
sin2phi
Results
AccuracySegmentsBranch
92.5%1(*.f32 alphay alphay)
92.5%1(/.f32 sin2phi (*.f32 alphay alphay))
92.5%1(*.f32 alphax alphax)
92.5%1(/.f32 cos2phi (*.f32 alphax alphax))
92.5%1(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
97.8%2(-.f32 #s(literal 1 binary32) u0)
97.8%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
97.8%2(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
92.5%1(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
92.5%1alphax
92.5%1alphay
97.8%2u0
92.5%1cos2phi
92.5%1sin2phi
Compiler

Compiled 53 to 100 computations (-88.7% saved)

regimes86.0ms (1.2%)

Memory
1.2MiB live, 143.2MiB allocated; 8ms collecting garbage
Counts
85 → 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))
#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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 #s(literal -1 binary32) cos2phi)))))))
#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 #s(approx (log (- 1 u0)) (*.f32 u0 #s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #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 #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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 (-.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 #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 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 #s(approx (- (* -1/3 u0) 1/2) #s(literal -1/2 binary32))) #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))) #s(approx (* (+ (* 1/2 u0) 1) u0) 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) 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) 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 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.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))))) (*.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)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #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 (/ (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))
#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/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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
#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))))) (*.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/4 binary32) (/.f32 (*.f32 u0 u0) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))) 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))))
(/.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 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 #s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) cos2phi) (*.f32 alphax alphax))))
(/.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 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(/.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))))) (*.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))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 (/.f32 cos2phi alphax) alphax) (/.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 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) #s(approx (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 u0 u0) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0))))))))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.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))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
(/.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 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.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 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.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 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (/.f32 sin2phi alphay) alphax (*.f32 alphay (/.f32 cos2phi alphax))) (*.f32 alphay alphax)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (exp.f32 (*.f32 (log.f32 alphax) #s(literal 2 binary32))) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (/.f32 cos2phi alphax) (*.f32 alphay alphay) (*.f32 alphax sin2phi)) (*.f32 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)) (+.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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.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))) (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)))) u0))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.f32 (neg.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))))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 (fma.f32 (*.f32 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) 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 (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (*.f32 alphay alphay) cos2phi (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.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))))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.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 #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 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 (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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.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 (+.f32 cos2phi (*.f32 (/.f32 (*.f32 alphax alphax) alphay) (/.f32 sin2phi alphay))) (*.f32 alphax alphax))))
Outputs
(/.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 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (/.f32 sin2phi alphay) alphax (*.f32 alphay (/.f32 cos2phi alphax))) (*.f32 alphay alphax)))
Calls

4 calls:

23.0ms
u0
21.0ms
(log.f32 (-.f32 #s(literal 1 binary32) u0))
21.0ms
(-.f32 #s(literal 1 binary32) u0)
17.0ms
(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
Results
AccuracySegmentsBranch
97.8%2(-.f32 #s(literal 1 binary32) u0)
97.8%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
97.8%2(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
97.8%2u0
Compiler

Compiled 13 to 29 computations (-123.1% saved)

regimes71.0ms (1%)

Memory
-22.1MiB live, 120.3MiB allocated; 9ms collecting garbage
Counts
69 → 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))
#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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 #s(literal -1 binary32) cos2phi)))))))
#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 #s(approx (log (- 1 u0)) (*.f32 u0 #s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #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 #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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 (-.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 #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 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 #s(approx (- (* -1/3 u0) 1/2) #s(literal -1/2 binary32))) #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))) #s(approx (* (+ (* 1/2 u0) 1) u0) 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) 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) 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 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.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))))) (*.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)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #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 (/ (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))
#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/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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
#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))))) (*.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/4 binary32) (/.f32 (*.f32 u0 u0) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))) 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))))
(/.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 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 #s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) cos2phi) (*.f32 alphax alphax))))
(/.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 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(/.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))))) (*.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))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 (/.f32 cos2phi alphax) alphax) (/.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 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) #s(approx (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 u0 u0) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0))))))))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.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))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
(/.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 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.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 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.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 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (/.f32 sin2phi alphay) alphax (*.f32 alphay (/.f32 cos2phi alphax))) (*.f32 alphay alphax)))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (exp.f32 (*.f32 (log.f32 alphax) #s(literal 2 binary32))) (/.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)) cos2phi))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (/.f32 cos2phi alphax) (*.f32 alphay alphay) (*.f32 alphax sin2phi)) (*.f32 alphax (*.f32 alphay alphay))))
Outputs
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 (fma.f32 (/.f32 sin2phi alphay) alphax (*.f32 alphay (/.f32 cos2phi alphax))) (*.f32 alphay alphax)))
(/.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:

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

Compiled 13 to 29 computations (-123.1% saved)

regimes66.0ms (0.9%)

Memory
25.5MiB live, 117.7MiB allocated; 4ms collecting garbage
Counts
66 → 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))
#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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 #s(literal -1 binary32) cos2phi)))))))
#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 #s(approx (log (- 1 u0)) (*.f32 u0 #s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #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 #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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 (-.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 #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 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 #s(approx (- (* -1/3 u0) 1/2) #s(literal -1/2 binary32))) #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))) #s(approx (* (+ (* 1/2 u0) 1) u0) 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) 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) 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 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.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))))) (*.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)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #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 (/ (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))
#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/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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
#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))))) (*.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/4 binary32) (/.f32 (*.f32 u0 u0) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))) 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))))
(/.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 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 #s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) cos2phi) (*.f32 alphax alphax))))
(/.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 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(/.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))))) (*.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))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 (/.f32 cos2phi alphax) alphax) (/.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 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) #s(approx (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 u0 u0) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0))))))))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.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))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
(/.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 (+.f32 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.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 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(/.f32 (log.f32 (/.f32 #s(literal 1 binary32) (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.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 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (*.f32 sin2phi (+.f32 (/.f32 #s(literal 1 binary32) (*.f32 alphay alphay)) (/.f32 cos2phi (*.f32 (*.f32 alphax alphax) sin2phi))))))
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:

16.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.5%2(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
97.5%2u0
97.5%2(-.f32 #s(literal 1 binary32) u0)
97.5%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
Compiler

Compiled 13 to 29 computations (-123.1% saved)

regimes79.0ms (1.1%)

Memory
3.8MiB live, 100.8MiB allocated; 33ms collecting garbage
Counts
56 → 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))
#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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 #s(literal -1 binary32) cos2phi)))))))
#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 #s(approx (log (- 1 u0)) (*.f32 u0 #s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #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 #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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 (-.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 #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 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 #s(approx (- (* -1/3 u0) 1/2) #s(literal -1/2 binary32))) #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))) #s(approx (* (+ (* 1/2 u0) 1) u0) 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) 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) 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 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.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))))) (*.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)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #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 (/ (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))
#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/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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
#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))))) (*.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/4 binary32) (/.f32 (*.f32 u0 u0) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))) 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))))
(/.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 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 #s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) cos2phi) (*.f32 alphax alphax))))
(/.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 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(/.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))))) (*.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))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 (/.f32 cos2phi alphax) alphax) (/.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 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) #s(approx (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 u0 u0) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0))))))))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.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))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))) (/.f32 #s(approx (+ (* (* alphax alphax) (/ sin2phi (* alphay alphay))) cos2phi) (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
Outputs
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 (/.f32 cos2phi 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))))
Calls

4 calls:

36.0ms
(log.f32 (-.f32 #s(literal 1 binary32) u0))
15.0ms
u0
13.0ms
(-.f32 #s(literal 1 binary32) u0)
11.0ms
(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
Results
AccuracySegmentsBranch
96.2%2(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
96.2%2u0
96.2%2(-.f32 #s(literal 1 binary32) u0)
96.2%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
Compiler

Compiled 13 to 29 computations (-123.1% saved)

regimes56.0ms (0.8%)

Memory
20.5MiB live, 111.4MiB allocated; 6ms collecting garbage
Counts
53 → 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))
#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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 #s(literal -1 binary32) cos2phi)))))))
#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 #s(approx (log (- 1 u0)) (*.f32 u0 #s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #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 #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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 (-.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 #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 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 #s(approx (- (* -1/3 u0) 1/2) #s(literal -1/2 binary32))) #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))) #s(approx (* (+ (* 1/2 u0) 1) u0) 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) 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) 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 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.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))))) (*.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)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #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 (/ (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))
#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/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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
#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))))) (*.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/4 binary32) (/.f32 (*.f32 u0 u0) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))) 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))))
(/.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 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 #s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) cos2phi) (*.f32 alphax alphax))))
(/.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 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(/.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))))) (*.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))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi alphay) alphay)))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 (/.f32 cos2phi alphax) alphax) (/.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 u0 (-.f32 (*.f32 #s(literal -1/4 binary32) u0) #s(literal 1/3 binary32))) #s(literal 1/2 binary32))) #s(literal 1 binary32)))) cos2phi))))
#s(approx (/ (neg (log (- 1 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) #s(approx (* u0 (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi))) (*.f32 #s(literal -1 binary32) (*.f32 (*.f32 u0 u0) (fma.f32 #s(literal 1/2 binary32) (/.f32 #s(literal 1 binary32) cos2phi) (/.f32 #s(literal 1 binary32) (*.f32 cos2phi u0))))))))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) sin2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (/.f32 #s(approx (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (*.f32 (*.f32 alphay alphay) cos2phi)) (*.f32 (*.f32 alphax alphax) (*.f32 alphay alphay))))
(/.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))))
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 (/.f32 cos2phi alphax) alphax) (/.f32 sin2phi (*.f32 alphay alphay))))
Calls

4 calls:

16.0ms
(log.f32 (-.f32 #s(literal 1 binary32) u0))
14.0ms
u0
13.0ms
(-.f32 #s(literal 1 binary32) u0)
11.0ms
(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
Results
AccuracySegmentsBranch
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 13 to 29 computations (-123.1% saved)

regimes60.0ms (0.8%)

Memory
-15.1MiB live, 116.5MiB allocated; 20ms collecting garbage
Counts
47 → 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))
#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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 #s(literal -1 binary32) cos2phi)))))))
#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 #s(approx (log (- 1 u0)) (*.f32 u0 #s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #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 #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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 (-.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 #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 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 #s(approx (- (* -1/3 u0) 1/2) #s(literal -1/2 binary32))) #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))) #s(approx (* (+ (* 1/2 u0) 1) u0) 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) 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) 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 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.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))))) (*.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)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #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 (/ (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))
#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/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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
#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))))) (*.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/4 binary32) (/.f32 (*.f32 u0 u0) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))) 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))))
(/.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 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 #s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) cos2phi) (*.f32 alphax alphax))))
(/.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 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
(/.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))))) (*.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))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (/.f32 (*.f32 (*.f32 alphax alphax) (*.f32 (*.f32 alphay alphay) u0)) (fma.f32 (*.f32 alphax alphax) sin2phi (*.f32 (*.f32 alphay alphay) cos2phi))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 (/.f32 sin2phi 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))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
Calls

4 calls:

17.0ms
u0
16.0ms
(-.f32 #s(literal 1 binary32) u0)
15.0ms
(log.f32 (-.f32 #s(literal 1 binary32) u0))
10.0ms
(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
Results
AccuracySegmentsBranch
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 13 to 29 computations (-123.1% saved)

regimes323.0ms (4.4%)

Memory
25.2MiB live, 380.9MiB allocated; 184ms collecting garbage
Counts
42 → 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))
#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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 #s(literal -1 binary32) cos2phi)))))))
#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 #s(approx (log (- 1 u0)) (*.f32 u0 #s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #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 #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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 (-.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 #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 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 #s(approx (- (* -1/3 u0) 1/2) #s(literal -1/2 binary32))) #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))) #s(approx (* (+ (* 1/2 u0) 1) u0) 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) 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) 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 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.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))))) (*.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)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #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 (/ (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))
#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/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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
#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))))) (*.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/4 binary32) (/.f32 (*.f32 u0 u0) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))) 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))))
(/.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 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 #s(approx (+ cos2phi (/ (* (* alphax alphax) sin2phi) (* alphay alphay))) cos2phi) (*.f32 alphax alphax))))
(/.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 alphax alphax) (/.f32 sin2phi (*.f32 alphay alphay)) cos2phi) (*.f32 alphax alphax))))
Outputs
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) 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))))
Calls

14 calls:

74.0ms
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
50.0ms
cos2phi
39.0ms
(log.f32 (-.f32 #s(literal 1 binary32) u0))
24.0ms
(/.f32 cos2phi (*.f32 alphax alphax))
21.0ms
(*.f32 alphax alphax)
Results
AccuracySegmentsBranch
86.9%1(*.f32 alphay alphay)
86.9%1(/.f32 sin2phi (*.f32 alphay alphay))
86.9%1(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
86.9%1alphay
86.9%1cos2phi
86.9%1sin2phi
86.9%1(*.f32 alphax alphax)
86.9%1(/.f32 cos2phi (*.f32 alphax alphax))
86.9%1(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
86.9%1alphax
90.2%2(-.f32 #s(literal 1 binary32) u0)
90.2%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
90.2%2(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
90.2%2u0
Compiler

Compiled 53 to 100 computations (-88.7% saved)

regimes207.0ms (2.8%)

Memory
7.5MiB live, 165.6MiB allocated; 81ms 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))
#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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 #s(literal -1 binary32) cos2phi)))))))
#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 #s(approx (log (- 1 u0)) (*.f32 u0 #s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #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 #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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 (-.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 #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 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 #s(approx (- (* -1/3 u0) 1/2) #s(literal -1/2 binary32))) #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))) #s(approx (* (+ (* 1/2 u0) 1) u0) 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) 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) 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 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.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))))) (*.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)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #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 (/ (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))
#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/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 cos2phi (/.f32 (*.f32 (*.f32 alphax alphax) sin2phi) (*.f32 alphay alphay))) (*.f32 alphax alphax))))
#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))))) (*.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/4 binary32) (/.f32 (*.f32 u0 u0) sin2phi))) (/.f32 #s(literal 1 binary32) sin2phi)))) 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))) 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))) (fma.f32 #s(literal 1/2 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) u0) sin2phi) (/.f32 (*.f32 alphay alphay) sin2phi)))) u0))
Calls

14 calls:

58.0ms
(/.f32 sin2phi (*.f32 alphay alphay))
35.0ms
(*.f32 alphax alphax)
12.0ms
(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
9.0ms
alphay
9.0ms
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
Results
AccuracySegmentsBranch
75.8%1(/.f32 cos2phi (*.f32 alphax alphax))
75.8%1(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
75.8%1cos2phi
75.8%1(*.f32 alphax alphax)
75.8%1alphax
75.8%1(*.f32 alphay alphay)
75.8%1alphay
82.2%2(/.f32 sin2phi (*.f32 alphay alphay))
80.3%2(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
82.2%2sin2phi
81.9%2(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
81.9%2u0
81.9%2(-.f32 #s(literal 1 binary32) u0)
81.9%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
Compiler

Compiled 53 to 100 computations (-88.7% saved)

regimes16.0ms (0.2%)

Memory
14.2MiB live, 14.2MiB allocated; 0ms collecting garbage
Counts
28 → 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))
#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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 #s(literal -1 binary32) cos2phi)))))))
#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 #s(approx (log (- 1 u0)) (*.f32 u0 #s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #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 #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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 (-.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 #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 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 #s(approx (- (* -1/3 u0) 1/2) #s(literal -1/2 binary32))) #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))) #s(approx (* (+ (* 1/2 u0) 1) u0) 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) 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) 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 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.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))))) (*.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)))) (neg.f32 (*.f32 (*.f32 alphax alphax) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 (-.f32 (*.f32 #s(literal -1/2 binary32) (/.f32 u0 cos2phi)) (/.f32 #s(literal 1 binary32) cos2phi)))))))
Outputs
(/.f32 #s(approx (neg (log (- 1 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 #s(literal 1/2 binary32) sin2phi)) (/.f32 #s(literal 1 binary32) sin2phi)))) u0))
Calls

2 calls:

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

Compiled 5 to 12 computations (-140% saved)

regimes40.0ms (0.5%)

Memory
-36.6MiB live, 52.5MiB allocated; 9ms 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))
#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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 #s(literal -1 binary32) cos2phi)))))))
#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 #s(approx (log (- 1 u0)) (*.f32 u0 #s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #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 #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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 (-.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 #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 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 #s(approx (- (* -1/3 u0) 1/2) #s(literal -1/2 binary32))) #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))) #s(approx (* (+ (* 1/2 u0) 1) u0) 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) 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 (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 cos2phi (*.f32 alphax alphax))))
(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) #s(approx (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay))) (/.f32 sin2phi (*.f32 alphay alphay))))
#s(approx (/ (neg (log (- 1 u0))) (/ (+ (* (* alphay alphay) cos2phi) (* (* alphax alphax) sin2phi)) (* (* alphax alphax) (* alphay alphay)))) (*.f32 #s(literal -1 binary32) (/.f32 (*.f32 (*.f32 alphay alphay) (log.f32 (-.f32 #s(literal 1 binary32) u0))) 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 cos2phi #s(approx (+ (/ 1 (* alphax alphax)) (/ sin2phi (* (* alphay alphay) cos2phi))) (/.f32 #s(literal 1 binary32) (*.f32 alphax alphax))))))
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:

10.0ms
(-.f32 #s(literal 1 binary32) u0)
7.0ms
(/.f32 sin2phi (*.f32 alphay alphay))
6.0ms
sin2phi
6.0ms
(log.f32 (-.f32 #s(literal 1 binary32) u0))
Results
AccuracySegmentsBranch
81.9%2(-.f32 #s(literal 1 binary32) u0)
81.9%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
81.7%2sin2phi
81.7%2(/.f32 sin2phi (*.f32 alphay alphay))
Compiler

Compiled 12 to 27 computations (-125% saved)

regimes72.0ms (1%)

Memory
43.0MiB live, 131.8MiB allocated; 22ms collecting garbage
Counts
15 → 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))
#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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 #s(literal -1 binary32) cos2phi)))))))
#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 #s(approx (log (- 1 u0)) (*.f32 u0 #s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #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 #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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 (-.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 #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 #s(approx (log (- 1 u0)) (*.f32 u0 (-.f32 (*.f32 u0 #s(approx (- (* -1/3 u0) 1/2) #s(literal -1/2 binary32))) #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
(/.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

14 calls:

12.0ms
sin2phi
8.0ms
cos2phi
4.0ms
alphax
4.0ms
(/.f32 sin2phi (*.f32 alphay alphay))
4.0ms
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
Results
AccuracySegmentsBranch
66.5%1(/.f32 cos2phi (*.f32 alphax alphax))
66.5%1(*.f32 alphax alphax)
66.5%1alphax
66.5%1cos2phi
66.5%1(*.f32 alphay alphay)
66.5%1(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
66.5%1alphay
66.5%1(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
77.6%2sin2phi
78.0%2(/.f32 sin2phi (*.f32 alphay alphay))
72.2%2(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
72.2%2u0
72.2%2(-.f32 #s(literal 1 binary32) u0)
72.2%2(log.f32 (-.f32 #s(literal 1 binary32) u0))
Compiler

Compiled 53 to 100 computations (-88.7% saved)

regimes18.0ms (0.3%)

Memory
-1.9MiB live, 43.6MiB allocated; 4ms 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))
#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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 #s(literal -1 binary32) cos2phi)))))))
#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 #s(approx (log (- 1 u0)) (*.f32 u0 #s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #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 #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

6 calls:

5.0ms
sin2phi
3.0ms
(/.f32 sin2phi (*.f32 alphay alphay))
3.0ms
u0
3.0ms
(log.f32 (-.f32 #s(literal 1 binary32) u0))
3.0ms
(-.f32 #s(literal 1 binary32) u0)
Results
AccuracySegmentsBranch
59.8%1(-.f32 #s(literal 1 binary32) u0)
59.8%1(log.f32 (-.f32 #s(literal 1 binary32) u0))
59.8%1u0
59.8%1(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
71.4%2sin2phi
71.6%2(/.f32 sin2phi (*.f32 alphay alphay))
Compiler

Compiled 18 to 41 computations (-127.8% saved)

regimes27.0ms (0.4%)

Memory
5.1MiB live, 51.5MiB allocated; 2ms 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))
#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) #s(approx (/ (log (- 1 u0)) cos2phi) (*.f32 u0 #s(approx (- (* -1/2 (/ u0 cos2phi)) (/ 1 cos2phi)) (/.f32 #s(literal -1 binary32) cos2phi)))))))
#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 #s(approx (log (- 1 u0)) (*.f32 u0 #s(approx (- (* u0 (- (* -1/3 u0) 1/2)) 1) #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 #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))))) (*.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))
Calls

10 calls:

4.0ms
cos2phi
3.0ms
(*.f32 alphay alphay)
2.0ms
(*.f32 alphax alphax)
2.0ms
alphay
2.0ms
(/.f32 sin2phi (*.f32 alphay alphay))
Results
AccuracySegmentsBranch
59.8%1(*.f32 alphax alphax)
59.8%1alphax
59.8%1(*.f32 alphay alphay)
59.8%1alphay
59.8%1(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
59.8%1(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
59.8%1(/.f32 cos2phi (*.f32 alphax alphax))
59.8%1cos2phi
69.0%2sin2phi
69.3%2(/.f32 sin2phi (*.f32 alphay alphay))
Compiler

Compiled 40 to 71 computations (-77.5% saved)

regimes2.0ms (0%)

Memory
4.7MiB live, 4.7MiB allocated; 0ms collecting garbage
Counts
2 → 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))
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

1 calls:

1.0ms
(/.f32 sin2phi (*.f32 alphay alphay))
Results
AccuracySegmentsBranch
69.3%2(/.f32 sin2phi (*.f32 alphay alphay))
Compiler

Compiled 4 to 7 computations (-75% saved)

regimes21.0ms (0.3%)

Memory
-14.1MiB live, 41.7MiB allocated; 11ms 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:

8.0ms
sin2phi
1.0ms
u0
1.0ms
(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.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 sin2phi (*.f32 alphay alphay))
Results
AccuracySegmentsBranch
23.3%1(/.f32 cos2phi (*.f32 alphax alphax))
23.3%1cos2phi
23.3%1(*.f32 alphay alphay)
23.3%1(*.f32 alphax alphax)
23.3%1(-.f32 #s(literal 1 binary32) u0)
23.3%1(log.f32 (-.f32 #s(literal 1 binary32) u0))
23.3%1alphax
23.3%1alphay
23.3%1(/.f32 (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) (+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay))))
23.3%1(+.f32 (/.f32 cos2phi (*.f32 alphax alphax)) (/.f32 sin2phi (*.f32 alphay alphay)))
23.3%1(neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))
23.3%1u0
23.3%1sin2phi
23.3%1(/.f32 sin2phi (*.f32 alphay alphay))
Compiler

Compiled 53 to 100 computations (-88.7% saved)

bsearch1.0ms (0%)

Memory
2.3MiB live, 2.3MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
0.0ms
0.029711810871958733
0.03048635646700859
Compiler

Compiled 20 to 23 computations (-15% saved)

bsearch1.0ms (0%)

Memory
1.3MiB live, 1.3MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
0.0ms
0.03048635646700859
0.042988069355487823
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.02244158275425434
-0.015614003874361515
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.02244158275425434
-0.015614003874361515
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.005094130057841539
-0.0035210177302360535
Compiler

Compiled 20 to 23 computations (-15% saved)

bsearch0.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
0.0ms
0.003514847718179226
0.00508117163553834
Compiler

Compiled 20 to 23 computations (-15% saved)

bsearch0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
0.0ms
0.003514847718179226
0.00508117163553834
Compiler

Compiled 20 to 23 computations (-15% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.06329677999019623
-0.06013437360525131
Compiler

Compiled 20 to 23 computations (-15% saved)

bsearch0.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.0013412998523563147
0.0023509981110692024
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.0013412998523563147
0.0023509981110692024
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.0009619450429454446
-0.0009498337167315185
Compiler

Compiled 20 to 23 computations (-15% saved)

bsearch2.0ms (0%)

Memory
-46.0MiB live, 0.5MiB allocated; 3ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
2.468620360213114e-12
6.243159635099804e-12
Compiler

Compiled 19 to 23 computations (-21.1% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.1919710010688256e-11
1.5137120723540676e-11
Compiler

Compiled 19 to 23 computations (-21.1% saved)

bsearch0.0ms (0%)

Memory
0.4MiB live, 0.4MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
3.0651859194977184e-17
4.0937079179743184e-17
Compiler

Compiled 19 to 23 computations (-21.1% saved)

bsearch0.0ms (0%)

Memory
0.4MiB live, 0.4MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
3.0651859194977184e-17
4.0937079179743184e-17
Compiler

Compiled 19 to 23 computations (-21.1% saved)

derivations568.0ms (7.8%)

Memory
17.7MiB live, 407.6MiB allocated; 201ms collecting garbage
Stop Event
fuel
Compiler

Compiled 318 to 184 computations (42.1% saved)

preprocess179.0ms (2.5%)

Memory
-9.7MiB live, 322.2MiB allocated; 38ms collecting garbage
Remove

(abs alphay)

(abs alphax)

Compiler

Compiled 3 609 to 2 775 computations (23.1% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...